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

fixes #2992

Browse source
This commit is contained in:
Araq 2015-06-25 13:13:33 +02:00
commit 6de5c1e86d
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/system/repr.nim
View file

@ -142,7 +142,7 @@ when not defined(useNimRtl):
proc deinitReprClosure(cl: var ReprClosure) = proc deinitReprClosure(cl: var ReprClosure) =
when declared(CellSet): deinit(cl.marked) when declared(CellSet): deinit(cl.marked)
when hasThreadSupport and hasSharedHeap and declared(heapLock): when hasThreadSupport and hasSharedHeap and declared(heapLock):
ReleaseSys(HeapLock) ReleaseSys(HeapLock)
proc reprBreak(result: var string, cl: ReprClosure) = proc reprBreak(result: var string, cl: ReprClosure) =
@ -196,7 +196,7 @@ when not defined(useNimRtl):
add result, "[" add result, "["
var curTyp = typ var curTyp = typ
var first = true var first = true
while curTyp.base != nil: while curTyp != nil:
var part = "" var part = ""
reprRecordAux(part, p, curTyp.node, cl) reprRecordAux(part, p, curTyp.node, cl)
if part.len > 0: if part.len > 0:
@ -232,7 +232,7 @@ when not defined(useNimRtl):
of tySet: reprSetAux(result, p, typ) of tySet: reprSetAux(result, p, typ)
of tyArray, tyArrayConstr: reprArray(result, p, typ, cl) of tyArray, tyArrayConstr: reprArray(result, p, typ, cl)
of tyTuple: reprRecord(result, p, typ, cl) of tyTuple: reprRecord(result, p, typ, cl)
of tyObject: of tyObject:
var t = cast[ptr PNimType](p)[] var t = cast[ptr PNimType](p)[]
reprRecord(result, p, t, cl) reprRecord(result, p, t, cl)
of tyRef, tyPtr: of tyRef, tyPtr:
@ -248,7 +248,7 @@ when not defined(useNimRtl):
of tyInt64: add result, $(cast[ptr int64](p)[]) of tyInt64: add result, $(cast[ptr int64](p)[])
of tyUInt8: add result, $ze(cast[ptr int8](p)[]) of tyUInt8: add result, $ze(cast[ptr int8](p)[])
of tyUInt16: add result, $ze(cast[ptr int16](p)[]) of tyUInt16: add result, $ze(cast[ptr int16](p)[])
of tyFloat: add result, $(cast[ptr float](p)[]) of tyFloat: add result, $(cast[ptr float](p)[])
of tyFloat32: add result, $(cast[ptr float32](p)[]) of tyFloat32: add result, $(cast[ptr float32](p)[])
of tyFloat64: add result, $(cast[ptr float64](p)[]) of tyFloat64: add result, $(cast[ptr float64](p)[])