![]() |
||
| Home | SwiftForth Archive | SwiftX Archive | |

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