/[gcl]/gcl/lsp/gcl_top.lsp
ViewVC logotype

Diff of /gcl/lsp/gcl_top.lsp

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

revision 1.9 by camm, Tue Aug 9 00:46:06 2005 UTC revision 1.10 by camm, Sun Sep 18 02:46:36 2005 UTC
# Line 39  Line 39 
39    
40  (export '(vs ihs-vs ihs-fun frs-vs frs-bds frs-ihs bds-var bds-val super-go))  (export '(vs ihs-vs ihs-fun frs-vs frs-bds frs-ihs bds-var bds-val super-go))
41    
42  (eval-when (compile) (proclaim '(optimize (safety 2) (space 3))  (eval-when (compile) ;(proclaim '(optimize (safety 2) (space 3))
43                                 )                  ;              )
44             (defvar *command-args* nil)             (defvar *command-args* nil)
45             )             )
46    

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