| 12345678910111213141516171819202122232425262728 |
- discard """
- msg: '''ObjectTy(Sym(Model), RecList(Sym(name), Sym(password)))
- BracketExpr(Sym(typeDesc), Sym(User))'''
- """
- import strutils, macros
- type
- Model = object of RootObj
- User = object of Model
- name : string
- password : string
- macro testUser: string =
- result = newLit(User.getType.lispRepr)
- macro testGeneric(T: typedesc[Model]): string=
- result = newLit(T.getType.lispRepr)
- echo testUser
- echo User.testGeneric
- macro assertVoid(e: typed): untyped =
- assert(getTypeInst(e).typeKind == ntyVoid)
- proc voidProc() = discard
- assertVoid voidProc()
|
