1. Forum
  2. Usenet
  3. COMP.LANG.FORTH

  • Re: VALUE and TO implementation

    From albert@spenarnc.xs4all.nl@21:1/5 to minforth on Fri Aug 2 11:40:19 2024
    In article <1d5aac5e718a5ab8d983ec37aec32d81@www.novabbs.com>,
    minforth <minforth@gmx.net> wrote:
    On Thu, 1 Aug 2024 12:01:06 +0000, albert@spenarnc.xs4all.nl wrote:
    If I redefine a CONSTANT SIZE , I rather use the standard
    1,000,000,000 'SIZE >DFA !
    instead of using a VALUE.

    Variable constants should be in everyone's toolbox. :o)

    That must be of course "non-standard".
    Thanks.

    Groetjes Albert
    --
    Don't praise the day before the evening. One swallow doesn't make spring.
    You must not say "hey" before you have crossed the bridge. Don't sell the
    hide of the bear until you shot it. Better one bird in the hand than ten in
    the air. First gain is a cat purring. - the Wise from Antrim -

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From minforth@21:1/5 to All on Sat Aug 3 09:55:18 2024
    TO is not part of the CORE wordset, and the standard has no
    normative parts - only compliance requirements, which do not
    include TO. See standard section 5.

    So language lawyering seems rather insubstantial here.

    Don't nail your own foot to the floor...

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From mhx@21:1/5 to All on Sat Aug 3 10:49:48 2024
    FORTH> 0 value _v1 immediate ok
    FORTH> : test-to 1 to _v1 ; ok
    FORTH> see test-to
    Flags: TOKENIZE, ANSI
    : test-to 1 TO _v1 ; ok
    FORTH> : tt test-to _v1 . ; ok
    FORTH> see tt
    Flags: ANSI
    $01341640 : tt
    $0134164A mov $01341190 qword-offset, 1 d#
    $01341655 push $01341190 qword-offset
    $0134165B jmp .+10 ( $0124A102 ) offset NEAR
    FORTH> tt 1 ok
    FORTH>

    FWIW.

    -marcel

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)