/[gcl]/gcl/ansi-tests/ansi-aux.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/ansi-aux.lsp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.19 by pfdietz, Sat Jan 18 18:14:02 2003 UTC revision 1.20 by pfdietz, Sun Jan 19 15:23:19 2003 UTC
# Line 150  the condition to go uncaught if it canno Line 150  the condition to go uncaught if it canno
150    (classify-error* (eval form)))    (classify-error* (eval form)))
151    
152  (defmacro classify-error (form)  (defmacro classify-error (form)
153    `(classify-error** ',form)))    `(classify-error** ',form))
154    
155  ;;;  ;;;
156  ;;; A scaffold is a structure that is used to remember the object  ;;; A scaffold is a structure that is used to remember the object

Legend:
Removed from v.1.19  
changed lines
  Added in v.1.20

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26