fixed some recently introduced compilation errors in the standard library

This commit is contained in:
Zahary Karadjov
2011-12-13 22:49:06 +02:00
parent f19c1c0f6e
commit 841d6b6aa9
3 changed files with 3 additions and 3 deletions

View File

@@ -15,7 +15,7 @@
## to release its locks should it be part of a deadlock. This thread then
## re-acquires its locks and proceeds.
include "lib/system/syslocks"
include "system/syslocks"
type
TLock* = TSysLock ## Nimrod lock; whether this is re-entrant

View File

@@ -105,7 +105,7 @@ proc ShellAbout*(HWND: hWnd, szApp: LPCSTR, szOtherStuff: LPCSTR, HICON: hIcon):
stdcall, dynlib: "shell32.dll", importc: "ShellAboutA".}
proc ShellAbout*(HWND: hWnd, szApp: LPCWSTR, szOtherStuff: LPCWSTR, HICON: hIcon): int32{.
stdcall, dynlib: "shell32.dll", importc: "ShellAboutW".}
proc DuplicateIcon*(hinst: HINST, HICON: hIcon): HIcon{.stdcall,
proc DuplicateIcon*(inst: HINST, icon: HICON): HIcon{.stdcall,
dynlib: "shell32.dll", importc: "DuplicateIcon".}
proc ExtractAssociatedIconA*(hInst: HINST, lpIconPath: LPSTR, lpiIcon: LPWORD): HICON{.
stdcall, dynlib: "shell32.dll", importc: "ExtractAssociatedIconA".}

View File

@@ -1,6 +1,6 @@
const
myRes = slurp"readme.txt"
myRes = slurp"../../readme.txt"
echo myRes