forked from glen/fostr
Glen Whitney
2772fd0c5c
In addition, for the sake of Haskell code generation, this PR adds static typing with Statix. Resolves #5. Co-authored-by: Glen Whitney <glen@studioinfinity.org> Reviewed-on: glen/fostr#19 Co-Authored-By: Glen Whitney <glen@nobody@nowhere.net> Co-Committed-By: Glen Whitney <glen@nobody@nowhere.net>
33 lines
824 B
Plaintext
33 lines
824 B
Plaintext
module python
|
|
imports libstrategolib signatures/- util
|
|
rules
|
|
|
|
py: TopLevel(x) -> $[import sys
|
|
class StdioC:
|
|
def gets(self, v):
|
|
print(v, file=sys.stdout, end='')
|
|
return self
|
|
def to(data,strm):
|
|
strm.gets(data)
|
|
return data
|
|
Stdio = StdioC()
|
|
[x]]
|
|
|
|
py: Stream() -> $[Stdio]
|
|
py: Int(x) -> x
|
|
py: LitString(x) -> $[r[x]]
|
|
py: Sum(x,y) -> $[[x] + [y]]
|
|
py: Gets(x, y) -> $[[x].gets([y])]
|
|
py: To(x, y) -> $[to([x],[y])]
|
|
py: Terminate(x) -> $[[x];]
|
|
py: Sequence(l) -> <join(|"\n")>l
|
|
|
|
strategies
|
|
|
|
python = bottomup(try(py))
|
|
|
|
// Interface python code generation with editor services and file system
|
|
to-python: (selected, _, _, path, project-path) -> (filename, result)
|
|
with filename := <guarantee-extension(|"py")> path
|
|
; result := <python> selected
|