Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > comp.lang.forth > #26558

Re: Hacker News Forth link

Show all headers | View raw

On 2013-10-15, Albert van der Horst <albert@spenarnc.xs4all.nl> wrote:

> Lately I'm catering to those who want to have more of it in Forth, not
> just defined in assembly like
>
>     header  SIGN,   docol, SIGN+5*cw, 0, lastlink, "SIGN"
>         dd      zero_less
>         ifto  SIGN1
>           dd      LIT, '-'
>           dd      HOLD
> SIGN1:  dd      EXIT
>
> The source ends in
>
> initdp:  end - start
> start:
>  ...
>  db ":  POSTPONE    NAME PRESENT DUP 0= 15 ?ERROR " , 0x0a
>  db "   DUP >FFA @ 4 AND 0= IF 'LIT ,   ,  ', THEN , ; IMMEDIATE " , 0x0a
>  db ": FORGET   POSTPONE ' >R 'FORTH >BODY DUP "     , 0x0a
>  db "BEGIN >LFA @ DUP R@ < UNTIL   SWAP >LFA ! R> >NFA @ DP ! ; ",0x0a
> end:
> which costs a ``  HERE $@ EVALUATE '' at startup.
>

This is very nice and seems to be heading to a self-hosted Forth. I wonder
if some of it can be done by defining macros in fasm? The only problem might
be the symbols such as $ @ ? etc. I don't know if you can use them for fasm
macro names. 

> So high level words that are not needed in the kernel as such, can be
> defined here.

That's really a nicer approach.

> This is better IMO then having a separate Forth source, but Jones doesn't
> like it, because of the clutter around the text.
> (Maybe that can be fixed, I'm looking into it. For me the advantage of having
> it all together weighs heavy. I managed once to combine a jonesforth.s
> with the wrong jonesforth.f. And having to say
> cat jonesforth.f - | ./jonesforth
> is inconvenient, to say the least, as well as puzzling to those non-fluent in
> Unix.)

Yes!

I checked your git link a few months ago. I didn't see that you had any
diagrams in the code. I really liked the ones in jonesforth. Are you
planning to include diagrams? I find them very helpful.

Bill

Back to comp.lang.forth | Previous | Next — Previous in thread | Next in thread | Find similar | Unroll thread

Thread

Hacker News Forth link steve <jsgrahamus@yahoo.com> - 2013-10-14 16:49 +0000
  Re: Hacker News Forth link "Clyde W. Phillips Jr." <cwpjr02@gmail.com> - 2013-10-14 17:22 -0700
  Re: Hacker News Forth link Christian Kellermann <ckeen@pestilenz.org> - 2013-10-15 08:27 +0200
    Re: Hacker News Forth link albert@spenarnc.xs4all.nl (Albert van der Horst) - 2013-10-15 12:23 +0000
      Re: Hacker News Forth link Christian Kellermann <ckeen@pestilenz.org> - 2013-10-15 14:34 +0200
        Re: Hacker News Forth link albert@spenarnc.xs4all.nl (Albert van der Horst) - 2013-10-15 15:51 +0000
          Re: Hacker News Forth link Bill Richards <billrich@gmx.com> - 2013-10-15 16:01 +0000
            Re: Hacker News Forth link albert@spenarnc.xs4all.nl (Albert van der Horst) - 2013-10-15 16:38 +0000
              Re: Hacker News Forth link Bill Richards <billrich@gmx.com> - 2013-10-15 16:47 +0000

csiph-web