X-Git-Url: https://git.harvie.cz/?a=blobdiff_plain;f=demos%2Fobjects%2Fobjects-wiki.c;h=08403cb91af186a2a8830537b0a509af8217d5c2;hb=ea514b9e6351878fef9638813f50ce7013e8a832;hp=f60351411f6ce528d41286ca3691c535b75ceb98;hpb=96ec74e5789a747913ebe5b1a583e540e60fa94a;p=svn%2FCll1h%2F.git

diff --git a/demos/objects/objects-wiki.c b/demos/objects/objects-wiki.c
index f603514..08403cb 100644
--- a/demos/objects/objects-wiki.c
+++ b/demos/objects/objects-wiki.c
@@ -6,9 +6,7 @@
    Of course there are easier ways to do the same thing... :-) 
    (G)2008 xChas */
 
-def_type(Animal);
-
-def_mem(Actions)
+def_interface(Animal,Actions)
 {
  str method(talk) (Animal self);
 };
@@ -16,10 +14,10 @@ def_mem(Actions)
 def_obj(Animal)
 {
  interface(Actions);
- char *name;
+ str name;
 };
 
-construct(Animal) (Animal self, str name)
+construct(Animal,Actions) (Animal self, str name)
 {
  self->name = name;
  return self;
@@ -70,6 +68,7 @@ program
 
  for_range(i, 0, 2)
  {
-  print(animal[i]->name, ":", _(talk,animal[i]));
+  print(animal[i]->name, ":", _(talk, animal[i]));
  }
+
 }