OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Testsuite changes reflecting changes to UnixArgs.

Browse Source 
This patch changes the tests in the testsuite which refer to UnixArgs.

2022-06-29  Gaius Mulley  <gaius.mulley@southwales.ac.uk>

gcc/testsuite/gm2/ChangeLog:

	* link/pimc/pass/testgetopt.mod: Replace ArgC with
	call to GetArgC and replace ArgV with a call to GetArgV.
	* link/pimc/pass/testunixargs.mod: Replace ArgC with
	call to GetArgC and replace ArgV with a call to GetArgV.

Signed-off-by: Gaius Mulley <gaius.mulley@southwales.ac.uk>
This commit is contained in:
Gaius Mulley 2022-06-29 11:01:59 +01:00
parent a46dabc0a4
commit b3ba35e9f8
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/testsuite/gm2/link/pimc/pass/testgetopt.mod
View File

@ -61,7 +61,7 @@ BEGIN
l := InitString (':a:b:c:d:e:o:s:hx:y:') ;
s := NIL ;
arg := NIL ;
ch := GetOpt (UnixArgs.ArgC, UnixArgs.ArgV, l,
ch := GetOpt (UnixArgs.GetArgC (), UnixArgs.GetArgV (), l,
arg, optind, opterr, optopt) ;
WHILE ch # nul DO
CASE ch OF
@ -83,7 +83,7 @@ BEGIN
exit (1)
END ;
arg := KillString (arg) ;
ch := GetOpt (UnixArgs.ArgC, UnixArgs.ArgV, l,
ch := GetOpt (UnixArgs.GetArgC (), UnixArgs.GetArgV (), l,
arg, optind, opterr, optopt)
END
END HandleOptions ;

2
gcc/testsuite/gm2/link/pimc/pass/testunixargs.mod
View File

@ -2,7 +2,7 @@ MODULE testunixargs ;
(* A trivial test to test for the existence of UnixArgs and SYSTEM. *)
FROM UnixArgs IMPORT ArgV, ArgC ;
FROM UnixArgs IMPORT GetArgV, GetArgC ;
FROM SYSTEM IMPORT ADDRESS ;
VAR