first usable version

IBAF-Editor/syntax/cbs-gen/IBAF-Expressions.sdf3

@@ -0,0 +1,128 @@
+module IBAF-Expressions
+            
+imports 
+  
+  Funcons
+
+// Language "IBAFlang"
+    
+lexical syntax // Language
+  
+  // # 1: General expressions
+                   
+  
+  LEX-id = ( [a-z] | [A-Z] ) ( [a-z] | [A-Z] | [0-9] )*
+  LEX-DASH = "-"
+  LEX-decimal = [1-9] ( [0-9] )*
+  
+syntax // Language
+  
+  // # 1: General expressions
+                   
+  
+  L-int-CF.L-int--R-0 =
+    "0"
+  L-int-CF.L-int--C-DASH-Q-L-decimal-D =
+    L-DASH-Q-L-decimal-CF
+  L-DASH-Q-L-decimal-CF.L-DASH-Q-L-decimal--DASH-Q-L-decimal =
+    LEX-DASH-CF? L-decimal-CF
+  
+  
+  
+context-free syntax // Language
+  
+  // # 1: General expressions
+                   
+  
+  L-exp.L-exp--L-id =
+    L-id
+  L-exp.L-exp--L-int =
+    L-int
+  L-exp.L-exp--R-true =
+    "true"
+  L-exp.L-exp--R-false =
+    "false"
+  L-exp.L-exp--L-exp-PLUS-L-exp =
+    L-exp "+" L-exp
+  L-exp.L-exp--L-exp-DASH-L-exp =
+    L-exp "-" L-exp
+  L-exp.L-exp--L-exp-STAR-L-exp =
+    L-exp "*" L-exp
+  L-exp.L-exp--L-exp-SLASH-L-exp =
+    L-exp "/" L-exp
+  L-exp.L-exp--L-exp-PERCENT-L-exp =
+    L-exp "%" L-exp
+  L-exp.L-exp--L-exp-AMPERSAND-AMPERSAND-L-exp =
+    L-exp "&&" L-exp
+  L-exp.L-exp--L-exp-BAR-BAR-L-exp =
+    L-exp "||" L-exp
+  L-exp.L-exp--L-exp-EQUALS-EQUALS-L-exp =
+    L-exp "==" L-exp
+  L-exp.L-exp--L-exp-GREATER-EQUALS-L-exp =
+    L-exp ">=" L-exp
+  L-exp.L-exp--L-exp-GREATER-L-exp =
+    L-exp ">" L-exp
+  L-exp.L-exp--L-exp-LESS-EQUALS-L-exp =
+    L-exp "<=" L-exp
+  L-exp.L-exp--L-exp-LESS-L-exp =
+    L-exp "<" L-exp
+  L-exp.L-exp--LPAREN-L-exp-RPAREN =
+    "(" L-exp ")"
+  
+  L-id.LEX-id =
+    LEX-id
+  L-decimal.LEX-decimal =
+    LEX-decimal
+  
+context-free syntax // Semantics
+  
+  // # 1: General expressions
+                   
+  
+  FCT.T-eval-exp =
+    "eval-exp" "[:" L-exp ":]"
+  FCT-Quoted.L-id = L-id
+  FCT.T-id =
+    "id" "[:" L-id ":]"
+  FCT.T-int-val =
+    "int-val" "[:" L-int ":]"
+  FCT-Quoted.L-decimal = L-decimal
+  FCT.T-dec-val =
+    "dec-val" "[:" L-decimal ":]"
+  
+context-free syntax // Desugaring
+  
+  // # 1: General expressions
+                   
+  
+  
+variables // Meta-variables
+  
+  // # 1: General expressions
+                   
+  
+  L-exp = "(:Exp" [1-9]? ":)" {prefer}
+  L-exp? = "(:Exp" [1-9]? "?:)" {prefer}
+  L-exp* = "(:Exp" [1-9]? "*:)" {prefer}
+  L-exp+ = "(:Exp" [1-9]? "+:)" {prefer}
+  L-id = "(:Id" [1-9]? ":)" {prefer}
+  L-id? = "(:Id" [1-9]? "?:)" {prefer}
+  L-id* = "(:Id" [1-9]? "*:)" {prefer}
+  L-id+ = "(:Id" [1-9]? "+:)" {prefer}
+  L-int = "(:Int" [1-9]? ":)" {prefer}
+  L-int? = "(:Int" [1-9]? "?:)" {prefer}
+  L-int* = "(:Int" [1-9]? "*:)" {prefer}
+  L-int+ = "(:Int" [1-9]? "+:)" {prefer}
+  L-decimal = "(:Dec" [1-9]? ":)" {prefer}
+  L-decimal? = "(:Dec" [1-9]? "?:)" {prefer}
+  L-decimal* = "(:Dec" [1-9]? "*:)" {prefer}
+  L-decimal+ = "(:Dec" [1-9]? "+:)" {prefer}
+  
+// SDF comments
+  
+  // # 1: General expressions
+                   
+  
+  
+sorts // ASTs
+  T-start

