Forum > FPC development
TDeque issue on MacOS Arm M1
AlexTP:
I cannot reproduce this in the CudaText because I don't support such OLD versions! In app 1.152, the code is changed (and no error)
--- Code: Pascal [+][-]window.onload = function(){var x1 = document.getElementById("main_content_section"); if (x1) { var x = document.getElementsByClassName("geshi");for (var i = 0; i < x.length; i++) { x[i].style.maxHeight='none'; x[i].style.height = Math.min(x[i].clientHeight+15,306)+'px'; x[i].style.resize = "vertical";}};} ---initialization // proc_globdata.pas AppConsoleQueue:= TAppConsoleQueue.Create; finalization FreeAndNil(AppConsoleQueue);
powerpcer:
--- Quote from: Alextp on December 13, 2021, 10:36:38 pm ---I cannot reproduce this in the CudaText because I don't support such OLD versions! In app 1.152, the code is changed (and no error)
--- Code: Pascal [+][-]window.onload = function(){var x1 = document.getElementById("main_content_section"); if (x1) { var x = document.getElementsByClassName("geshi");for (var i = 0; i < x.length; i++) { x[i].style.maxHeight='none'; x[i].style.height = Math.min(x[i].clientHeight+15,306)+'px'; x[i].style.resize = "vertical";}};} ---initialization // proc_globdata.pas AppConsoleQueue:= TAppConsoleQueue.Create; finalization FreeAndNil(AppConsoleQueue);
--- End quote ---
because FConsoleQueue:= TAppConsoleQueue.Create; was created in FormCreate of FormMain
so, that's why FreeAndNil(FConsoleQueue); not explode, . but same time, i build it in x86 MacOS is working correctly.
AlexTP:
So we don't have a repro project / repro in my editor.
powerpcer:
--- Quote from: Alextp on December 14, 2021, 12:55:28 am ---So we don't have a repro project / repro in my editor.
--- End quote ---
Exception: EXC_BAD_ACCESS
Reproduce, just make an Application with a Form with code below, very simple
--- Code: Pascal [+][-]window.onload = function(){var x1 = document.getElementById("main_content_section"); if (x1) { var x = document.getElementsByClassName("geshi");for (var i = 0; i < x.length; i++) { x[i].style.maxHeight='none'; x[i].style.height = Math.min(x[i].clientHeight+15,306)+'px'; x[i].style.resize = "vertical";}};} ---unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils, Forms, Controls, Graphics, Dialogs,gqueue; type TAppConsoleQueue = specialize Tqueue<string>; { TForm1 } TForm1 = class(TForm) procedure FormCreate(Sender: TObject); procedure FormDestroy(Sender: TObject); private FConsoleQueue:TAppConsoleQueue; public end; var Form1: TForm1; implementation {$R *.lfm} { TForm1 } procedure TForm1.FormCreate(Sender: TObject);begin FConsoleQueue:=TAppConsoleQueue.Create;end; procedure TForm1.FormDestroy(Sender: TObject);begin FreeAndNil(FConsoleQueue);end; end.
PascalDragon:
--- Quote from: powerpcer on December 14, 2021, 02:26:14 am ---
--- Quote from: Alextp on December 14, 2021, 12:55:28 am ---So we don't have a repro project / repro in my editor.
--- End quote ---
Exception: EXC_BAD_ACCESS
Reproduce, just make an Application with a Form with code below, very simple
--- End quote ---
This is not a complete example. Either provide one that doesn't depend on the LCL or use the publish project option to provide the complete project.
Navigation
[0] Message Index
[#] Next page
[*] Previous page