示例 2:symlnk:创建一个指向文件 tlink.db.data.1 的符号链接 data1:
demo% cat tsymlnk.f character*34 name1/’tlink.db.data.1’/, name2/’data1’/ INTEGER*4 status, symlnk status = symlnk( name1, name2 ) if ( status .ne. 0 ) stop ’symlnk: error’ end demo% f95 tsymlnk.f demo% ls -l data1 data1 not found demo% a.out demo% ls -l data1 lrwxrwxrwx 1 generic 15 Aug 11 11:09 data1 -> tlink.db.data.1 demo% |
另请参见:link(2)、symlink(2)、perror(3F) 和 unlink(3F)。
注意:路径名长度不能超过 <sys/param.h> 中定义的 MAXPATHLEN 值。