Units initialization/finalization support added

This commit is contained in:
2020-06-07 19:39:30 +03:00
parent 92d967d122
commit bf2e9bcc4b
9 changed files with 104 additions and 42 deletions

View File

@@ -8,10 +8,8 @@ var
Buffer: Pointer;
begin
ConsoleInit('Load File');
InitConsole('Load File', False);
Buffer := LoadFile('/sys/example.asm', FileSize);
WriteText(Buffer, FileSize);
ConsoleExit(False);
end.