Find URI in text: Difference between revisions
Content added Content deleted
m (→{{header|Icon}} and {{header|Unicon}}: tweak comment) |
|||
Line 121: | Line 121: | ||
procedure arbcp(cs,pr,n) #: match arbitrary numbers of (cset|proc,n) |
procedure arbcp(cs,pr,n) #: match arbitrary numbers of (cset|proc,n) |
||
local p,i |
local p,i |
||
/n := 0 |
/n := 0 # for 0* / 1* |
||
runerr(0 > n,205) |
runerr(0 > n,205) |
||
p := &pos |
p := &pos |
||
Line 132: | Line 132: | ||
procedure arbsp(st,pr,n) #: match arbitrary numbers of (string || proc,n) |
procedure arbsp(st,pr,n) #: match arbitrary numbers of (string || proc,n) |
||
local p,i |
local p,i |
||
/n := 0 |
/n := 0 # for 0* / 1* |
||
runerr(0 > n,205) |
runerr(0 > n,205) |
||
p := &pos |
p := &pos |