X-Git-Url: http://git.harvie.cz/?a=blobdiff_plain;f=demos%2Fobjects%2Fobjects-wiki.c;h=08403cb91af186a2a8830537b0a509af8217d5c2;hb=29c30fdf2f28e2540573b40d95440e919553d0ae;hp=2fbab8f5ffe1a7fd6f474d1a77c95b64a875a3a8;hpb=24cfa6bd1046afbbe6049d9b463cf76c97d5e7d4;p=svn%2FCll1h%2F.git diff --git a/demos/objects/objects-wiki.c b/demos/objects/objects-wiki.c index 2fbab8f..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,7 +14,7 @@ def_mem(Actions) def_obj(Animal) { interface(Actions); - char *name; + str name; }; construct(Animal,Actions) (Animal self, str name) @@ -70,6 +68,7 @@ program for_range(i, 0, 2) { - print(animal[i]->name, ":", _(talk,animal[i])); + print(animal[i]->name, ":", _(talk, animal[i])); } + }