Skip to content

Commit

Permalink
Merge pull request #40 from amyqcs/main
Browse files Browse the repository at this point in the history
  • Loading branch information
robertylewis authored Dec 5, 2024
2 parents 4cb29fc + 2294657 commit 76984c5
Show file tree
Hide file tree
Showing 3 changed files with 8 additions and 0 deletions.
2 changes: 2 additions & 0 deletions benchmarks/aqiao-const-prop-add.lisp
Original file line number Diff line number Diff line change
@@ -0,0 +1,2 @@
(define (f x) (add1 (add1 (+ 1 x))))
(print (f 1257))
3 changes: 3 additions & 0 deletions benchmarks/aqiao-const-prop-if-st.lisp
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
(define (f bool) (let ((x bool)) (if x (+ 1 (+ 2 (+ 3 (+ 4 (add1 5))))) false)))

(print (f true))
3 changes: 3 additions & 0 deletions benchmarks/aqiao-inline-nested.lisp
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
(define (f a) (let ((x a)) (let ((y 6)) (let ((z (add1 7))) (print (+ x (+ y z)))))))

(print (f 5))

0 comments on commit 76984c5

Please sign in to comment.