Rev 1846 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 1846 | Rev 1848 | ||
|---|---|---|---|
| Line 820... | Line 820... | ||
| 820 | i-=count; |
820 | i-=count; |
| 821 | IF(i>0)loop(i)OP(byte 0); |
821 | IF(i>0)loop(i)OP(byte 0); |
| 822 | } |
822 | } |
| 823 | else IF(tok==tk_from){ |
823 | else IF(tok==tk_from){ |
| 824 | NextTok(); |
824 | NextTok(); |
| 825 | SHOW("count = DoFrom(1);\n"); |
825 | WRITESTR("count = DoFrom(1);\n"); |
| 826 | i=size*elements; |
826 | i=size*elements; |
| 827 | i-=count; |
827 | i-=count; |
| 828 | loop(i)OP(byte 0); |
828 | loop(i)OP(byte 0); |
| 829 | NextTok(); |
829 | NextTok(); |
| 830 | } |
830 | } |
| 831 | else IF(tok==tk_extract){ |
831 | else IF(tok==tk_extract){ |
| 832 | NextTok(); |
832 | NextTok(); |
| 833 | SHOW("count = DoExtract(1);\n"); |
833 | WRITESTR("count = DoExtract(1);\n"); |
| 834 | i=size*elements; |
834 | i=size*elements; |
| 835 | i-=count; |
835 | i-=count; |
| 836 | loop(i)OP(byte 0); |
836 | loop(i)OP(byte 0); |
| 837 | } |
837 | } |
| 838 | else if(tok==tk_openbrace){ // varname={...}; |
838 | else if(tok==tk_openbrace){ // varname={...}; |