IBAF-Editor/syntax/cbs-gen/IBAF-Start.sdf3

@@ -1,103 +1,81 @@
 module IBAF-Start
             
 imports 
-  
+  IBAF-Expressions
+  IBAF-Statements
   Funcons
 
 // Language "IBAFlang"
     
 lexical syntax // Language
-  
-  // #1 Arithmetic expressions
-                
-  
-  LEX-DASH = "-"
-  LEX-decimal = ( [0-9] )+
-  LEX-id = ( [A-Z] | [a-z] )+
+  LEX-keyword = "else"
+  LEX-keyword = "false"
+  LEX-keyword = "if"
+  LEX-keyword = "true"
+  LEX-keyword = "while"
+  LEX-keyword = "int"
   
 syntax // Language
   
-  // #1 Arithmetic expressions
-                
-  
-  
 context-free syntax // Language
-  L-start.L-start--L-aexp =
-    L-aexp
+  L-start.L-start--L-pgm =
+    L-pgm
+  
+  L-pgm.L-pgm--R-int-L-idlist-SEMI-L-stmt =
+    "int" L-idlist ";" L-stmt
+  
+  L-idlist.L-idlist--L-id-C-COMMA-L-idlist-D-Q =
+    L-id L-COMMA-L-idlist?
+  
+  L-COMMA-L-idlist.L-COMMA-L-idlist--COMMA-L-idlist =
+    "," L-idlist
   
   
-  // #1 Arithmetic expressions
-                
-  
-  L-aexp.L-aexp--L-num =
-    L-num
-  L-aexp.L-aexp--L-id =
-    L-id
-  L-aexp.L-aexp--L-aexp-PLUS-L-aexp =
-    L-aexp "+" L-aexp
-  L-aexp.L-aexp--L-aexp-SLASH-L-aexp =
-    L-aexp "/" L-aexp
-  L-aexp.L-aexp--LPAREN-L-aexp-RPAREN =
-    "(" L-aexp ")"
-  
-  L-decimal.LEX-decimal = 
-    LEX-decimal
-  L-id.LEX-id = 
-    LEX-id
+  L-keyword.LEX-keyword =
+    LEX-keyword
   
 context-free syntax // Semantics
   FCT.T-start =
     "start" "[:" L-start ":]"
-  
-  // #1 Arithmetic expressions
-                
-  
-  FCT.T-eval-arith =
-    "eval-arith" "[:" L-aexp ":]"
-  FCT-Quoted.L-decimal = L-decimal
-  FCT.T-int-val =
-    "int-val" "[:" L-num ":]"
-  FCT-Quoted.L-id = L-id
-  FCT.T-id =
-    "id" "[:" L-id ":]"
+  FCT.T-run =
+    "run" "[:" L-pgm ":]"
+  FCT-SEQ.T-declare-int-vars =
+    "declare-int-vars" "[:" L-idlist ":]"
+  FCT-Quoted.LEX-keyword = LEX-keyword
   
 context-free syntax // Desugaring
   
-  // #1 Arithmetic expressions
-                
-  
-  
 variables // Meta-variables
   L-start = "(:START" [1-9]? ":)" {prefer}
   L-start? = "(:START" [1-9]? "?:)" {prefer}
   L-start* = "(:START" [1-9]? "*:)" {prefer}
   L-start+ = "(:START" [1-9]? "+:)" {prefer}
