jyapayne/Nim
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

minor clenup in vmops (#18529)

Browse source
This commit is contained in:
Timothee Cour 2021-07-19 20:07:47 -07:00 • committed by GitHub
commit db6e7fffba
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 5 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

9
compiler/vmops.nim
View file

@ -150,6 +150,9 @@ when defined(nimHasInvariant):
of cincludes: copySeq(conf.cIncludes) of cincludes: copySeq(conf.cIncludes)
of clibs: copySeq(conf.cLibs) of clibs: copySeq(conf.cLibs)
proc stackTrace2(c: PCtx, msg: string, n: PNode) =
stackTrace(c, PStackFrame(prc: c.prc.sym, comesFrom: 0, next: nil), c.exceptionInstr, msg, n.info)
proc registerAdditionalOps*(c: PCtx) = proc registerAdditionalOps*(c: PCtx) =
proc gorgeExWrapper(a: VmArgs) = proc gorgeExWrapper(a: VmArgs) =
let ret = opGorge(getString(a, 0), getString(a, 1), getString(a, 2), let ret = opGorge(getString(a, 0), getString(a, 1), getString(a, 2),
@ -238,15 +241,13 @@ proc registerAdditionalOps*(c: PCtx) =
registerCallback c, "stdlib.macros.symBodyHash", proc (a: VmArgs) = registerCallback c, "stdlib.macros.symBodyHash", proc (a: VmArgs) =
let n = getNode(a, 0) let n = getNode(a, 0)
if n.kind != nkSym: if n.kind != nkSym:
stackTrace(c, PStackFrame(prc: c.prc.sym, comesFrom: 0, next: nil), c.exceptionInstr, stackTrace2(c, "symBodyHash() requires a symbol. '$#' is of kind '$#'" % [$n, $n.kind], n)
"symBodyHash() requires a symbol. '" & $n & "' is of kind '" & $n.kind & "'", n.info)
setResult(a, $symBodyDigest(c.graph, n.sym)) setResult(a, $symBodyDigest(c.graph, n.sym))
registerCallback c, "stdlib.macros.isExported", proc(a: VmArgs) = registerCallback c, "stdlib.macros.isExported", proc(a: VmArgs) =
let n = getNode(a, 0) let n = getNode(a, 0)
if n.kind != nkSym: if n.kind != nkSym:
stackTrace(c, PStackFrame(prc: c.prc.sym, comesFrom: 0, next: nil), c.exceptionInstr, stackTrace2(c, "isExported() requires a symbol. '$#' is of kind '$#'" % [$n, $n.kind], n)
"isExported() requires a symbol. '" & $n & "' is of kind '" & $n.kind & "'", n.info)
setResult(a, sfExported in n.sym.flags) setResult(a, sfExported in n.sym.flags)
registerCallback c, "stdlib.vmutils.vmTrace", proc (a: VmArgs) = registerCallback c, "stdlib.vmutils.vmTrace", proc (a: VmArgs) =