
{ This type declaration is used to perform 'trick' pointer conversion.

    TYPE
      gft$trick_pointer = RECORD
      CASE boolean OF
      = FALSE =
        p: ^cell,
      = TRUE =
        pva: RECORD
          ringseg: 0 .. 0ffff(16),
          offset: 0 .. 0ffffffff(16),
        RECEND,
      CASEND,
    RECEND;


