Можно ли вызывать Windows API из Форта?

Да, вы можете сделать это в Gforth в соответствии с его документацией. Самая большая проблема будет связана с обратными вызовами, на которые API Windows довольно сильно опирается. Для решения этой проблемы существует неподдерживаемый пакет, см. 5.25.6 Обратные вызовы. Я не пытался сделать это сам в Gforth, но документация выглядит адекватной.

Вы также можете проверить VFXForth компании MPE. С их сайта:

Доступ к API Windows

VFX Forth может получить доступ ко всем стандартным вызовам Windows API, а также к функциям любых других библиотек DLL. Функциональный интерфейс позволяет определять вызовы API путем копирования и вставки из справочных руководств по другим языкам, например:

EXTERN: int PASCAL CreateDialogIndirectParam( HINSTANCE, void *,HWND, WNDPROC, LPARAM );
EXTERN: int PASCAL SetWindowText( HANDLE, LPSTR );
EXTERN: HANDLE PASCAL GetDlgItem( HANDLE, int );

Это немного ниже по странице VFX Forth для Windows.

Поскольку я делаю свой Forth на Mac и Linux, я не могу работать с Windows для Gforth, чтобы предоставить более подробную информацию, извините.

В общем случае для реализации интерфейса сторонних функций (FFI) для динамически загружаемых библиотек в какой-либо системе Forth в качестве расширения (т.е. без изменения исходного кода и перекомпиляции) нам потребуются функции dlopen и dlsym, ассемблер Forth и глубокое знание языка Forth. -системная организация и ABI. Иногда это можно было сделать даже без ассемблера. Например, несмотря на то, что SP-Forth имеет FFI, иностранные звонки также были реализовано на чистом Форте в результате генерации собственного кода и объединение стека возврата с собственным аппаратным стеком.

Что касается Gforth, кажется, что в версии 0.7.9 (см. релизы) он не иметь стандартное соглашение о вызовах FFI для stdcall (оно поддерживает только cdecl), хотя у него есть dlopen и dlsym и ассемблер. Таким образом, должно быть возможно реализовать FFI для stdcall.

Gforth 0.7.9 предоставляет вызовы Windows API, сгенерированные Swig из заголовочных файлов Windows. Интерфейс C использует библиотеку-оболочку, которая компилируется компилятором C, для передачи параметров из стека Forth в системные функции; поскольку компилятор C понимает stdcall, а файлы заголовков объявляют Windows API как stdcall, это «просто работает».

Поскольку все предварительно сгенерированные привязки C находятся в каталоге «unix» (по историческим причинам), include unix/win32.fs дает вам часть Win32 API Windows.

Обратные вызовы в цикле событий по-прежнему являются проблемой, поскольку Gforth — это программа Cygwin, а Cygwin имеет свою специальную задачу цикла событий... но я надеюсь, что эту проблему можно решить.