声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 971|回复: 0

[综合讨论] 求助:ANSYS的UPFS编译的又一个错误

[复制链接]
发表于 2007-12-14 13:09 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
在编译UPFS的一个用户程序时,在c_comp.log文件中,有“ANSZIP.C
ANSZIP.C(21) : warning C4028: 形参 1 与声明不同”这样的错误提示。如何解决?望高人指点。谢谢!

ANSZIP.C的具体代码如下:

/*CFILE anszip.c  ANSI_C      <author, 2/12/98> */
/*---------------------------------------------------------------------*/
/* copyright(c) 2006 SAS IP, Inc.  All rights reserved. */
/* ansys, inc. */
#include <stdio.h>
#include <stdlib.h>
#include "ansys.h"
#if defined(PCWINNT_SYS)
#include "windows.h"
#endif
#include "uisysh.h"
static INT is_start = 0;
#if !defined(PCWINNT_SYS)
extern void anszzz_(INT*);
extern void icmdan_(INT*,INT*);
extern void ansgui_(INT*,INT*,INT*);
extern void ansend_();
extern void ender_(INT*);
#else
extern void CALLTYP ender_(INT *);
#endif
extern INT  ansjmp_();
void
anszip(void)
{
   anszzz_(&is_start);
/* is_start = *n; */
}
void
anscmd(char *ccmd)
{
INT iicmd[81], i, do_end, key;
static char *fini_cmd = {"FINI"};
char *c_ptr;
INT ijmp;
ijmp = 0;
ijmp = ansjmp_();
if (ijmp != 0)
   {
    is_start = 0;
    return;
   }
if (!is_start) return;
if ((ccmd[0]=='/') && (ccmd[1]=='E') && (ccmd[2]=='X') && (ccmd[3]=='I'))
   {
    do_end = 1;
    c_ptr = fini_cmd;
   }
else
   {
    do_end = 0;
    c_ptr = ccmd;
   }
for (i=0;(c_ptr!='\0' && i<80);i++)
    {
     iicmd = (INT)c_ptr;
    }
key = 0;
ansgui_(&i,iicmd,&key);
if (key != 1) icmdan_(&i,iicmd);
if (do_end)
   {
    key = 0;
    ender_(&key);
    ansend_();
    is_start = 0;
   }
}
void
anscmdCl(int InStringSz,char **InString)
{
anscmd(*InString);
}
回复
分享到:

使用道具 举报

您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-11-14 20:50 , Processed in 0.058349 second(s), 18 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表