unit GameInitialize;
{$mode objfpc}{$H+}
{$ifndef ANDROID}{$fatal Android-only architecture probe; there is no desktop target}{$endif}
interface
implementation
uses CastleWindow, GameViewMain;
var Window: TCastleWindow;
procedure Initialize;
begin
  Window.Container.View := TProbeView.Create(Application);
end;
initialization
  Application.OnInitialize := @Initialize;
  Window := TCastleWindow.Create(Application);
  Application.MainWindow := Window;
end.