Implementation

    struct Xvector { char Xtype;
                     int Xupbv;
                     PSEXP *Xvectelts; } ;