no name mangling for PHP fields

This commit is contained in:
Andreas Rumpf 2016-02-29 14:55:12 +01:00
commit b893e0dbf5

View file

@ -192,7 +192,7 @@ proc mangleName(s: PSym; target: TTarget): Rope =
x.add("HEX" & toHex(ord(c), 2)) x.add("HEX" & toHex(ord(c), 2))
inc i inc i
result = rope(x) result = rope(x)
if s.name.s != "this": if s.name.s != "this" and s.kind != skField:
add(result, "_") add(result, "_")
add(result, rope(s.id)) add(result, rope(s.id))
s.loc.r = result s.loc.r = result