procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

modula2: Tidyup gm2-compiler/M2MetaError.mod

Browse source 
This patch is a tidyup for gm2-compiler/M2MetaError.mod.

gcc/m2/ChangeLog:

	* gm2-compiler/M2MetaError.mod (op): Alphabetically order
	each case label and comment.

Signed-off-by: Gaius Mulley <gaiusmod2@gmail.com>
This commit is contained in:
Gaius Mulley 2024-10-19 20:35:26 +01:00
parent 8d6d6d537f
commit 7fa9fd47f1
1 changed files with 27 additions and 26 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

53
gcc/m2/gm2-compiler/M2MetaError.mod
View file

@ -1684,8 +1684,9 @@ END copySym ;
(*
op := {'a'|'q'|'t'|'d'|'n'|'s'|'B'|'D'|'F'|'G'|'H'|'M'|'U'|'E'|'V'|'W'|'A'} then =:
op := {'a'|'q'|'t'|'d'|'n'|'s'| 'u' |'D'|'F'|'G'|'M'|'U'|'E'|'W'} then =:
op := {'!'|'a'|'c'|'d'|'k'|'q'|'t'|'p'|'n'|'s'|'u'|
'A'|'B'|'C'|'D'|'E'|'F'|'G'|'H'|'K'|'M'|'N'|
'O'|'P'|'Q'|'R'|'S'|'T'|'U'|'V'|'W'|'X'|'Y'|'Z'} then =:
*)
PROCEDURE op (VAR eb: errorBlock;
@ -1701,43 +1702,43 @@ BEGIN
'!': eb.positive := NOT eb.positive |
'a': doName (eb, sym, bol) |
'c': eb.currentCol := readColor (eb) ;
DEC (eb.ini) |
'd': doDesc (eb, sym, bol) |
'k': unquotedKeyword (eb) ;
DEC (eb.ini) |
'q': doQualified (eb, sym, bol) |
't': doType (eb, sym, bol) |
'd': doDesc (eb, sym, bol) |
'p': popColor (eb) |
'n': doNumber (eb, sym, bol) |
'N': doCount (eb, sym, bol) |
's': doSkipType (eb, sym, bol) |
'B': declaredType (eb, sym, bol) |
'H': declaredFull (eb, sym, bol) |
'V': declaredVar (eb, sym, bol) |
'G': declaredFor (eb, sym, bol) |
'M': declaredMod (eb, sym, bol) |
'D': declaredDef (eb, sym, bol) |
'U': used (eb, sym, bol) |
'E': eb.type := error |
'u': eb.quotes := FALSE |
'A': eb.type := aborta ;
seenAbort := TRUE |
'W': eb.type := warning |
'O': eb.type := note |
'B': declaredType (eb, sym, bol) |
'C': eb.chain := TRUE |
'D': declaredDef (eb, sym, bol) |
'E': eb.type := error |
'F': filename (eb) ;
DEC (eb.ini) |
'G': declaredFor (eb, sym, bol) |
'H': declaredFull (eb, sym, bol) |
'K': keyword (eb) ;
DEC (eb.ini) |
'M': declaredMod (eb, sym, bol) |
'N': doCount (eb, sym, bol) |
'O': eb.type := note |
'P': pushColor (eb) |
'Q': resetDictionary |
'R': eb.root := TRUE |
'S': doGetSkipType (eb, sym, bol) |
'T': doGetType (eb, sym, bol) |
'P': pushColor (eb) |
'p': popColor (eb) |
'c': eb.currentCol := readColor (eb) ;
DEC (eb.ini) |
'K': keyword (eb) ;
DEC (eb.ini) |
'k': unquotedKeyword (eb) ;
DEC (eb.ini) |
'Q': resetDictionary |
'U': used (eb, sym, bol) |
'V': declaredVar (eb, sym, bol) |
'W': eb.type := warning |
'X': pushOutput (eb) |
'Y': processDefine (eb) |
'Z': popOutput (eb) |
'F': filename (eb) ;
DEC (eb.ini) |
'u': eb.quotes := FALSE |
':': ifNonNulThen (eb, sym) ;
DEC (eb.ini) |
'1': InternalError ('incorrect format spec, expecting %1 rather than % spec 1') |