This commit is contained in:
Araq
2019-04-17 13:22:12 +02:00
parent 14fc7437c3
commit 5bdab044f5
2 changed files with 3 additions and 10 deletions

View File

@@ -808,18 +808,15 @@ proc genFieldCheck(p: BProc, e: PNode, obj: Rope, field: PSym) =
v.r.add(".")
v.r.add(disc.sym.loc.r)
genInExprAux(p, it, u, v, test)
let id = nodeTableTestOrSet(p.module.dataCache,
newStrNode(nkStrLit, field.name.s), p.module.labels)
let strLit = if id == p.module.labels: genStringLiteralDataOnly(p.module, field.name.s, e.info)
else: p.module.tmpBase & rope(id)
let strLit = genStringLiteral(p.module, newStrNode(nkStrLit, field.name.s))
if op.magic == mNot:
linefmt(p, cpsStmts,
"if ($1) #raiseFieldError($2);$n",
[rdLoc(test), genStringLiteralFromData(p.module, strLit, e.info)])
[rdLoc(test), strLit])
else:
linefmt(p, cpsStmts,
"if (!($1)) #raiseFieldError($2);$n",
[rdLoc(test), genStringLiteralFromData(p.module, strLit, e.info)])
[rdLoc(test), strLit])
proc genCheckedRecordField(p: BProc, e: PNode, d: var TLoc) =
if optFieldCheck in p.options:

View File

@@ -97,10 +97,6 @@ proc genStringLiteralDataOnly(m: BModule; s: string; info: TLineInfo): Rope =
else:
localError(m.config, info, "cannot determine how to produce code for string literal")
proc genStringLiteralFromData(m: BModule; data: Rope; info: TLineInfo): Rope =
result = ropecg(m, "((#NimStringDesc*) &$1)",
[data])
proc genNilStringLiteral(m: BModule; info: TLineInfo): Rope =
result = ropecg(m, "((#NimStringDesc*) NIM_NIL)", [])