KolibriOS/oberon-07-compiler
16
0 Fork 0
mirror of https://github.com/AntKrotov/oberon-07-compiler.git synced 2026-10-05 09:45:47 +00:00
Code Issues Packages Projects Releases Wiki Activity

Add files via upload

Browse Source
This commit is contained in:
AntKrotov authored and GitHub committed 2019-02-23 18:08:31 +03:00
1 parent 415e41a922
commit 423f3c9947
2 files changed
+8 -8
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

lib/Windows64/In.ob07
+6 -6
View File
@@ -26,12 +26,12 @@ TYPE
VAR
Done*: BOOLEAN;
hConsoleInput: INTEGER;
PROCEDURE [win64, "kernel32.dll", "GetStdHandle"]
GetStdHandle (nStdHandle: INTEGER): INTEGER;
PROCEDURE [win64, "kernel32.dll", "ReadConsoleA"]
hConsoleInput: INTEGER;
PROCEDURE [windows-, "kernel32.dll", "GetStdHandle"]
GetStdHandle (nStdHandle: INTEGER): INTEGER;
PROCEDURE [windows-, "kernel32.dll", "ReadConsoleA"]
ReadConsole (hConsoleInput, lpBuffer, nNumberOfCharsToRead, lpNumberOfCharsRead, lpReserved: INTEGER): INTEGER;
PROCEDURE digit(ch: CHAR): BOOLEAN;
lib/Windows64/Out.ob07
+2 -2
View File
@@ -43,10 +43,10 @@ VAR
Realp: PROCEDURE (x: REAL; width: INTEGER);
PROCEDURE [win64, "kernel32.dll", "GetStdHandle"]
PROCEDURE [windows-, "kernel32.dll", "GetStdHandle"]
GetStdHandle (nStdHandle: INTEGER): INTEGER;
PROCEDURE [win64, "kernel32.dll", "WriteFile"]
PROCEDURE [windows-, "kernel32.dll", "WriteFile"]
WriteFile (hFile, Buffer, nNumberOfBytesToRead, lpNumberOfBytesRead: INTEGER; lpOverlapped: POverlapped): INTEGER;