core: add LEFT-DECORATOR: syntax. rename syntax.arity to syntax.attributes

core/bootstrap/stage1.factor

@@ -37,7 +37,7 @@ load-help? off
     "vocabs.loader" require
 
     "syntax" require
-    "syntax.arity" require
+    "syntax.attributes" require
     "bootstrap.layouts" require
 
     ! need this

core/bootstrap/syntax.factor

@@ -17,6 +17,7 @@ in: bootstrap.syntax
         "C:"
         "char:"
         "ARITY:"
+        "LEFT-DECORATOR:"
         "DEFER:"
         "defer:"
         "ERROR:"

core/syntax/attributes/attributes.factor

@@ -9,7 +9,7 @@ ARITY: \ SYMBOL: 1
 ARITY: \ SINGLETON: 1
 ARITY: \ B: 1
 ARITY: \ MAIN: 1
-
+ARITY: \ LEFT-DECORATOR: 1
 
 ARITY: \ ALIAS: 2
 ARITY: \ ARITY: 2
@@ -20,7 +20,13 @@ ARITY: \ INSTANCE: 2
 ARITY: \ GENERIC: 2
 ARITY: \ PRIMITIVE: 2
 
-
 ARITY: \ GENERIC# 3
 ARITY: \ HOOK: 3
 
+LEFT-DECORATOR: \ inline
+LEFT-DECORATOR: \ foldable
+LEFT-DECORATOR: \ flushable
+LEFT-DECORATOR: \ recursive
+LEFT-DECORATOR: \ final
+LEFT-DECORATOR: \ delimiter
+LEFT-DECORATOR: \ deprecated

core/syntax/syntax.factor

@@ -310,6 +310,10 @@ in: bootstrap.syntax
         scan-escaped-word scan-number "arity" set-word-prop
     ] define-core-syntax
 
+    "LEFT-DECORATOR:" [
+        scan-escaped-word t "left-decorator" set-word-prop
+    ] define-core-syntax
+
     "<<" [
         [
             \ >> parse-until >quotation