Call a function in a shared library: Difference between revisions

m (→‎{{header|REXX}}: added a comment about where the file REFUTIL.DLL should be.)
Line 24:
-- There are ready to use Win32 bindings. We don't want to use them here.
--
type HANDLE is new Unsigned_32; -- on MSWindows x64, replace by Unsigned_64 to make it work
function LoadLibrary (lpFileName : char_array) return HANDLE;
pragma Import (stdcall, LoadLibrary, "LoadLibrary", "_LoadLibraryA"); -- Ada95 does not have the @n suffix.
Anonymous user