1. Finding quotes

I ran into this problem a while back and used a solution similar to this:

atom done, sp,cp,ep
done =3D 0

sp =3D find('\"',myseq)  -- find first quote
if sp =3D length(myseq) then done =3D 1 end if
cp=3Dsp
while not done do
  ep =3D find("\'",myseq[cp+1..length(myseq)])
  if ep < 1 then ep =3D 0 done =3D 1  -- error
  elsif myseq[cp+ep-1]!=3D'\' then ep =3D cp+ep done =3D 1=20
  else cp =3D cp + ep end if
end while

HTH,
Michael J. Sabal

new topic     » topic index » view message » categorize

Search



Quick Links

User menu

Not signed in.

Misc Menu