----------------------------------------------------------------------------------
@MSGID:
<124b1518-2bd4-4abc-8b85-7ba21348e06an@googlegroups.com> f6e00dab
@REPLY: 1@dont-email.me> bab01704
@REPLYADDR Hugh Aguilar <hughaguilar96@gmail.com>
@REPLYTO 2:5075/128 Hugh Aguilar
@CHRS: CP866 2
@RFC: 1 0
@RFC-References: 1@dont-email.me>
@RFC-Message-ID:
<124b1518-2bd4-4abc-8b85-7ba21348e06an@googlegroups.com>
@TZUTC: -0700
@PID: G2/1.0
@TID: FIDOGATE-5.12-ge4e8b94
On Thursday, September 28, 2023 at 2:41:38 AM UTC-7, Stephen Pelc wrote:
> VFX Forth 64 v5.42 is avalable for download.
>
> Changes are mainly to the selectable floating point pack system, which is now
> properly integrated with the EXTERN mechanism, callbacks, and locals.
>
> There is a new callback mechanism e.g. for Windows:
> DefCallProc: int WinProc2(
> HWND myhandle, UINT message, WPARAM wparam1, LPARAM lparam
> ):
> \\ hwnd msg wparam lparam -- int
> {: hwnd msg wparam lparam -- int :} \\ can use local variables
> case msg
> ...
> endcase
> ;
>
> When the callback WinProc2 is executed it returns the entry point needed by
> the operating system.
>
> Stephen
Lets not forget that Stephen Pelc sabotaged VFX to prevent
my novice package from compiling:
https://groups.google.com/g/comp.lang.forth/c/hp1MbSkew08/m/os5OYTOeBAAJ
On Thursday, February 23, 2023 at 5:53:49 AM UTC-7, Stephen Pelc wrote:
> On 19 Jan 2023 at 04:34:11 CET, "Hugh Aguilar" <
hughag...@gmail.com>
> wrote:
>
> > The bug is that this ANS-Forth compliant code causes VFX to crash:
> > ------------------------------------------
> > : lit, ( val -- ) \\ runtime: -- val
> > postpone literal ;
> > ------------------------------------------
>
> For the moment define LIT, as
>
> : lit, ( val -- ) \\ runtime: -- val
> postpone literal ; doNotSin
>
> An upcoming version of VFX may/will use a different fix and will not require
> DONOTSIN.
>
> Stephen
--- G2/1.0
* Origin: usenet.network (2:5075/128)
SEEN-BY: 5001/100 5005/49 5015/255 5019/40 5020/715
848 1042 4441 12000
SEEN-BY: 5030/49 1081 5058/104 5075/128
@PATH: 5075/128 5020/1042 4441