diff options
| -rw-r--r-- | stdlib/infix.tl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/stdlib/infix.tl b/stdlib/infix.tl index b08f6c90..d6996bad 100644 --- a/stdlib/infix.tl +++ b/stdlib/infix.tl @@ -48,6 +48,8 @@ trunc floor ceil round lognot))) (new (ifx-oper 0 fun) arity :prefix assoc :right funp t)) +(new (ifx-oper 0 '=) arity :prefix assoc :right lispsym 'identity) + (new (ifx-oper 10 ':=) assoc :right lispsym 'set) (new (ifx-oper 11 'or)) (new (ifx-oper 12 'and)) |