diff --git a/basis/constructors/constructors.factor b/basis/constructors/constructors.factor index b4091a1234..d041fdf5c9 100644 --- a/basis/constructors/constructors.factor +++ b/basis/constructors/constructors.factor @@ -63,5 +63,6 @@ MACRO:: slots>constructor ( class slots -- quot ) SYNTAX: CONSTRUCTOR: parse-constructor define-constructor ; SYNTAX: FORWARD-CONSTRUCTOR: parse-constructor f define-auto-constructor ; SYNTAX: BACKWARD-CONSTRUCTOR: parse-constructor t define-auto-constructor ; +ALIAS: AUTO-CONSTRUCTOR FORWARD-CONSTRUCTOR "initializers" create-vocab drop