Parent Directory | Revision Log | Patch
revision 1.14 by pfdietz, Wed Apr 30 11:16:01 2003 UTC | revision 1.15 by pfdietz, Tue Jun 17 11:30:31 2003 UTC | |
---|---|---|
# | Line 613 | Line 613 |
613 | ||
614 | (let ((*class-21-s1-initvar-1* 0) | (let ((*class-21-s1-initvar-1* 0) |
615 | (*class-21-s1-initvar-2* 0)) | (*class-21-s1-initvar-2* 0)) |
(declaim (special *class-21-s1-initvar-1* *class-21-s1-initvar-2*)) | ||
616 | (defclass class-21 () | (defclass class-21 () |
617 | ((s1 :initarg :s1 :initarg :s1b) | ((s1 :initarg :s1 :initarg :s1b) |
618 | (s2 :initarg :s1b :initarg :s2)) | (s2 :initarg :s1b :initarg :s2)) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |