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

Fixes #6336 (#6337)

Browse source
This commit is contained in:
Yuriy Glukhov 2017-09-06 23:55:09 +03:00 • committed by Andreas Rumpf
commit c3117e1aba
1 changed files with 10 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

12
compiler/vmops.nim
View file

@ -21,6 +21,9 @@ template mathop(op) {.dirty.} =
template osop(op) {.dirty.} = template osop(op) {.dirty.} =
registerCallback(c, "stdlib.os." & astToStr(op), `op Wrapper`) registerCallback(c, "stdlib.os." & astToStr(op), `op Wrapper`)
template ospathsop(op) {.dirty.} =
registerCallback(c, "stdlib.ospaths." & astToStr(op), `op Wrapper`)
template systemop(op) {.dirty.} = template systemop(op) {.dirty.} =
registerCallback(c, "stdlib.system." & astToStr(op), `op Wrapper`) registerCallback(c, "stdlib.system." & astToStr(op), `op Wrapper`)
@ -39,6 +42,11 @@ template wrap1s_os(op) {.dirty.} =
setResult(a, op(getString(a, 0))) setResult(a, op(getString(a, 0)))
osop op osop op
template wrap1s_ospaths(op) {.dirty.} =
proc `op Wrapper`(a: VmArgs) {.nimcall.} =
setResult(a, op(getString(a, 0)))
ospathsop op
template wrap1s_system(op) {.dirty.} = template wrap1s_system(op) {.dirty.} =
proc `op Wrapper`(a: VmArgs) {.nimcall.} = proc `op Wrapper`(a: VmArgs) {.nimcall.} =
setResult(a, op(getString(a, 0))) setResult(a, op(getString(a, 0)))
@ -88,8 +96,8 @@ proc registerAdditionalOps*(c: PCtx) =
wrap1f_math(ceil) wrap1f_math(ceil)
wrap2f_math(fmod) wrap2f_math(fmod)
wrap1s_os(getEnv) wrap1s_ospaths(getEnv)
wrap1s_os(existsEnv) wrap1s_ospaths(existsEnv)
wrap1s_os(dirExists) wrap1s_os(dirExists)
wrap1s_os(fileExists) wrap1s_os(fileExists)
wrap2svoid_system(writeFile) wrap2svoid_system(writeFile)