From 0d69984338399a78a3ba6f3a2493f1ffb34964f8 Mon Sep 17 00:00:00 2001 From: bd Date: Sat, 4 Jan 2025 22:43:31 -0700 Subject: Modify parser to handle unary operators --- src/modules/generator/generator.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/modules/generator/generator.scm') diff --git a/src/modules/generator/generator.scm b/src/modules/generator/generator.scm index 53be252..4a36b92 100644 --- a/src/modules/generator/generator.scm +++ b/src/modules/generator/generator.scm @@ -16,7 +16,7 @@ (define (g-expr e) ;; for now, we assume only 'return'! - (list (make-instruction "movl" (string-append/shared "$" (number->string (expr-int e))) "%eax") + (list (make-instruction "movl" (string-append/shared "$" (number->string (const-int (expr-type e)))) "%eax") (make-instruction "ret" #f #f))) (define (g-id i) -- cgit v1.2.3