From 1c216bd45a7d4fb529288192ecff46453309c485 Mon Sep 17 00:00:00 2001 From: bd Date: Sat, 18 Jan 2025 01:22:46 -0700 Subject: Remove unused files --- src/modules/ast/syntax-tree.scm | 59 ----------------------------------------- 1 file changed, 59 deletions(-) delete mode 100644 src/modules/ast/syntax-tree.scm (limited to 'src/modules/ast/syntax-tree.scm') diff --git a/src/modules/ast/syntax-tree.scm b/src/modules/ast/syntax-tree.scm deleted file mode 100644 index e2ca8da..0000000 --- a/src/modules/ast/syntax-tree.scm +++ /dev/null @@ -1,59 +0,0 @@ -(define-module (modules ast syntax-tree) - #:use-module (srfi srfi-9) - #:export (make-program - program? - program-function - - make-function - function? - function-id - function-stmt - - make-stmt - stmt? - stmt-expr - - make-unary - unary? - unary-operator - unary-expr - - make-const - const? - const-int - - make-id - id? - id-symbol)) - -(define-record-type - (make-program func) - program? - (func program-function)) - -(define-record-type - (make-function id stmt) - function? - (id function-id) - (stmt function-stmt)) - -(define-record-type - (make-stmt expr) - stmt? - (expr stmt-expr)) - -(define-record-type - (make-unary op expr) - unary? - (op unary-operator) - (expr unary-expr)) - -(define-record-type - (make-const int) - const? - (int const-int)) - -(define-record-type - (make-id symbol) - id? - (symbol id-symbol)) -- cgit v1.2.3