'head is also the name of word used a lot by REBOL. Have a look at the
source for 'append, and you will see why.
If you have a look at my %HTML.r script on http://www.rebol.org, or from
http://openip.org, you'll see my early approach to writing a HTML dialect,
using a similar method.
Andrew Martin
Who's up bright and early downloading the Windows Platform SDK. It's only
taken all night so far! :-)
ICQ: 26227169
http://members.xoom.com/AndrewMartin/
-><-
----- Original Message -----
From: <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, 16 February 2000 4:46 AM
Subject: [REBOL] Dialecting...Stack Overflow ?!
> Hi ,
>
> I tried to learn about writing dialects. So I did the following code, to
begin with.
> I expected it to output the following:
>
> <HTML><HEAD><TITLE>Titel</TITLE></HEAD><BODY>Das ist ein Text
> !</BODY></HTML>
>
> but I got an error msg of type: stack overflow, though I had increased
stack to 3.000.000 Bytes.
>
> Here's my program:
>
>
> REBOL []
> ;definition part
> html: func [block1] [join "<HTML>" [block1 "</HTML>"]]
> head: func [block2] [join "<HEAD>" [block2 "</HEAD>"]]
> body: func [block3] [join "<BODY>" [block3 "</BODY>"]]
> title: func [block4] [join "<TITLE>" [block4 "</TITLE>"]]
> ;test part
> a: html
> [
> head
> [
> title "Titel"
> ]
> body
> [
> "Das ist ein Text !"
> ]
> ]
> print a
>
>
>
> <<myhtml.r>>
>