Re: Request for code clarification

--nextPart13450061.8bMQJbFj6T
Content-Transfer-Encoding: quoted-printable
Content-Type: text/plain; charset="utf-8"; protected-headers="v1"
From: Bernd Paysan <[email protected]>
To: gforth-mXXj517/[email protected]
Cc: dave selby <[email protected]>
Subject: Re: Request for code clarification
Date: Thu, 21 Nov 2024 23:18:06 +0100
Message-ID: <3159012.IDvDuAF1LB@wukong>
MIME-Version: 1.0

Am Donnerstag, 21. November 2024, 23:05:28 Mitteleurop=C3=A4ische Normalzei=
t=20
schrieb dave selby:
> Hello
>=20
> Not sure if this is the correct forum to ask but there is a bit of code I
> don't understand. I am looking to define (( .. )) and was looking at ( )
> code, it all makes sense except for the first line
>=20
> loadfile @ 0=3D IF postpone (  EXIT  THEN
>=20
> Why would you postpone an earlier definition of ( if you are on the comma=
nd
> line and not compiling ?

The line before starts with

: (

starting a definition, and you are compiling at that next line.

You can paste the definition line by line, and the prompt will tell you whe=
n=20
you are compiling:

: ( ( compilation 'ccc<close-paren>' -- ; run-time -- ) \ core,file     par=
en =20
compiled
    loadfile @ 0=3D IF  postpone (  EXIT  THEN  compiled
    BEGIN  compiled
        >in @  compiled
        ')' parse nip  compiled


=2D-=20
Bernd Paysan
"If you want it done right, you have to do it yourself"
net2o id: kQusJzA;7*?t=3Duy@X}1GWr!+0qqp_Cn176t4(dQ*
https://net2o.de/

--nextPart13450061.8bMQJbFj6T
Content-Type: application/pgp-signature; name="signature.asc"
Content-Description: This is a digitally signed message part.
Content-Transfer-Encoding: 7Bit

-----BEGIN PGP SIGNATURE-----

iQIzBAABCAAdFiEERJ1NDqPQRwYnwBjr9y2Uk5MtoGcFAmc/sZ4ACgkQ9y2Uk5Mt
oGd6aQ//TDSz+ix1/8qIwPccTwo9I9l4qDSh5zok+JM4KxyQ2hwJh08pkakOR4g1
UWjt3owW2EcsN4a+JWFC8rrYoBrqADqyXxbg1nMQkyBAh3nqh17qeUYp1QX61XOD
oGuoInZEM3WZDY2GWVUREyBhmonXO+jCCnJ/tGjEIlG6Uy8rVyPDqZfq0aSIS/zg
cNHkRjVLjcXG1XNvE00A84eprFVeVNDRTvyfpsrNwoUywLSTzutpC8M94vp4Ha7P
RyDvGwmzwAhedDQh3ydqxA8iO3YscSNeCvq0/yOTzO3DOdxDyQ386gXjsF2i9AhJ
ETQIDIvn2t4MOb6TR4FZV0SzHZ0+mIPDwvnvEFcIspfe5i9NDeZg2S9xGTa3cIQF
BAy224gzp39JjPRO5DtpGYCuTzZHoFLq90elrLm2LYyO7actvdzBsm9DSjSZC4ov
y+GN1ENVfb8cCfAVLIqb7WW5h9kwDix8962dt7inbuAuotZSmiQbGVQYdzny2xTS
zaFqWrLKvgkdshNI7Q6aiWHfsgQFuUigblyKDXCy7gbHsU4BHD9jdtSTMfCyCa3y
ircHCSBVwzz1oUEfzgWvxtEKJUK/BWPuoGeZqvjbQyoMkyaP95q4aeDu7aH5lT0D
OqWiE9XZkqP69NhKP8zcfD1Si4eeN3HGrcEevT4aJQfmRxSHNHI=
=zLRa
-----END PGP SIGNATURE-----

--nextPart13450061.8bMQJbFj6T--