Mark that LCL+Carbon not supported

castle-engine · Sep 3, 2024 · 71fe404 · 71fe404
1 parent 343b1fb
commit 71fe404
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 2 deletions.
diff --git a/code/v3dsceneraytrace.pas b/code/v3dsceneraytrace.pas
@@ -302,7 +302,8 @@ procedure RaytraceToWin(
       twice on Ctrl+R, since we rebuild the menu inside the menu handler).
       For now, just handle Escape and CtrlS specially on Mac OS X. }
     {$ifdef LCLCarbon}
-    Window.OnPress := @PressWorking;
+    {$fatal Compilation for LCL+Carbon is not supported now, since it's not tested.}
+    //Window.OnPress := @PressWorking; // this will not compile with latest CGE
     {$else}
     Window.MainMenu := MainMenuWorking;
     Window.OnMenuClick := @MenuClick;
@@ -364,7 +365,8 @@ procedure RaytraceToWin(
       Window.Invalidate;
       Window.Caption := 'castle-model-viewer - Ray Tracing - done';
       {$ifdef LCLCarbon}
-      Window.OnPress := @PressDone;
+      {$fatal Compilation for LCL+Carbon is not supported now, since it's not tested.}
+      //Window.OnPress := @PressDone;
       {$else}
       Window.MainMenu := MainMenuDone;
       {$endif}

diff --git a/code/v3dsceneshadows.pas b/code/v3dsceneshadows.pas
@@ -38,6 +38,7 @@ interface
   TV3DShadowsViewport = class(TMyViewport)
   protected
     procedure RenderOnePass(const Params: TRenderParams
+      {.$define CGE_NEW_ONE_PASS_RENDERING}
       {$ifdef CGE_NEW_ONE_PASS_RENDERING} ;
       const UsingBlending: Boolean;
       const FilterShadowVolumesReceivers: TBooleanSet