First guess is because you are redefining the Parse function and then
calling it recursively.

Cheers,

Allen K

----- Original Message -----
From: "Jose (jm)" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Saturday, March 09, 2002 11:34 PM
Subject: [REBOL] parse stack overflow


> Can anybody give me any hints why this small script causes stack overflow
?
>
> thanks
> Jose
>
> REBOL []
>
> txt-parser: make object! [
>
>     text: make string! 30000
>
>     html-code: [
>
>         ["<" thru ">"] |
>
>         copy txt to "<" (append text txt)
>
>     ]
>
>     parse: func [source [string!]] [
>
>         clear text
>
>         parse source [to "<" some html-code ]
>
>         text
>
>     ]
>
> ]
>
>
> ;===========================================
>
> page: read %dummy.html
>
> result: make string! 0
>
>
> result: txt-parser/parse page
>
> print result
>
>
>
>
>
> _________________________________________________________________
> Send and receive Hotmail on your mobile device: http://mobile.msn.com
>
> --
> To unsubscribe from this list, please send an email to
> [EMAIL PROTECTED] with "unsubscribe" in the
> subject, without the quotes.
>
>

-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.

Reply via email to