jyapayne/Nim
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

version 0.7.2

Browse source
This commit is contained in:
Andreas Rumpf 2008-12-12 14:02:27 +01:00
commit ddaedab835
158 changed files with 34811 additions and 10001 deletions
Download patch file Download diff file Expand all files Collapse all files

8
tests/tvarnums.nim
View file

@ -66,13 +66,13 @@ proc toNum(b: TBuffer): int32 =
result = ze(b[0]) and 63
var
i = 0
Shift = 6
Shift = 6'i32
while (ze(b[i]) and 128) != 0:
inc(i)
result = result or int32((ze(b[i]) and 127) shl Shift)
inc(Shift, 7)
result = result or ((int32(ze(b[i])) and 127'i32) shl Shift)
Shift = shift + 7'i32
if (ze(b[0]) and (1 shl 6)) != 0: # sign bit set?
result = not int(result) +% 1
result = (not result) +% 1'i32
# this is the same as ``- result``
# but gives no overflow error for low(int)