/[gcl]/gcl/ansi-tests/defclass-01.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/defclass-01.lsp

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

revision 1.16 by pfdietz, Sun Jul 27 15:30:39 2003 UTC revision 1.17 by pfdietz, Sat Aug 20 02:18:23 2005 UTC
# Line 391  Line 391 
391          (c2 (make-instance 'class-13 :s1 'foo)))          (c2 (make-instance 'class-13 :s1 'foo)))
392      (values      (values
393       (slot-value c1 's1)       (slot-value c1 's1)
394       (slot-value c1 's1)))       (slot-value c2 's1)))
395    foo foo)    foo foo)
396    
397  ;;;  ;;;

Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17

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