optimize for(0..100)

1  <0> enter
2  <;> nextstate(main 2 -e:1) v
3  <0> pushmark s
4  <$> const[IV 0] s
5  <$> const[IV 100] s
6  <#> gv[*_] s
7  <{> enteriter(next->9 last->c redo->8) lKS
a  <0> iter s
b  <|> and(other->8) vK/1
8      <0> stub v
9      <0> unstack v
           goto a
c  <2> leaveloop vK/2
d  <@> leave[1 ref] vKP/REFC
-e syntax OK