TeamHeptaMirrors/gcc
1
0
Fork 1
mirror of https://github.com/gcc-mirror/gcc.git synced 2026-05-06 14:59:39 +02:00
Code Issues Packages Projects Releases Wiki Activity

Handle GFC_STD_UNSIGNED like a standard in error messages.

Browse Source 
gcc/fortran/ChangeLog:

	* error.cc (notify_std_msg): Handle GFC_STD_UNSIGNED.

gcc/testsuite/ChangeLog:

	* gfortran.dg/unsigned_37.f90: New test.
This commit is contained in:
Thomas Koenig
2024-10-18 17:58:56 +02:00
parent 44a81aaf73
commit 1f07dea91c
2 changed files with 6 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
gcc/fortran/error.cc
View File

@@ -362,6 +362,8 @@ notify_std_msg(int std)
return _("Obsolescent feature:");
else if (std & GFC_STD_F95_DEL)
return _("Deleted feature:");
else if (std & GFC_STD_UNSIGNED)
return _("Unsigned:");
else
gcc_unreachable ();
}

4
gcc/testsuite/gfortran.dg/unsigned_37.f90 Normal file
View File

@@ -0,0 +1,4 @@
! { dg-do compile }
program main
use iso_fortran_env, only : uint32 ! { dg-error "not in the selected standard" }
end program main