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.
