Added support for {.packed.} pragma on objects

Added tests for packed and union pragmas
This commit is contained in:
Audun Wilhelmsen 2014-03-18 21:11:57 +01:00
commit 1e45bb79ab
8 changed files with 96 additions and 13 deletions

View file

@ -921,7 +921,7 @@ const tyTypeParamsHolders = {tyGenericInst, tyCompositeTypeClass}
proc readTypeParameter(c: PContext, typ: PType,
paramName: PIdent, info: TLineInfo): PNode =
let ty = if typ.kind == tyGenericInst: typ.skipGenericAlias
else: (internalAssert typ.kind == tyCompositeTypeClass; typ.sons[1])
else: (internalAssert(typ.kind == tyCompositeTypeClass); typ.sons[1])
let tbody = ty.sons[0]
for s in countup(0, tbody.len-2):