-char (*tblock)[TP_BSIZE]; /* Pointer to malloc()ed buffer for tape */
-int writesize; /* Size of malloc()ed buffer for tape */
-int trecno = 0;
+char (*tblock)[TP_BSIZE]; /* pointer to malloc()ed buffer for tape */
+int writesize; /* size of malloc()ed buffer for tape */
+long lastspclrec = -1; /* tape block number of last written header */
+int trecno = 0; /* next record to write in current block */