Nim/tests/pragmas/tuserpragma2.nim

discard """
  errormsg: "can raise an unlisted exception: ref Exception"
  file: "tuserpragma2.nim"
  line: 11
"""
{.push warningAsError[Effect]: on.}
# bug #7216
{.pragma: my_pragma, raises: [].}

proc test1 {.my_pragma.} =
  raise newException(Exception, "msg")
{.pop.}