2 files changed, 0 insertions, 99 deletions
diff --git a/src/modules/ast/assembly-tree.scm b/src/modules/ast/assembly-tree.scm
deleted file mode 100644
index 3f0f1b1..0000000
--- a/src/modules/ast/assembly-tree.scm
+++ /dev/null
@@ -1,40 +0,0 @@
-(define-module (modules ast assembly-tree)
-  #:use-module (srfi srfi-9)
-  #:export (make-subroutine
-            subroutine?
-            subroutine-label
-            subroutine-instructions
-            subroutine-frame-size
-
-            make-instruction
-            instruction?
-            instruction-destination
-            set-instruction-destination
-            instruction-operator
-            instruction-src-1
-            instruction-src-2
-
-            make-register
-            register?
-            register-name
-            ))
-
-(define-record-type <subroutine>
-  (make-subroutine label instrs f-size)
-  subroutine?
-  (label subroutine-label)
-  (instrs subroutine-instructions)
-  (f-size subroutine-frame-size))
-
-(define-record-type <instruction>
-  (make-instruction dest op src1 src2)
-  instruction?
-  (dest instruction-destination set-instruction-destination)
-  (op instruction-operator)
-  (src1 instruction-src-1)
-  (src2 instruction-src-2))
-
-(define-record-type <register>
-  (make-register name)
-  register?
-  (name register-name))
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 <program>
-  (make-program func)
-  program?
-  (func program-function))
-
-(define-record-type <function>
-  (make-function id stmt)
-  function?
-  (id function-id)
-  (stmt function-stmt))
-
-(define-record-type <stmt>
-  (make-stmt expr)
-  stmt?
-  (expr stmt-expr))
-
-(define-record-type <unary>
-  (make-unary op expr)
-  unary?
-  (op unary-operator)
-  (expr unary-expr))
-
-(define-record-type <const>
-  (make-const int)
-  const?
-  (int const-int))
-
-(define-record-type <id>
-  (make-id symbol)
-  id?
-  (symbol id-symbol))