gfortran 的续行不起作用
Line continuation with gfortran does not work
我正在使用 Mingw 编译我的 gfortran 代码。我很难找到一种方法如何在代码的下一行继续我的公式。我尝试根据标准 Fortran 代码的说明使用连续字符 &
,但它不起作用。
我的代码如下:
program test
implicit none
real :: a
a=1.+ &
2.
print *,'Gfortran code ',a
end program test
当我尝试编译它时,编译器 returns 以下语句:
test.f:4.13:
a=1.+ &
1
Error: Syntax error in expression at (1)
test.f:5.8:
2.
1
Error: Invalid character in name at (1)
如何续行?
对我来说效果很好。这里是文件名、内容、执行命令和 gfortran 细节:
test.f90:
program test
implicit none
real :: a
a=1.+ &
2.
print *,'Gfortran code ',a
end program test
编译:
gfortran test.f90
:
运行 有:
./a.out
输出:
Gfortran code 3.00000000
gfortran 版本gfortran -v
:
Using built-in specs.
COLLECT_GCC=gfortran
COLLECT_LTO_WRAPPER=/usr/lib/gcc/x86_64-linux-gnu/4.7/lto-wrapper
Target: x86_64-linux-gnu
Configured with: ../src/configure -v --with-pkgversion='Debian 4.7.2-5' --with-bugurl=file:///usr/share/doc/gcc-4.7/README.Bugs --enable- languages=c,c++,go,fortran,objc,obj-c++ --prefix=/usr --program-suffix=-4.7 --enable-shared --enable-linker-build-id --with-system-zlib --libexecdir=/usr/lib --without-included-gettext --enable-threads=posix --with-gxx-include-dir=/usr/include/c++/4.7 --libdir=/usr/lib --enable-nls --with-sysroot=/ --enable-clocale=gnu --enable-libstdcxx-debug --enable-libstdcxx-time=yes --enable-gnu-unique-object --enable-plugin --enable-objc-gc --with-arch-32=i586 --with-tune=generic --enable-checking=release --build=x86_64-linux-gnu --host=x86_64-linux-gnu --target=x86_64-linux-gnu
Thread model: posix
gcc version 4.7.2 (Debian 4.7.2-5)
更新:
解决方法是将文件后缀改为.f90.
原因如下:
.f90 文件被解释为 FORTRAN 90/95/2003/... 标准(向后兼容)。
如果文件名为.f,则根据Standard Fixed Format中的Fortran77标准进行解释。在此语法标准中,您可以看到,每行的前 5 个字符需要为空。第 6 个用于续行。
以下代码示例适用于 Fortran77 语法:test.f
program test
implicit none
real :: a
a=1.+
& 2.
write(*,*)'Gfortran code ',a
end program test
注意第6位的&!您的编译器似乎忽略了您没有坚持使用标准固定格式这一事实。如果我尝试用 77 编译您的代码,我会收到大量错误消息,这些消息正是针对该问题的。这种情况时有发生(有些编译器也区分大小写,有些则不)。
所以,为了避免编译依赖,始终坚持语言标准。
顺便说一句 - 这是一个不错的 Fortran77 Tutorial。
我正在使用 Mingw 编译我的 gfortran 代码。我很难找到一种方法如何在代码的下一行继续我的公式。我尝试根据标准 Fortran 代码的说明使用连续字符 &
,但它不起作用。
我的代码如下:
program test
implicit none
real :: a
a=1.+ &
2.
print *,'Gfortran code ',a
end program test
当我尝试编译它时,编译器 returns 以下语句:
test.f:4.13:
a=1.+ &
1
Error: Syntax error in expression at (1)
test.f:5.8:
2.
1
Error: Invalid character in name at (1)
如何续行?
对我来说效果很好。这里是文件名、内容、执行命令和 gfortran 细节:
test.f90:
program test
implicit none
real :: a
a=1.+ &
2.
print *,'Gfortran code ',a
end program test
编译:
gfortran test.f90
:
运行 有:
./a.out
输出:
Gfortran code 3.00000000
gfortran 版本gfortran -v
:
Using built-in specs.
COLLECT_GCC=gfortran
COLLECT_LTO_WRAPPER=/usr/lib/gcc/x86_64-linux-gnu/4.7/lto-wrapper
Target: x86_64-linux-gnu
Configured with: ../src/configure -v --with-pkgversion='Debian 4.7.2-5' --with-bugurl=file:///usr/share/doc/gcc-4.7/README.Bugs --enable- languages=c,c++,go,fortran,objc,obj-c++ --prefix=/usr --program-suffix=-4.7 --enable-shared --enable-linker-build-id --with-system-zlib --libexecdir=/usr/lib --without-included-gettext --enable-threads=posix --with-gxx-include-dir=/usr/include/c++/4.7 --libdir=/usr/lib --enable-nls --with-sysroot=/ --enable-clocale=gnu --enable-libstdcxx-debug --enable-libstdcxx-time=yes --enable-gnu-unique-object --enable-plugin --enable-objc-gc --with-arch-32=i586 --with-tune=generic --enable-checking=release --build=x86_64-linux-gnu --host=x86_64-linux-gnu --target=x86_64-linux-gnu
Thread model: posix
gcc version 4.7.2 (Debian 4.7.2-5)
更新:
解决方法是将文件后缀改为.f90.
原因如下: .f90 文件被解释为 FORTRAN 90/95/2003/... 标准(向后兼容)。 如果文件名为.f,则根据Standard Fixed Format中的Fortran77标准进行解释。在此语法标准中,您可以看到,每行的前 5 个字符需要为空。第 6 个用于续行。
以下代码示例适用于 Fortran77 语法:test.f
program test
implicit none
real :: a
a=1.+
& 2.
write(*,*)'Gfortran code ',a
end program test
注意第6位的&!您的编译器似乎忽略了您没有坚持使用标准固定格式这一事实。如果我尝试用 77 编译您的代码,我会收到大量错误消息,这些消息正是针对该问题的。这种情况时有发生(有些编译器也区分大小写,有些则不)。
所以,为了避免编译依赖,始终坚持语言标准。
顺便说一句 - 这是一个不错的 Fortran77 Tutorial。