Bug with ref type + fieldPairs + hasCustomPragma

[GULPF]

The result of using fieldPairs + hasCustomPragma on a dereferenced ref value gives different results depending on if the ref type is declared directly or with a separate object type.

Example

import macros

template customPragma {.pragma.}

type
  RefType = ref object
    field {.customPragma.}: int

  ObjType = object
    field {.customPragma.}: int
  RefType2 = ref ObjType

block:
  let x = RefType()
  for fieldName, fieldSym in fieldPairs(x[]):
    echo hasCustomPragma(fieldSym, customPragma)

block:
  let x = RefType2()
  for fieldName, fieldSym in fieldPairs(x[]):
    echo hasCustomPragma(fieldSym, customPragma)

Current Output

false
true

Expected Output

true
true

Additional Information

Tested with latest devel.