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

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

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

revision 1.5 by pfdietz, Sat Apr 26 16:17:35 2003 UTC revision 1.6 by pfdietz, Sat Apr 26 16:18:40 2003 UTC
# Line 250  Line 250 
250       (eq cobj1 cobj3)       (eq cobj1 cobj3)
251       (eq cobj2 cobj4)       (eq cobj2 cobj4)
252       (class-name cobj1)       (class-name cobj1)
253       (class-name cobj3)       (class-name cobj2)
254       (slot-value (make-instance 'class-0209a) 'a)       (slot-value (make-instance 'class-0209a) 'a)
255       (slot-value (make-instance 'class-0209b) 'a)))       (slot-value (make-instance 'class-0209b) 'a)))
256    t t    t t

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

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