Rev 20 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 20 | Rev 16204 | ||
|---|---|---|---|
| Line 1... | Line -... | ||
| 1 | - | ||
| 2 | casecnt=!linecnt $allcases |
1 | casecnt=!linecnt $allcases |
| 3 | !bound gotocase between integer 1 and $casecnt-1 default 0 |
2 | !bound gotocase between integer 1 and $casecnt-1 default 0 |
| 4 | !if $gotocase=0 |
3 | !if $gotocase=0 |
| 5 | !exit |
4 | !exit |
| 6 | !endif |
5 | !endif |
| 7 | !reset newobject newObject |
6 | !reset newobject newObject |
| 8 | caseline=!line 1 of $allcases |
7 | caseline=!line 1 of $allcases |
| 9 | caseline=!translate internal $ $ to $\ |
8 | caseline=!translate internal $ $ to $\ |
| 10 | $ in $caseline |
9 | $ in $caseline |
| Line 14... | Line 13... | ||
| 14 | cases=!line 2 to -1 of $allcases |
13 | cases=!line 2 to -1 of $allcases |
| 15 | allcases=$caseline\ |
14 | allcases=$caseline\ |
| 16 | $cases |
15 | $cases |
| 17 | !read deduc/objects.get |
16 | !read deduc/objects.get |
| 18 | !read deduc/methreset erase |
17 | !read deduc/methreset erase |
| 19 | - | ||