When initializing bitfields of type long, do not treat their values as pointer constants.

This was inappropriate and would lead to memory trashing.

Fixes case 3 in issue #59.

Parser.pas

@@ -2015,8 +2015,9 @@ var
 2:    DisposeTree(initializerTree);
       end {if}
    else begin
-      if (tp^.kind = pointerType)
-         or ((tp^.kind = scalarType) and (tp^.baseType in [cgLong,cgULong]))
+      if ((tp^.kind = pointerType)
+         or ((tp^.kind = scalarType) and (tp^.baseType in [cgLong,cgULong])))
+         and (bitsize = 0)
          then begin
          iPtr^.iType := ccPointer;
          if variable^.storage in [external,global,private] then begin