[REBOL] parse stack overflow
From: jmalv::hotmail::com at: 9-Mar-2002 14:34
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
