Changeset 915


Ignore:
Timestamp:
Feb 16, 2005, 7:22:34 PM (17 years ago)
Author:
bryan
Message:

comma not inside backquote should signal reader-error.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/lib/backquote.lisp

    r6 r915  
    375375  |, reader|
    376376  (lambda (stream char &aux (stack *backquote-stack*))
    377     (when (null stack) (error "Comma not inside backquote"))
     377    (when (null stack)
     378      (signal-reader-error stream "Comma not inside backquote"))
    378379    (let ((*backquote-stack* (cdddr stack)))
    379380      (setq char (tyi stream))
Note: See TracChangeset for help on using the changeset viewer.