Subversion Repositories wimsdev

Rev

Rev 6563 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6563 Rev 14898
Line 5... Line 5...
5 
$ to ; in $formula
 5 
$ to ; in $formula
6 
rows=!linecnt $formula
 6 
rows=!linecnt $formula
7 
l1=!line 1 of $formula
 7 
l1=!line 1 of $formula
8 
cols=!itemcnt $l1
 8 
cols=!itemcnt $l1
9 
!if $cols=0 or $rows=0
 9 
!if $cols=0 or $rows=0
10 
 error=bad_formula
 10 
  error=bad_formula
11 
 !exit
 11 
  !exit
12 
!endif
 12 
!endif
13 
 
 13