some work on objects and locales (#3 and #5 ?)

[svn/Cll1h/.git] / demos / objects / objects-sample.c

diff --git a/demos/objects/objects-sample.c b/demos/objects/objects-sample.c
index 6b222fd7f71355fb7def48c7f55f77516751ff33..f0a800ae3d89352a1424f835f20a7288c236bd95 100644 (file)
--- a/demos/objects/objects-sample.c
+++ b/demos/objects/objects-sample.c
@@ -190,7 +190,7 @@ void nameRect(Shape community, str name)
 
 /* Example of using object interface methods from inside constructor methods */
 
-construct(Tri) (Tri self, int x1, int y1, int x2, int y2, int x3, int y3)
+construct(Tri,Interface) (Tri self, int x1, int y1, int x2, int y2, int x3, int y3)
 {
  self->name = "TRIANGLE";
  interface_of(self)->count++;
@@ -199,7 +199,7 @@ construct(Tri) (Tri self, int x1, int y1, int x2, int y2, int x3, int y3)
  return self;
 }
 
-construct(Rect) (Rect self, int x1, int y1, int x2, int y2)
+construct(Rect,Interface) (Rect self, int x1, int y1, int x2, int y2)
 {
  self->desc = "rectangle";
  interface_of(self)->count++;
@@ -208,7 +208,7 @@ construct(Rect) (Rect self, int x1, int y1, int x2, int y2)
  return self;
 }
 
-construct(Circ) (Circ self, int x1, int y1, int r)
+construct(Circ,Interface) (Circ self, int x1, int y1, int r)
 {
  self->comment = "Circle";
  interface_of(self)->count++;