Here's a more up to date version of 'RSP with the 'Hide function:

Hide: func [Block [block!]] [
    do Block
    return    ; Deliberately returns unset! value.
    ]

RSP: function [Text [string!]] [Open Close RSP Script String] [
    Open: "<%" Close: "%>"
    RSP: make string! length? Text
    parse/all Text [
        any [
            end break
            | Open copy Script to Close Close (append RSP Script)
            | copy String [to Open | to end] (append RSP mold String)
            ]
        ]
    form replace/all reduce load RSP unset! ""
    ]

'Hide really deserves a better name. Any one got a better name?

Andrew Martin
ICQ: 26227169 http://valley.150m.com/
-><-

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

Reply via email to