diff options
Diffstat (limited to 'share')
-rw-r--r-- | share/txr/stdlib/op.tl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/share/txr/stdlib/op.tl b/share/txr/stdlib/op.tl index ac09f6df..f7ca0e78 100644 --- a/share/txr/stdlib/op.tl +++ b/share/txr/stdlib/op.tl @@ -97,7 +97,7 @@ (defun sys:op-expand (f e args) (unless args ['compile-error f "arguments required"]) - (let* ((compat (and (plusp sys:compat) (<= sys:compat 255))) + (let* ((compat (and (plusp sys:compat) (<= sys:compat 225))) (ctx (make-struct 'sys:op-ctx ^(form ,f))) (do-gen) (sys:*op-ctx* ctx) |