type
  A = object of RootObj
    number: int

  B[T] = object of T
    text: string



proc newB[T](): ref B[T] =
  result.new()
  result.number = 5
  result.text = "Hello World"


proc main() =
  var test = newB[A]()
  echo "Test:" & $test.number & "  " & test.text

main()