init: Spoofax language project as generated

trans/analysis.str

@@ -0,0 +1,26 @@
+module analysis
+
+imports
+  
+  nabl2/api
+  nabl2/runtime
+
+  statics
+
+  pp
+
+rules // Analysis
+
+  editor-analyze = nabl2-analyze(id)
+
+rules // Debugging
+  
+  // Prints the abstract syntax ATerm of a selection.
+  debug-show-aterm: (selected, _, _, path, project-path) -> (filename, result)
+    with filename := <guarantee-extension(|"aterm")> path
+       ; result   := selected
+
+  // Prints the analyzed annotated abstract syntax ATerm of a selection.
+  debug-show-analyzed: (selected, _, _, path, project-path) -> (filename, result)
+    with filename := <guarantee-extension(|"analyzed.aterm")> path
+       ; result   := selected

trans/outline.str

@@ -0,0 +1,15 @@
+module outline
+
+imports
+  
+  signatures/Spoofax-Propositional-Language-sig
+  libspoofax/editor/outline
+
+rules
+  
+  editor-outline:
+    (_, _, ast, path, project-path) -> outline
+    where
+      outline := <simple-label-outline(to-outline-label)> ast
+  
+  to-outline-label = fail

trans/pp.str

@@ -0,0 +1,49 @@
+module pp
+
+imports
+
+  libstratego-gpp
+  libspoofax/sdf/pp
+  libspoofax/editor/refactoring/-
+  pp/Spoofax-Propositional-Language-parenthesize
+  pp/Spoofax-Propositional-Language-pp
+
+rules
+
+  editor-format:
+    (node, _, ast, path, project-path) -> (filename, result)
+    with
+      ext      := <get-extension> path
+    ; filename := <guarantee-extension(|$[pp.[ext]])> path
+    ; result   := <pp-debug> node
+
+rules
+  
+  pp-Spoofax-Propositional-Language-string =
+    parenthesize-Spoofax-Propositional-Language
+    ; prettyprint-Spoofax-Propositional-Language-start-symbols
+    ; !V([], <id>)
+    ; box2text-string(|120)
+      
+  pp-partial-Spoofax-Propositional-Language-string =
+    parenthesize-Spoofax-Propositional-Language
+    ; prettyprint-Spoofax-Propositional-Language
+    ; !V([], <id>)
+    ; box2text-string(|120)
+    
+  pp-partial-Spoofax-Propositional-Language-string(|sort) =
+    parenthesize-Spoofax-Propositional-Language
+    ; prettyprint-Spoofax-Propositional-Language(|sort)
+    ; !V([], <id>)
+    ; box2text-string(|120)  
+      
+  pp-debug :
+    ast -> result
+    with
+       result := <pp-Spoofax-Propositional-Language-string> ast
+    <+ <bottomup(try(not(is-string); not(is-list); not(pp-Spoofax-Propositional-Language-string); debug(!"cannot pp ")))> ast
+    ;  result := ""
+
+rules
+  
+  construct-textual-change = construct-textual-change(pp-partial-Spoofax-Propositional-Language-string, parenthesize, override-reconstruction, resugar)

trans/spoofax_propositional_language.str

@@ -0,0 +1,16 @@
+module spoofax_propositional_language
+
+imports
+  
+  completion/completion
+  pp
+  outline
+  analysis
+
+rules // Debugging
+  
+  debug-show-aterm:
+    (node, _, _, path, project-path) -> (filename, result)
+    with
+      filename := <guarantee-extension(|"aterm")> path
+    ; result   := node

trans/statics.nabl2

@@ -0,0 +1,13 @@
+module statics
+
+imports
+
+  signatures/-
+
+rules
+
+  init ^ (s) := new s.
+
+  [[ Empty() ^ (s) ]] :=
+    false | note "Specify name binding and typing rules in statics.nabl2".
+