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

fixes #1442

Browse source
This commit is contained in:
Araq 2014-08-13 02:53:00 +02:00
commit 32a5d4baf0
2 changed files with 16 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

10
compiler/types.nim
View file

@ -582,7 +582,10 @@ proc firstOrd(t: PType): BiggestInt =
of tyGenericInst, tyDistinct, tyConst, tyMutable, of tyGenericInst, tyDistinct, tyConst, tyMutable,
tyTypeDesc, tyFieldAccessor: tyTypeDesc, tyFieldAccessor:
result = firstOrd(lastSon(t)) result = firstOrd(lastSon(t))
else: of tyOrdinal:
if t.len > 0: result = firstOrd(lastSon(t))
else: internalError("invalid kind for first(" & $t.kind & ')')
else:
internalError("invalid kind for first(" & $t.kind & ')') internalError("invalid kind for first(" & $t.kind & ')')
result = 0 result = 0
@ -617,7 +620,10 @@ proc lastOrd(t: PType): BiggestInt =
tyTypeDesc, tyFieldAccessor: tyTypeDesc, tyFieldAccessor:
result = lastOrd(lastSon(t)) result = lastOrd(lastSon(t))
of tyProxy: result = 0 of tyProxy: result = 0
else: of tyOrdinal:
if t.len > 0: result = lastOrd(lastSon(t))
else: internalError("invalid kind for last(" & $t.kind & ')')
else:
internalError("invalid kind for last(" & $t.kind & ')') internalError("invalid kind for last(" & $t.kind & ')')
result = 0 result = 0

10
tests/misc/tstrange.nim
View file

@ -1,6 +1,9 @@
discard """ discard """
file: "tstrange.nim" file: "tstrange.nim"
output: "hallo4" output: '''hallo4
0
1
2'''
""" """
# test for extremely strange bug # test for extremely strange bug
@ -19,5 +22,8 @@ gen("hallo")
write(stdout, ack(5, 4)) write(stdout, ack(5, 4))
#OUT hallo4 #OUT hallo4
# bug #1442
let h=3
for x in 0.. <h.int:
echo x