Add NULL description

[clinton/lisp-on-lines.git] / src / standard-descriptions / null.lisp

diff --git a/src/standard-descriptions/null.lisp b/src/standard-descriptions/null.lisp
new file mode 100644 (file)
index 0000000..8c9161a
--- /dev/null
+++ b/src/standard-descriptions/null.lisp
@@ -0,0 +1,7 @@
+(in-package :lisp-on-lines)
+
+(define-description null (symbol list)
+  ())
+
+(define-layered-method description-of ((object null))
+ (find-description 'null))
\ No newline at end of file