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) \ Create an defered word name (Getcomposant)
VARIABLE Vtrace Vtrace OFF

: WHAT ( addr,len --- ) \ Error handling, addr,len represent an counted
        \ string

        Vtrace @
                        IF \ Test if Vevtor mode is active (Getcomposant) \ is active
then go to (Getcomposant). \ (Getcomposant) is connected later of
the \ component Handler
                        ELSE \ Is not active then normal error handling
                                0 HUH? \=20
                        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 via component Handler

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.
Received on Mon Dec 10 2001 - 09:03:54 PST