XGPSPL assumes only AI has an XGP

[larsbrinkhoff]

When XGPSPL generates a header - e.g. for ;LIST printing a text file - it assumes only AI has an XGP. Files printed have the DSK device replaced by AI. This is no longer appropriate when any ITS can have an XGP.

samp3:  push p,a
        move b,(a)              ;device
        camn b,[sixbit /DSK/]   ;only AI has an XGP
         move b,[sixbit /AI/]
        pushj p,samp4
        movei a,":

Here's a sample.