Adding in a w/object macro that lets you refer to the object

arclanguage · May 27, 2011 · 6ea1169 · 6ea1169
1 parent 8f288d6
commit 6ea1169
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/lib/object.arc b/lib/object.arc
@@ -169,3 +169,7 @@
                 `(set-attribute ,x ',k ,v))
               (pair args))
        (annotate 'object ,x))))
+
+(mac w/object (name . args)
+  `(letr ,name (object ,@args)
+     ,name))