PR modula2/111627 Excess test fails with a case-preserving-case-insensitive source tree
This patch renames gm2 testsuite modules whose names conflict with library modules. The conflict is not seen on case preserving case sensitive file systems. gcc/testsuite/ChangeLog: PR modula2/111627 * gm2/pim/pass/stdio.mod: Moved to... * gm2/pim/pass/teststdio.mod: ...here. * gm2/pim/run/pass/builtins.mod: Moved to... * gm2/pim/run/pass/testbuiltins.mod: ...here. * gm2/pim/run/pass/math.mod: Moved to... * gm2/pim/run/pass/testmath.mod: ...here. * gm2/pim/run/pass/math2.mod: Moved to... * gm2/pim/run/pass/testmath2.mod: ...here. Signed-off-by: Gaius Mulley <gaiusmod2@gmail.com>
This commit is contained in:
parent
f7935beef7
commit
4fd094835a
4 changed files with 8 additions and 8 deletions
|
@ -16,7 +16,7 @@ with gm2; see the file COPYING. If not, write to the Free Software
|
||||||
Foundation, 51 Franklin Street, Fifth Floor,
|
Foundation, 51 Franklin Street, Fifth Floor,
|
||||||
Boston, MA 02110-1301, USA. *)
|
Boston, MA 02110-1301, USA. *)
|
||||||
|
|
||||||
MODULE stdio ; (*!m2pim*)
|
MODULE teststdio ; (*!m2pim*)
|
||||||
|
|
||||||
CONST
|
CONST
|
||||||
MaxStack = 40 ;
|
MaxStack = 40 ;
|
||||||
|
@ -50,4 +50,4 @@ END PushOutput ;
|
||||||
BEGIN
|
BEGIN
|
||||||
StackWPtr := 0 ;
|
StackWPtr := 0 ;
|
||||||
PushOutput(write)
|
PushOutput(write)
|
||||||
END stdio.
|
END teststdio.
|
|
@ -1,4 +1,4 @@
|
||||||
MODULE builtins ; (*!m2pim+gm2*)
|
MODULE testbuiltins ; (*!m2pim+gm2*)
|
||||||
|
|
||||||
FROM Builtins IMPORT log10l ;
|
FROM Builtins IMPORT log10l ;
|
||||||
FROM libc IMPORT printf, exit ;
|
FROM libc IMPORT printf, exit ;
|
||||||
|
@ -76,4 +76,4 @@ BEGIN
|
||||||
code := 0 ;
|
code := 0 ;
|
||||||
test ;
|
test ;
|
||||||
exit (code)
|
exit (code)
|
||||||
END builtins.
|
END testbuiltins.
|
|
@ -15,7 +15,7 @@ You should have received a copy of the GNU General Public License along
|
||||||
with gm2; see the file COPYING. If not, write to the Free Software
|
with gm2; see the file COPYING. If not, write to the Free Software
|
||||||
Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. *)
|
Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. *)
|
||||||
|
|
||||||
MODULE math ;
|
MODULE testmath ;
|
||||||
|
|
||||||
IMPORT MathLib0, SMathLib0 ;
|
IMPORT MathLib0, SMathLib0 ;
|
||||||
FROM libc IMPORT printf, exit ;
|
FROM libc IMPORT printf, exit ;
|
||||||
|
@ -41,4 +41,4 @@ BEGIN
|
||||||
s := 5.9 ;
|
s := 5.9 ;
|
||||||
printf("value of SMathLib0.entier (10.0 + s) = %d (should be 15)\n", SMathLib0.entier (10.0 + s)) ;
|
printf("value of SMathLib0.entier (10.0 + s) = %d (should be 15)\n", SMathLib0.entier (10.0 + s)) ;
|
||||||
Assert(SMathLib0.entier (10.0 + s) = 15, __FILE__, __LINE__) ;
|
Assert(SMathLib0.entier (10.0 + s) = 15, __FILE__, __LINE__) ;
|
||||||
END math.
|
END testmath.
|
|
@ -15,7 +15,7 @@ You should have received a copy of the GNU General Public License along
|
||||||
with gm2; see the file COPYING. If not, write to the Free Software
|
with gm2; see the file COPYING. If not, write to the Free Software
|
||||||
Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. *)
|
Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. *)
|
||||||
|
|
||||||
MODULE math2 ;
|
MODULE testmath2 ;
|
||||||
|
|
||||||
IMPORT MathLib0, SMathLib0 ;
|
IMPORT MathLib0, SMathLib0 ;
|
||||||
FROM libc IMPORT printf, exit ;
|
FROM libc IMPORT printf, exit ;
|
||||||
|
@ -41,4 +41,4 @@ BEGIN
|
||||||
s := 5.9 ;
|
s := 5.9 ;
|
||||||
printf("value of SMathLib0.entier (10.0 + s) = %d (should be 15)\n", SMathLib0.entier (10.0 + s)) ;
|
printf("value of SMathLib0.entier (10.0 + s) = %d (should be 15)\n", SMathLib0.entier (10.0 + s)) ;
|
||||||
Assert(SMathLib0.entier (s + 10.0) = 15, __FILE__, __LINE__) ;
|
Assert(SMathLib0.entier (s + 10.0) = 15, __FILE__, __LINE__) ;
|
||||||
END math2.
|
END testmath2.
|
Loading…
Add table
Reference in a new issue