C代码setjmp声明函数

Question

我绝对不是一个程序员，但我正在尝试让一个非常旧的程序从fortran编译到C，这样我就可以在我的linux盒子上玩一个20多年没有玩过的游戏(最初是在70年代末的HP3000上创建的！(。

有人写了一个make.sh文件，使用f2c(fortran to C(，这样它就可以在linux下使用GCC进行编译，但这是很久以前的事了。

我收到以下错误消息：

stubs.c: In function ‘exexc_’:
stubs.c:76:13: warning: implicit declaration of function ‘mmsa_’; did 
you mean ‘memset’? [-Wimplicit-function-declaration]
case 'A': mmsa_(); break;

相关的代码段，即stubs.c中的exexc函数是：

#include <setjmp.h>
int setjmp(jmp_buf env);
void exexc_(name, i1, i2, i3, i4, i5, namelen)
char *name;
shortint *i1, *i2, *i3, *i4, *i5;
long namelen;
{
static jmp_buf env;
static int first = 1;
static char segment[6];
ipx[0] = *i1;
ipx[1] = *i2;
ipx[2] = *i3;
ipx[3] = *i4;
ipx[4] = *i5;
strncpy(segment, name, namelen);
if( ! first ) longjmp(env, 1);
if( first )
{
first = 0;
setjmp(env);
switch(segment[3]) {
case 'A': mmsa_(); break;
case 'B': mmsb_(); break;
case 'C': mmsc_(); break;
case 'D': mmsd_(); break;
case 'E': mmse_(); break;
case 'F': mmsf_(); break;
case 'G': mmsg_(); break;
case 'H': mmsh_(); break;
case 'I': mmsi_(); break;
case 'J': mmsj_(); break;
case 'K': mmsk_(); break;
case 'L': mmsl_(); break;
default:
fprintf(stderr, "Whoa, attempted to call segment %sn", segment);
fflush(stderr);
exit(1);
}
fprintf(stderr, "Oops, segment %s didn't call next segmentn", segment);
fflush(stderr);
exit(2);
}
}

我需要在stubs.c文件中更改什么，以便声明"case"A"：mmsa_(("函数？如果有帮助的话，那么mmsa指的是同一本地目录中的另一个文件mmsa.c。

如果你需要的话，很乐意提供更多信息。我已经20多年没有玩过这个游戏了(！(，所以如果有任何帮助，我们将不胜感激。

Answer 1

这"只是"一个警告，函数调用没有任何参数，也没有检索到任何返回值，因此应该可以安全地写入：

void mmsa_(void);
void mmsb_(void);
...

等等

如果您有声明这些函数的头文件，那就更好了，因为您可以包含它们，而不是直接声明它们。

当然，你必须链接到包含mmsa_和其他函数代码的库或对象，否则你会得到一个链接错误(问题会转移到链接阶段(

顺便说一句：考虑重构代码以删除K&R旧式参数声明，它非常过时并且容易出错。