Борьба с Багом FPC в Windows 10 64-бит: Поиск Решения с Использованием SDL2

Delphi , Синтаксис , Ошибки и Исключения

В последние годы Free Pascal Compiler (FPC) стал популярным выбором для разработки программ на языке Pascal, особенно для разработки игр и графических приложений с использованием библиотеки SDL2. Однако, пользователи FPC на Windows 10 64-бит сталкиваются с известной проблемой: при попытке создать окно с использованием SDL2 возникает ошибка времени выполнения 216. В этой статье мы рассмотрим эту проблему и предложим несколько решений, включая использование Object Pascal (Delphi) для разработки приложений с SDL2.

Что Такое Ошибка Времени Выполнения 216?

Ошибка времени выполнения 216 возникает при попытке создать окно с использованием библиотеки SDL2 в FPC на Windows 10 64-бит. Ошибка обычно связана с проблемами настройки исключений для числовых операций, таких как деление на ноль, переполнение и другие. В некоторых случаях это может быть связано с библиотекой OpenGL или другими системными библиотеками.

Пример Минимального Повторяющегося Кода

Для начала давайте рассмотрим минимальный пример кода, который вызывает эту ошибку:

program Test1;

uses
  SDL2;

var
  window: PSDL_Window;

begin
  if SDL_Init(SDL_INIT_VIDEO) < 0 then
  begin
    WriteLn('Error initializing SDL: ', SDL_GetError);
    Halt;
  end;

  window := SDL_CreateWindow('First program', SDL_WINDOWPOS_CENTERED, SDL_WINDOWPOS_CENTERED, 800, 600, SDL_WINDOW_OPENGL);
  if window = nil then
  begin
    WriteLn('Error creating window: ', SDL_GetError);
    SDL_Quit;
    Halt;
  end;

  SDL_DestroyWindow(window);
  SDL_Quit;
end.

Диагностика Проблемы

Чтобы понять причину ошибки, давайте включим отладочную информацию и попробуем собрать программу с отключенными исключениями для числовых операций.

fpc -gw2 -gl Test1.pas -Fl/opt/local/lib

Затем запустим программу и используем отладчик для получения информации о стеке вызовов:

lldb Test1
(lldb) run

В стеке вызовов мы можем увидеть, что ошибка происходит в библиотеке AppKit, что указывает на проблему с настройкой исключений для числовых операций. В частности, ошибка возникает из-за того, что FPC по умолчанию не поддерживает все возможные исключения, которые могут возникнуть при работе с библиотеками SDL2 и OpenGL.

Решение Проблемы

Для решения этой проблемы можно использовать функцию SetExceptionMask из модуля math. Мы можем включить все возможные исключения, чтобы избежать ошибки времени выполнения 216.

program Test1;

uses
  SDL2, math;

var
  window: PSDL_Window;
  OldMask, NewMask: TFPUExceptionMask;

begin
  OldMask := GetExceptionMask;
  NewMask := OldMask;
  Include(NewMask, exInvalidOp);
  Include(NewMask, exZeroDivide);
  Include(NewMask, exDenormalized);
  Include(NewMask, exOverflow);
  Include(NewMask, exUnderflow);
  Include(NewMask, exPrecision);
  SetExceptionMask(NewMask);

  if SDL_Init(SDL_INIT_VIDEO) < 0 then
  begin
    WriteLn('Error initializing SDL: ', SDL_GetError);
    Halt;
  end;

  window := SDL_CreateWindow('First program', SDL_WINDOWPOS_CENTERED, SDL_WINDOWPOS_CENTERED, 800, 600, SDL_WINDOW_OPENGL);
  if window = nil then
  begin
    WriteLn('Error creating window: ', SDL_GetError);
    SDL_Quit;
    Halt;
  end;

  SetExceptionMask(OldMask);
  SDL_DestroyWindow(window);
  SDL_Quit;
end.

Альтернативное Решение

Если вы используете FPC на macOS ARM, вы можете столкнуться с другой проблемой, связанной с библиотекой OpenGL. В этом случае можно попробовать использовать альтернативную библиотеку OpenGL, например, ZenGL. Также можно попробовать использовать библиотеку SDL2 с другими настройками исключений.

Заключение

Ошибка времени выполнения 216 в FPC на Windows 10 64-бит и macOS ARM может быть вызвана проблемами с настройкой исключений для числовых операций. Для решения этой проблемы можно использовать функцию SetExceptionMask из модуля math, чтобы включить все возможные исключения. Также можно попробовать использовать альтернативные библиотеки OpenGL или другие настройки исключений.

Создано по материалам из источника по ссылке.

Контекст описывает проблему ошибки времени выполнения 216 при использовании Free Pascal Compiler с библиотекой SDL2 на разных операционных системах и предлагает решения, включая настройку исключений для числовых операций и использование альтернативных би

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Ошибки и Исключения ::