while resolve 'equals' as a fake call do not throw away temporary trace

2013-12-05 19:53:33 +04:00
parent 499783fbc6
commit 41f2fcbb40
7 changed files with 20 additions and 45 deletions
@@ -18,7 +18,7 @@ L0:
    mark(toLong())
    r(0)
    call(toLong, toLong)
-    call(x == 0.toLong(), equals)
+    call(==, equals)
    jf(L2)                                                                  NEXT:[read (Unit), r(sum)]
    r(sum)
    ret(*) L1                                                               NEXT:[<END>]