mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00
Code Activity

Remove unused macro in `tree-il.test'.

Browse source 
* test-suite/tests/tree-il.test (assert-scheme->glil): Remove.
This commit is contained in:
Ludovic Courtès 2011-09-09 00:41:48 +02:00
parent cf14f3011b
commit 73df2c3742
1 changed files with 0 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

9
test-suite/tests/tree-il.test
View file

@ -34,15 +34,6 @@
(post-order! (lambda (x) (set! (tree-il-src x) #f))
x))
(define-syntax assert-scheme->glil
(syntax-rules ()
((_ in out)
(let ((tree-il (strip-source
(compile 'in #:from 'scheme #:to 'tree-il))))
(pass-if 'in
(equal? (unparse-glil (compile tree-il #:from 'tree-il #:to 'glil))
'out))))))
(define-syntax assert-tree-il->glil
(syntax-rules (with-partial-evaluation without-partial-evaluation
with-options)