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

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

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

revision 1.1 by pfdietz, Sat Oct 19 14:53:38 2002 UTC revision 1.2 by pfdietz, Sat Oct 19 16:25:28 2002 UTC
# Line 25  Line 25 
25    (let ((x 0))    (let ((x 0))
26      (values (prog1 x (incf x)) x))      (values (prog1 x (incf x)) x))
27    0 1)    0 1)
   
   
   

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

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