1 files changed, 23 insertions, 0 deletions
diff --git a/src/backend/generator/expansion.scm b/src/backend/generator/expansion.scm
new file mode 100644
index 0000000..9fe2e0a
--- /dev/null
+++ b/src/backend/generator/expansion.scm
@@ -0,0 +1,23 @@
+(define-module (backend generator expansion)
+  #:use-module (backend ast ir)
+  #:use-module (backend utils merge-instructions)
+  #:export (instrs
+            not
+            neg
+            ret))
+
+
+(define (instrs lst)
+  #f
+  (list 'instrs (cons 'list (merge-instr lst))))
+
+(define (not src dst) (unary 'not src dst))
+(define (neg src dst) (unary 'neg src dst))
+
+(define (ret src)
+  (list (list 'mov src (list 'reg "eax"))
+        (list 'ret)))
+
+(define (unary op src dst)
+  (list (list 'mov src dst)
+        (list op dst)))