From 795afb0021094d069b5f77d4b7ba6c9e5fc5d803 Mon Sep 17 00:00:00 2001 From: Araq Date: Mon, 9 Jul 2012 00:54:46 +0200 Subject: made tests green again --- lib/windows/mmsystem.nim | 2 +- lib/windows/shellapi.nim | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'lib/windows') diff --git a/lib/windows/mmsystem.nim b/lib/windows/mmsystem.nim index c7dd5b1be..91279a5ef 100755 --- a/lib/windows/mmsystem.nim +++ b/lib/windows/mmsystem.nim @@ -2649,7 +2649,7 @@ proc MCI_TMSF_FRAME(tmsf: int32): int8 = result = toU8(tmsf shr 24) proc mci_Make_TMSF(t, m, s, f: int8): int32 = - result = ze(t) or ze(m) shl 8 or ze(s) shl 16 or ze(f) shl 24 + result = (ze(t) or ze(m) shl 8 or ze(s) shl 16 or ze(f) shl 24).int32 proc DIBINDEX(n: int32): int32 = result = n Or 0x000010FF'i32 shl 16'i32 diff --git a/lib/windows/shellapi.nim b/lib/windows/shellapi.nim index da3159176..41f2a60d5 100755 --- a/lib/windows/shellapi.nim +++ b/lib/windows/shellapi.nim @@ -860,4 +860,4 @@ const # implementation proc EIRESID(x: int32): int32 = - result = - int(x) + result = -x -- cgit 1.4.1-2-gfad0