diff options
| -rw-r--r-- | share/txr/stdlib/asm.tl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/share/txr/stdlib/asm.tl b/share/txr/stdlib/asm.tl index be0b84bb..93ce63e3 100644 --- a/share/txr/stdlib/asm.tl +++ b/share/txr/stdlib/asm.tl @@ -161,7 +161,7 @@ (unless (empty me.labref) (error "assembler: dangling label references")) (whenlet ((n (cdr [find-max me.labdef : cdr]))) - (unless (< 0 n (len me.buf)) + (unless (< -1 n (len me.buf)) (error "assembler: labels outside of code")))) (defmeth assembler dis-one (me) |