Data commit

Task/Inheritance-Single/XLISP/inheritance-single-1.l

@@ -0,0 +1,13 @@
+(define-class animal)
+
+(define-class dog
+    (super-class animal))
+
+(define-class cat
+    (super-class animal))
+
+(define-class collie
+    (super-class dog))
+
+(define-class lab
+    (super-class dog))

Task/Inheritance-Single/XLISP/inheritance-single-2.l

@@ -0,0 +1,21 @@
+[1] (cat 'superclass)
+
+#<Class:ANIMAL #x57094c8>
+[2] (collie 'superclass)
+
+#<Class:DOG #x57094c8>
+[3] (animal 'superclass)
+
+#<Class:OBJECT #x57094c8>
+[4] (dog 'show)
+
+Object is #<Class:DOG #x57094c8>, Class is #<Class:CLASS #x57094c8>
+Instance variables:
+  NAME = DOG
+  MESSAGES = ()
+  IVARS = ()
+  CVARS = #<Environment #x5879788>
+  SUPERCLASS = #<Class:ANIMAL #x57094c8>
+  IVARCNT = 0
+  IVARTOTAL = 0
+#<Class:DOG #x57094c8>