Google
 

Trailing-Edge - PDP-10 Archives - bb-bt99g-bb - format.c11
There are 2 other files named format.c11 in the archive. Click here to see a list.
 REP 24/1	;11C1
	GLOBAL BIND FORMAV = #10^24 + 0^18 + 2516;	! Version Date: 31-Jan-85
 WIT
	GLOBAL BIND FORMAV = #10^24 + 0^18 + 2533;	! Version Date: 10-May-85
 INS 89/1	;11C2
	2533	AlB	10-May-85
		Do not put out the 'commas needed' compatibility flagger message
		when quotes are included within an alpha literal.  Note that
		when quotes are included (e.g. '~'''), the FORMATSYN routine sees
		this as two literals.

 REP 5/3	;11C3
	%2515%	OWN	NOCOMM;		!  0 if slash, colon or left paren seen
 WIT
	%2533%	LOCAL	PREVLEXL;	! The previous lexeme
	%2515%	OWN	NOCOMM;		! 0 if slash, colon or left paren seen
 INS 94/3	;11C4
	%2533%		PREVLEXL = .LEXL;	! Remember what we have
 INS 142/3	;11C5
	%2533%			! c) The lexeme is an alpha lit following an alpha lit
 INS 145/3	;11C6
	%2533%			THEN IF .LEXL NEQ LITSTRING OR .PREVLEXL NEQ LITSTRING
 SUM 192940