/[gcl]/gcl/cmpnew/gcl_cmpenv.lsp
ViewVC logotype

Diff of /gcl/cmpnew/gcl_cmpenv.lsp

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

revision 1.9 by camm, Mon Dec 27 22:07:17 2004 UTC revision 1.10 by camm, Tue Dec 28 22:24:18 2004 UTC
# Line 478  Line 478 
478                                     (cmpck (not (symbolp var))                                     (cmpck (not (symbolp var))
479                                            "The type declaration ~s contains a non-symbol ~s."                                            "The type declaration ~s contains a non-symbol ~s."
480                                            decl var)                                            decl var)
481                                     (push (cons var :dynamic-extent) ts)))                                     (push (cons var 'dynamic-extent) ts)))
482                          ((fixnum character double-float short-float array atom bignum bit                          ((fixnum character double-float short-float array atom bignum bit
483                                   bit-vector common compiled-function complex cons float hash-table                                   bit-vector common compiled-function complex cons float hash-table
484                                   integer keyword list long-float nil null number package pathname                                   integer keyword list long-float nil null number package pathname

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10

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