fortc - 云端在线

程序：

您的姓名

fortc - Unidata 实用程序，用于生成与 fortran 兼容的 C 代码

概要

堡垒 [-L 库目录] [-O 运维系统] 文件

商品描述

堡垒 从`读取C代码文件'，将其转换为 FORTRAN 兼容代码，然后
将结果写入标准输出。 转换依赖于操作系统
因为这件事没有标准。

可以通过多种方式指定目标操作系统。 如果`-O' 选项是
给定，则使用由其参数指定的操作系统； 否则，如果
环境变量`OS' 存在，那么由它的值指定的操作系统是
用过的; 否则，默认操作系统——在安装时确定——是
用过的。

不是函数定义但可以从两个 C 访问的全局名称
和 FORTRAN 应该用`括起来FC_NAME()'宏：

extern int FC_NAME(foo)(void); /* FORTRAN 函数 */

外部结构{
漂浮f;
int i;
FC_NAME(comblk); /* FORTRAN公共块*/

cfoo()
{
返回 FC_NAME(foo)(); /* 调用 FORTRAN 函数 */
}

要从 FORTRAN 调用的 C 函数编写如下：

INT
/*堡垒之夜*/
富（
字符路径名，/* 新文件的文件名 */
实际金额，/* 金额 */
doubleprecision dbl, /* 等于 tizzle by */
void function errf, /* 错误例程 */
整数 rcode /* 返回的错误代码 */)
{
...

或者，等效地，

INT
/*堡垒之夜*/
foo(char* 路径名，float* 数量，double* dbl，
void (*errf)(), int* rcode)
{
...

编写与 FORTRAN 兼容的函数的注意事项是：

1. 要转换的函数由一个进程`/*堡垒之夜*/' 评论，其中
必须出现在函数名称之前的行上。 任何返回类型声明都必须
继续评论。

2. 形式参数必须在函数括号内声明，并用括号分隔
逗号。

3.形参限制为以下类型：

字符 or 字符*
对于 Fortran 字符变量。

双精度 or 双倍的*”
对于双精度浮点值。

真实 or 漂浮*
对于单精度浮点值。

整数 or 整数*
对于整数值。

类型 function 姓名 or 类型 (*姓名)()
对于函数返回类型`类型'.

4. 左大括号`{'之后必须没有重要的东西，并且在同一行。

函数应使用与正式名称相同的变量编写
参数，并具有相同的语义。 在类型参数的情况下
`字符'（即Fortran字符变量），会存在同名的变量
并且将是类型`字符*'。 此外，对于每个字符变量参数，一个局部
将创建整数类型的变量，其值将是关联的大小
字符变量。 此变量的名称将是关联的名称
带有“的字符变量_len“ 附加（例如“路径名_len"). 这些长度变量可能
像任何其他变量一样在函数中使用。

例如，在 SunOS 下，先前的函数将变为（如果它包含在
文件`源文件'):

#line 1 "foo.src"
无符号整数
#line 2 "foo.src"
foo_（路径名，数量，errf，rcode，pathname_len）
字符 *路径名；
诠释路径名_len；
浮动*金额；
无效（*错误）（）；
诠释 *rcode;
{
#line 9 "foo.src"

请注意，1) 添加了预处理器行指令； 2）函数名已经
以下划线为后缀； 和 3) 一个形式参数，`路径名_len'， 已经被创造了。

在 UNICOS 下，同一个文件将变成

＃包括
#line 1 "foo.src"
无符号整数
#line 2 "foo.src"
FOO（路径名，数量，errf，rcode）
_fcd 路径名；
浮动*金额；
无效（*错误）（）；
诠释 *rcode;
{
char *pathname = _fcdtocp（路径名）；
无符号路径名_len = _fcdlen（路径名）；
#line 9 "foo.src"

请特别注意，额外的`#include ' 以及创作和
局部变量的初始化`路径名'和`路径名_len'.

此实用程序作为脚本实现并使用系统提供的实用程序 口渴（1）和
m4（1）。

配置

-L 库目录"
定义包含 `fortc' 库文件的目录。 默认是
在安装时确定。

-O 运维系统
将操作系统定义为 运维系统. 已知值包括‘aix’、‘convexos’、
“domainos”、“hpux”、“irix”、“msoft”、“next-absoft”、“newsos”、“sunos”、“ultrix”、
“unicos”和“vms”。 为了允许更大的灵活性，已知值可能有
任何后缀（例如`sunos_4.1'）。

环境

OS 如果未指定“-O”选项，则定义操作系统。 已知值
是一样的 -O 选项。

使用 onworks.net 服务在线使用 fortc