mirror of
https://github.com/nim-lang/Nim.git
synced 2025-12-30 18:02:05 +00:00
27 lines
506 B
Nim
27 lines
506 B
Nim
discard """
|
|
errormsg: "'mainUnsafe' is not GC-safe"
|
|
line: 26
|
|
cmd: "nim $target --hints:on --threads:on $options $file"
|
|
"""
|
|
|
|
# bug #6955
|
|
var global_proc: proc(a: string): int {.nimcall.} = nil
|
|
|
|
proc myproc(i: int) {.gcsafe.} =
|
|
if global_proc != nil:
|
|
echo "a"
|
|
if isNil(global_proc):
|
|
return
|
|
|
|
proc mymap(x: proc ()) =
|
|
x()
|
|
|
|
var
|
|
myglob: string
|
|
|
|
proc mainSafe() {.gcsafe.} =
|
|
mymap(proc () = echo "foo")
|
|
|
|
proc mainUnsafe() {.gcsafe.} =
|
|
mymap(proc () = myglob = "bar"; echo "foo", myglob)
|