recursion error

[ernie]

Using Liberty Basic Pro v. 4.51 the code below results in an endless loop:

a$ = "2 packs cigarettes"

b$ = replstr$(a$, "packs", "packs of")
print b$

[tenochtitlanuk]

It also throws the debugger.... try single-stepping through it.

[pierre]

The new string must not contain exactly the same word as the old string.

Replacing "packs" with "packs of"' does not work.

But "PACKS of" works fine, and so does "packets of".

EDIT:

the solution was already published on this forum, by sarossell I believe.

You have to use an intermediate variable, for example as follows:

a$ = "2 packs cigarettes"
old$ = "packs"
new$ = "packs of"
print strRep$(a$, old$, new$)

function strRep$(a$,old$,new$)
dummy$ = chr$(0)
strRep$ = replstr$(replstr$(a$,old$,dummy$),dummy$,new$)
end function

pierre

[Brandon Parker]

I believe this is actually a bug in the replstr$() function implementation. Here's that thread if you are interested...

REPLSTR$ doesn't like a single quote

{:0)

Brandon Parker

[ernie]

Thanks Brandon.