removing call to optimize-basic-blocks
This commit is contained in:
parent
4dbabb820f
commit
4c541b006c
|
@ -44,9 +44,8 @@
|
||||||
(fprintf op "var RUNTIME = plt.runtime;\n")
|
(fprintf op "var RUNTIME = plt.runtime;\n")
|
||||||
|
|
||||||
(define-values (basic-blocks entry-points) (fracture stmts))
|
(define-values (basic-blocks entry-points) (fracture stmts))
|
||||||
(define optimized-basic-blocks (optimize-basic-blocks basic-blocks))
|
|
||||||
|
|
||||||
(write-blocks optimized-basic-blocks (list->set entry-points) op)
|
(write-blocks basic-blocks (list->set entry-points) op)
|
||||||
|
|
||||||
(write-linked-label-attributes stmts op)
|
(write-linked-label-attributes stmts op)
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user