Add make-instance as prefab translation form

Shirakumo · Nov 26, 2024 · 312bcd2 · 312bcd2
1 parent 61592b8
commit 312bcd2
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/prefab.lisp b/prefab.lisp
@@ -148,3 +148,7 @@
       (declare (ignorable ,@args))
       ,@body)
     ,instance ,asset))
+
+(define-prefab-translator make-instance (instance asset class &rest args)
+  `(enter (make-instance ,class ,@args)
+          ,instance))