File: tgensyminst.nim

package info (click to toggle)
nim 2.2.0-1
  • links: PTS, VCS
  • area: main
  • in suites: sid
  • size: 1,911,644 kB
  • sloc: sh: 24,603; ansic: 1,761; python: 1,492; makefile: 1,013; sql: 298; asm: 141; xml: 13
file content (29 lines) | stat: -rw-r--r-- 642 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
# issue #24048

import macros

proc map(fn: proc(val: int): void) = fn(1)

# This works fine, and is the exact same function call as what's
# generated by the macro `aBug`.
map proc(val: auto): void =
  let variable = 123

macro aBug() =
  # 1. let sym = ident("variable")
  let sym = genSym(nskLet, "variable")
  let letStmt = newLetStmt(sym, newLit(123))

  let lambda = newProc(
    params = @[
      ident("void"),
      newIdentDefs(ident("val"), ident("auto")),
      # 2. newIdentDefs(ident("val"), ident("int")),
    ],
    body = newStmtList(letStmt),
    procType = nnkLambda
  )

  result = newCall(bindSym("map"), lambda)

aBug()