Fortran中有一个rename函数,可以用于文件的重命名、删除等操作,但gfortran与Intel Visual Fortran的调用方法不一致,混用容易产生不知名的错误。
使用gfortan编译时,调用方法:
character*12 oldfile, newfile
integer*4 err
call rename(oldfile, newfile, err)
若成功则err为0。
使用Intel Visual Fortran编译时,调用方法:
use IFPORT
integer*4 err
character*12 oldname, newname
err= RENAME (oldname, newname)
如果成功,则err为零;否则为错误代码,例如:
EACCES-无法创建指定的文件或目录(无效路径)。 如果指定的驱动器当前未连接到设备,也会返回此错误。
ENOENT-找不到oldname文件或路径。
EXDEV-尝试将文件移动到其他设备。