-  
-  // #1 Arithmetic expressions
-                
-  
-  L-aexp = "(:AExp" [1-9]? ":)" {prefer}
-  L-aexp? = "(:AExp" [1-9]? "?:)" {prefer}
-  L-aexp* = "(:AExp" [1-9]? "*:)" {prefer}
-  L-aexp+ = "(:AExp" [1-9]? "+:)" {prefer}
-  L-num = "(:N" [1-9]? ":)" {prefer}
-  L-num? = "(:N" [1-9]? "?:)" {prefer}
-  L-num* = "(:N" [1-9]? "*:)" {prefer}
-  L-num+ = "(:N" [1-9]? "+:)" {prefer}
-  L-decimal = "(:D" [1-9]? ":)" {prefer}
-  L-decimal? = "(:D" [1-9]? "?:)" {prefer}
-  L-decimal* = "(:D" [1-9]? "*:)" {prefer}
-  L-decimal+ = "(:D" [1-9]? "+:)" {prefer}
-  L-id = "(:I" [1-9]? ":)" {prefer}
-  L-id? = "(:I" [1-9]? "?:)" {prefer}
-  L-id* = "(:I" [1-9]? "*:)" {prefer}
-  L-id+ = "(:I" [1-9]? "+:)" {prefer}
+  L-pgm = "(:Pgm" [1-9]? ":)" {prefer}
+  L-pgm? = "(:Pgm" [1-9]? "?:)" {prefer}
+  L-pgm* = "(:Pgm" [1-9]? "*:)" {prefer}
+  L-pgm+ = "(:Pgm" [1-9]? "+:)" {prefer}
+  L-idlist = "(:IL" [1-9]? ":)" {prefer}
+  L-idlist? = "(:IL" [1-9]? "?:)" {prefer}
+  L-idlist* = "(:IL" [1-9]? "*:)" {prefer}
+  L-idlist+ = "(:IL" [1-9]? "+:)" {prefer}
   
 // SDF comments
   
-  // #1 Arithmetic expressions
-                
+  lexical syntax 
+    LEX-id = LEX-keyword {reject}
+  lexical restrictions
+    LEX-id -/- [A-Za-z0-9]
   
+  context-free syntax
+  L-exp.L-exp--L-exp-PLUS-L-exp =
+    L-exp "+" L-exp
+    {assoc}
+  L-exp.L-exp--L-exp-AMPERSAND-AMPERSAND-L-exp =
+    L-exp "&&" L-exp
+   {assoc}
+  L-stmt.L-stmt--L-stmt-L-stmt =
+    L-stmt L-stmt
+        {right}
   
 sorts // ASTs
   T-start

IBAF-Editor/syntax/cbs-gen/IBAF-Statements.sdf3

@@ -0,0 +1,48 @@
+module IBAF-Statements
+            
+imports 
+  IBAF-Expressions
+  Funcons
+
+// Language "IBAFlang"
+    
+lexical syntax // Language
+  
+syntax // Language
+  
+context-free syntax // Language
+  L-stmt.L-stmt--L-type-L-id-EQUALS-L-exp-SEMI =
+    L-type L-id "=" L-exp ";"
+  L-stmt.L-stmt--R-print-LPAREN-L-exp-RPAREN-SEMI =
+    "print" "(" L-exp ")" ";"
+  L-stmt.L-stmt--L-stmt-L-stmt =
+    L-stmt L-stmt
+  
+  L-type.L-type--R-int =
+    "int"
+  L-type.L-type--R-bool =
+    "bool"
+  L-type.L-type--L-id =
+    L-id
+  
+  
+context-free syntax // Semantics
+  FCT.T-execute =
+    "execute" "[:" L-stmt ":]"
+  
+context-free syntax // Desugaring
+  
+variables // Meta-variables
+  L-stmt = "(:Stmt" [1-9]? ":)" {prefer}
+  L-stmt? = "(:Stmt" [1-9]? "?:)" {prefer}
+  L-stmt* = "(:Stmt" [1-9]? "*:)" {prefer}
+  L-stmt+ = "(:Stmt" [1-9]? "+:)" {prefer}
+  L-type = "(:Typ" [1-9]? ":)" {prefer}
+  L-type? = "(:Typ" [1-9]? "?:)" {prefer}
+  L-type* = "(:Typ" [1-9]? "*:)" {prefer}
+  L-type+ = "(:Typ" [1-9]? "+:)" {prefer}
+  
+// SDF comments
+  
+sorts // ASTs
+  T-start