diff options
Diffstat (limited to 'src/modules/ast/syntax-tree.scm')
| -rw-r--r-- | src/modules/ast/syntax-tree.scm | 47 |
1 files changed, 19 insertions, 28 deletions
diff --git a/src/modules/ast/syntax-tree.scm b/src/modules/ast/syntax-tree.scm index b7db8dd..e2ca8da 100644 --- a/src/modules/ast/syntax-tree.scm +++ b/src/modules/ast/syntax-tree.scm @@ -1,34 +1,30 @@ (define-module (modules ast syntax-tree) #:use-module (srfi srfi-9) #:export (make-program - program? - program-function + program? + program-function - make-function - function? - function-id - function-stmt + make-function + function? + function-id + function-stmt - make-stmt - stmt? - stmt-expr + make-stmt + stmt? + stmt-expr - make-expr - expr? - expr-type + make-unary + unary? + unary-operator + unary-expr - make-unary - unary? - unary-operator - unary-expr + make-const + const? + const-int - make-const - const? - const-int - - make-id - id? - id-symbol)) + make-id + id? + id-symbol)) (define-record-type <program> (make-program func) @@ -46,11 +42,6 @@ stmt? (expr stmt-expr)) -(define-record-type <expr> - (make-expr type) - expr? - (type expr-type)) - (define-record-type <unary> (make-unary op expr) unary? |