diff options
Diffstat (limited to 'stdlib/compiler.tl')
| -rw-r--r-- | stdlib/compiler.tl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/stdlib/compiler.tl b/stdlib/compiler.tl index 1dbd2b73..836d53cd 100644 --- a/stdlib/compiler.tl +++ b/stdlib/compiler.tl @@ -1402,6 +1402,11 @@ ^(progn ,*args nil)))) ((@(or identity use + * min max logior logand) @a) (return-from comp-fun-form me.(compile oreg env a))) + ((remove @obj @seq) (set form (rlcp ^(remqual ,obj ,seq) form))) + ((count @obj @seq) (set form (rlcp ^(countqual ,obj ,seq) form))) + ((pos @obj @seq) (set form (rlcp ^(posqual ,obj ,seq) form))) + ((member @obj @seq) (set form (rlcp ^(memqual ,obj ,seq) form))) + ((subst @obj @seq) (set form (rlcp ^(subqual ,obj ,seq) form))) (@(require (chain . @nil) (> olev 5) (can-inline-chain form)) |