--- a/BCompiler.st Thu Aug 10 20:13:01 1995 +0200
+++ b/BCompiler.st Fri Aug 11 18:04:27 1995 +0200
@@ -26,7 +26,7 @@
COPYRIGHT (c) 1989 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libcomp/Attic/BCompiler.st,v 1.29 1995-08-10 18:11:01 claus Exp $
+$Header: /cvs/stx/stx/libcomp/Attic/BCompiler.st,v 1.30 1995-08-11 16:02:38 claus Exp $
'!
!ByteCodeCompiler class methodsFor:'documentation'!
@@ -47,8 +47,7 @@
version
"
-$Header: /cvs/stx/stx/libcomp/Attic/BCompiler.st,v 1.29 1995-08-10 18:11:01 claus Exp $
-$Revision: 1.29 $
+$Header: /cvs/stx/stx/libcomp/Attic/BCompiler.st,v 1.30 1995-08-11 16:02:38 claus Exp $
"
!
@@ -1394,6 +1393,15 @@
(aSymbol == #storeInstVar9) ifTrue:[stackDelta := -1. ^118].
(aSymbol == #storeInstVar10) ifTrue:[stackDelta := -1. ^119].
+ (aSymbol == #pushLit1) ifTrue:[stackDelta := 1. ^ 222].
+ (aSymbol == #pushLit2) ifTrue:[stackDelta := 1. ^ 223].
+ (aSymbol == #pushLit3) ifTrue:[stackDelta := 1. ^ 224].
+ (aSymbol == #pushLit4) ifTrue:[stackDelta := 1. ^ 225].
+ (aSymbol == #pushLit5) ifTrue:[stackDelta := 1. ^ 226].
+ (aSymbol == #pushLit6) ifTrue:[stackDelta := 1. ^ 227].
+ (aSymbol == #pushLit7) ifTrue:[stackDelta := 1. ^ 228].
+ (aSymbol == #pushLit8) ifTrue:[stackDelta := 1. ^ 229].
+
(aSymbol == #retMethodVar1) ifTrue:[^160].
(aSymbol == #retMethodVar2) ifTrue:[^161].
(aSymbol == #retMethodVar3) ifTrue:[^162].
@@ -1460,6 +1468,8 @@
(aSymbol == #mk0Block) ifTrue:[^ 156].
(aSymbol == #mkNilBlock) ifTrue:[^ 157].
+ (aSymbol == #gt0) ifTrue:[lineno := true. self addLiteral:#>. ^ 212].
+
(aSymbol == #falseJumpabs) ifTrue:[stackDelta := -1. extra := #absoffset. ^ 190].
(aSymbol == #trueJumpabs) ifTrue:[stackDelta := -1. extra := #absoffset. ^ 191].
(aSymbol == #nilJumpabs) ifTrue:[stackDelta := -1. extra := #absoffset. ^ 192].