Issues Running TPSScript on x64 in Lazarus 3.8

[lhl]

I'm using TPSScript, and the code below works correctly on x86. However, when I compile it in x64, it doesn't run. Does anyone know why? 
I'm using Lazarus 3.8 64x.

My Script:

Code: Pascal  [Select][+][-]

1. procedure fechar(Sender: TObject; var CloseAction: TCloseAction);
2. begin
3.    Showmessage( 'Vou fechar' );
4. end;
5.  
6. procedure exec;
7. var F: TForm;
8. begin
9.    F :=  TForm.Create(NIL);
10.    try
11.       F.OnClose := @fechar;
12.       F.ShowModal;
13.    finally
14.       F.Free;
15.    end;
16. end;