Find URI in text: Difference between revisions

Content added Content deleted
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