diff options
Diffstat (limited to 'src/interp/property.lisp')
| -rw-r--r-- | src/interp/property.lisp | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/interp/property.lisp b/src/interp/property.lisp index de9719a4..94163971 100644 --- a/src/interp/property.lisp +++ b/src/interp/property.lisp @@ -63,9 +63,12 @@ (MAKEPROP 'SEGMENT '|Led| '(|..| SEGMENT 401 699 (|P:Seg|))) (MAKEPROP 'SEGMENT '|isSuffix| 'T) (MAKEPROP 'EQUAL1 'CHRYBNAM 'EQ) +(MAKEPROP 'COND '|Nud| '(|if| |if| 130 0)) +(MAKEPROP 'CONS '|Led| '(CONS CONS 1000 1000)) +(MAKEPROP 'APPEND '|Led| '(APPEND APPEND 1000 1000)) (REPEAT (IN X '( - (%LET " := ") + (|:=| " := ") (= "=") (|/| "/") (+ "+") |