[UPDATE] example

diff --git a/example/class.scm b/example/class.scm
index dbfb60a..1963924 100644 (file)
--- a/example/class.scm
+++ b/example/class.scm
@@ -7,7 +7,7 @@
 
 
 (define-class Foo (Object) ())
-(define-method init ((self Foo) x)
+(define-method init ([self Foo] x)
   (print x)
   (let ((t 10)) 
     (let ((t 12))