OSDN Git Service

PR fortran/31645
authorfxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 29 Apr 2007 10:45:57 +0000 (10:45 +0000)
committerfxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 29 Apr 2007 10:45:57 +0000 (10:45 +0000)
commitd544eac1ed633609f253fe135b04c46505e67a7b
treeebf5c3a3515c694847d6fb1e9ca78d6d75adcd53
parent7ac77761cae73630446dbd1e7f77c40e8e19f6cb
PR fortran/31645

* scanner.c (load_file): Discard the byte order mark if one is
found on the first non-preprocessor line of a file.

* testsuite/gfortran.dg/bom_error.f90: New test.
* testsuite/gfortran.dg/bom_include.f90: New test.
* testsuite/gfortran.dg/bom_UTF16-LE.f90: New test.
* testsuite/gfortran.dg/bom_UTF16-BE.f90: New test.
* testsuite/gfortran.dg/bom_UTF-8.f90: New test.
* testsuite/gfortran.dg/bom_UTF-32.f90: New test.
* testsuite/gfortran.dg/bom_UTF-8.F90: New test.
* testsuite/gfortran.dg/bom_include.inc: New file.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@124274 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/scanner.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/bom_UTF-32.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/bom_UTF-8.F90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/bom_UTF-8.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/bom_UTF16-BE.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/bom_UTF16-LE.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/bom_error.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/bom_include.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/bom_include.inc [new file with mode: 0644]