programming tools for Windows applications development
  Home  |   SwiftForth Archive  |   SwiftX Archive  |

Re: The word " : WHAT ( a n -- ) 0 HUH? ;"

From: Charles Melice <mail_at_forthcad.com>
Date: Mon, 10 Dec 2001 17:09:25 +0100

Jean-Pierre,

I don't anderstand fully the question. But I think it's
better to not modify DEFER and WHAT.

Simply, define a variable and use the fast @EXECUTE word.

With a nul variable, @EXECUTE do nothing. You can initialize
it with a word that will produce an error:

    : XT-ERREUR ( -- )
        TRUE ABORT" @EXECUTE with null variable" ;

    VARIABLE xt-exe ' XT-ERREUR xt-exe !

    : HELLO ( -- )
        ." HELLO" CR ;

    : TEST ( -- )
        ['] HELLO xt-exe ! \ initialise
        xt-exe @EXECUTE ; \ execute l'xt

A bientot,
CM

----- Original Message -----
From: "Schmitt Louis Jean-Pierre" <louis.schmitt_at_eif.ch>
To: <sftalk_at_forth.com>
Sent: Monday, December 10, 2001 2:51 PM
Subject: [sftalk] The word " : WHAT ( a n -- ) 0 HUH? ;"

>
>
> y suppose that a and n represent an counted string, or a =3D start addr=20
> and c =3D len in char's.
>
> Y needed for my d=E9velopement the following modification.
>
> DEFER (Getcomposant)
>
> VARIABLE Vtrace Vtrace OFF
>
> : WHAT ( addr,len --- ) \ Gestion des erreurs, addr,len pointe le mot non
> \ trouv=E9.
>
> Vtrace @
> IF \ Test si mode composant actif
> (Getcomposant) \ On regarde s'il y a requ=EAte=20
> ELSE \ sur un composant
> 0 HUH? \ Si pas le cas erreur
> THEN
>
> ;
>
> Y can not modify the word WHAT, bicause y have not found the metacompiler.
> Please y needed very help, bicause all my developement is based of the
> posibility to get an sofware component.
>
>
> Very very tank's for help
>
> Louis Jean-Pierre
>
>
> =20
> =09
> =20
> ----------------------------------------------------------------------
> sftalk_at_forth.com The SwiftForth programming discussion email list
> To unsubscribe, send subject "unsubscribe sftalk" to listar_at_forth.com
> For help with listar commands, send subject "help" to listar_at_forth.com
> Archives are located at http://www.forth.com/sftalk -- check them out!
> Search the archives! Visit http://www.forth.com/search for details.
>

----------------------------------------------------------------------
sftalk_at_forth.com The SwiftForth programming discussion email list
To unsubscribe, send subject "unsubscribe sftalk" to listar_at_forth.com
For help with listar commands, send subject "help" to listar_at_forth.com
Archives are located at http://www.forth.com/sftalk -- check them out!
Search the archives! Visit http://www.forth.com/search for details.
Received on Mon Dec 10 2001 - 08:04:28 PST

This archive was generated by hypermail 2.2.0 : Fri Nov 21 2008 - 03:04:20 PST