X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/1d8cc67a3f4ded443f5efc673a616883cbae9c50..9ec578d9fe450b7e7f9030dc9d930185593aa991:/src/foo.sod

diff --git a/src/foo.sod b/src/foo.sod
index f5c10dc..9db34ba 100644
--- a/src/foo.sod
+++ b/src/foo.sod
@@ -1,7 +1,23 @@
 /* foo */
 
-code header : include {
+code c : includes {
 #include "foo.h"
 }
-lisp (format t "hello, world!~%");
-demo "found foo ok";
+
+code h : includes {
+#include "sod.h"
+}
+
+//[link = SodObject]
+class Test : SodObject {
+  int x = 0;
+
+  int cur() { return me->test.x; }
+  void inc() { me->test.x++; }
+  void dec() { me->test.x--; }
+}
+
+[link = Test, nick = snd]
+class Second : Test {
+  void test.dec() { me->test.x -= 3; }
+}