Anonymous user
Balanced brackets: Difference between revisions
→{{header|BBC BASIC}}
m (→{{header|Ada}}: Add argument to {{lines too long}}.) |
|||
Line 266:
DEFFNvalid(q$)
LOCAL x%,count%
IF LEN(q$)=0 THEN ="OK."
FOR x%=1 TO LEN(q$)
IF MID$(q$,x%,1)="[" THEN count%+=1 ELSE count%-=1
| |||