discard """
output: '''true
true
true
true
true
true
true'''
"""
# Test not mangled:
block:
type T = object
a: int
b: cstring
proc test(): bool =
let obj = T(a: 11, b: "foo")
{. emit: [result, " = (", obj, ".a == 11);"] .}
{. emit: [result, " = ", result, " && (", obj, ".b == \"foo\");"] .}
echo test()
# Test indirect (fields in genAddr):
block:
type T = object
a: int
b: cstring
var global = T(a: 11, b: "foo")
proc test(): bool =
var obj = T(a: 11, b: "foo")
{. emit: [result, " = (", obj.addr[], "[0].a == 11);"] .}
{. emit: [result, " = ", result, " && (", obj.addr[], "[0].b == \"foo\");"] .}
{. emit: [result, " = ", result, " && (", global, "[0].a == 11);"] .}
{. emit: [result, " = ", result, " && (", global, "[0].b == \"foo\");"] .}
echo test()
# Test addr of field:
block:
type T = object
a: int
b: