[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[no subject]



From:     JPG@MIT-MC
Date: Wed, 27 Dec 79 09:39:41 GMT
Original-Date: 12/27/79 05:39:41 EDT
Subject:
    :TAGS MACSYM;MACSYM NTAGS
    gives bad format error.  It complains that a "^_ is not followed by a CRLF"
    at the end of the MACSYM NTAGS file.  As you know, this file is created 
    via (CODESIZE) of ALJABR;CODE > .   (Conjecture: Are we being screwed 
    by the change to (STATUS TERPRI)?  (I didn't test this conjecture.))

I guess we blame either LISP or FORMAT.  The file, written by the following 
code, ends with <ctl-_><cr><eof> and not with <ctl-_><cr><lf><eof> as it used 
to (and like TAGS wants).

  (DO ((F (OPEN '|MACSYM;MACSYM NTAGS| '(OUT ASCII))) (FF FF (CDR FF)))
      ((NULL FF) (CLOSE F))
      (FORMAT F '|~A~%0,~A~%^_~%|
	      (NAMESTRING (MERGEF '|* >| (CAR FF)))
	      (COND ((EQ (CADR (CAR FF)) 'RATLAP) 'MIDAS) ('LISP))))