suzanne.soy/whalesong
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

correcting spelling mistake in test case

Browse Source
This commit is contained in:
Danny Yoo 2011-08-08 11:34:49 -04:00
parent 7373649112
commit 8d54e85f14
2 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
js-assembler/fracture.rkt
View File

@ -38,7 +38,6 @@
(cons first-block-label (collect-general-jump-targets stmts))] (cons first-block-label (collect-general-jump-targets stmts))]
[entry-points : (Listof Symbol) [entry-points : (Listof Symbol)
(cons first-block-label (collect-entry-points stmts))]) (cons first-block-label (collect-entry-points stmts))])
(let: loop : (values (Listof BasicBlock) (Listof Symbol)) (let: loop : (values (Listof BasicBlock) (Listof Symbol))
([name : Symbol first-block-label] ([name : Symbol first-block-label]
[acc : (Listof UnlabeledStatement) '()] [acc : (Listof UnlabeledStatement) '()]

2
tests/test-assemble.rkt
View File

@ -235,7 +235,7 @@
'closureStart)) 'closureStart))
(make-PopEnvironment (make-Const 2) (make-Const 0)) (make-PopEnvironment (make-Const 2) (make-Const 0))
(make-AssignPrimOpStatement 'val (make-GetCompiledProcedureEntry)) (make-AssignPrimOpStatement 'val (make-GetCompiledProcedureEntry))
'thEnd) 'theEnd)
"typeof(MACHINE.val) + ',' + (MACHINE.val === MACHINE.proc.label)") "typeof(MACHINE.val) + ',' + (MACHINE.val === MACHINE.proc.label)")
"function,true") "function,true")