@@ 382,6 382,7 @@ JMP2r
@tokenlen "Token-length $1 ( token is longer than 24 characters )
@combine "Combine $1 ( sequences of two literal bytes )
@uncalled "Uncalled $1 ( using JSR when could be calling )
+@optimize "Optimize $1 ( bad design )
@inc "INC $1 @inc2 "INC2 $1
@inc-twice "INC 20 "INC $1
@@ 456,7 457,10 @@ JMP2r
@|rules )
@rules2
-
+ "STH $1 "STH $1 =optimize
+ "STH2 $1 "STH2 $1 =optimize
+ "STHr $1 "STHr $1 =optimize
+ "STH2r $1 "STH2r $1 =optimize
"STH $1 "STHr $1 =redundance
"STH2 $1 "STH2r $1 =redundance
"STHr $1 "STH $1 =redundance