projects
/
clnl
/ blobdiff
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
First ugly pass of show
[clnl]
/
src
/
main
/
parse.lisp
diff --git
a/src/main/parse.lisp
b/src/main/parse.lisp
index ced547033adca3e2fad87af25cd83cbbb9693e75..40be292d3d97fe2ab18955627409aaac2cfe35d8 100644
(file)
--- a/
src/main/parse.lisp
+++ b/
src/main/parse.lisp
@@
-57,4
+57,8
@@
*prims*))
; This list of prims will get combined with the mapping to actual code later
*prims*))
; This list of prims will get combined with the mapping to actual code later
+; Current list of argument types we accept:
+; - :number
+; - t - any type
(defprim :crt (:number))
(defprim :crt (:number))
+(defprim :show (t))