声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1929|回复: 1

[其他相关] 求助:ANSYS的UPFS编译的又一个错误

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

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

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

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

  3. ANSZIP.C的具体代码如下:

  4. /*CFILE anszip.c  ANSI_C      <author, 2/12/98> */
  5. /*---------------------------------------------------------------------*/
  6. /* copyright(c) 2006 SAS IP, Inc.  All rights reserved. */
  7. /* ansys, inc. */
  8. #include <stdio.h>
  9. #include <stdlib.h>
  10. #include "ansys.h"
  11. #if defined(PCWINNT_SYS)
  12. #include "windows.h"
  13. #endif
  14. #include "uisysh.h"
  15. static INT is_start = 0;
  16. #if !defined(PCWINNT_SYS)
  17. extern void anszzz_(INT*);
  18. extern void icmdan_(INT*,INT*);
  19. extern void ansgui_(INT*,INT*,INT*);
  20. extern void ansend_();
  21. extern void ender_(INT*);
  22. #else
  23. extern void CALLTYP ender_(INT *);
  24. #endif
  25. extern INT  ansjmp_();
  26. void
  27. anszip(void)
  28. {
  29.    anszzz_(&is_start);
  30. /* is_start = *n; */
  31. }
  32. void
  33. anscmd(char *ccmd)
  34. {
  35. INT iicmd[81], i, do_end, key;
  36. static char *fini_cmd = {"FINI"};
  37. char *c_ptr;
  38. INT ijmp;
  39. ijmp = 0;
  40. ijmp = ansjmp_();
  41. if (ijmp != 0)
  42.    {
  43.     is_start = 0;
  44.     return;
  45.    }
  46. if (!is_start) return;
  47. if ((ccmd[0]=='/') && (ccmd[1]=='E') && (ccmd[2]=='X') && (ccmd[3]=='I'))
  48.    {
  49.     do_end = 1;
  50.     c_ptr = fini_cmd;
  51.    }
  52. else
  53.    {
  54.     do_end = 0;
  55.     c_ptr = ccmd;
  56.    }
  57. for (i=0;(c_ptr!='\0' && i<80);i++)
  58.     {
  59.      iicmd = (INT)c_ptr;
  60.     }
  61. key = 0;
  62. ansgui_(&i,iicmd,&key);
  63. if (key != 1) icmdan_(&i,iicmd);
  64. if (do_end)
  65.    {
  66.     key = 0;
  67.     ender_(&key);
  68.     ansend_();
  69.     is_start = 0;
  70.    }
  71. }
  72. void
  73. anscmdCl(int InStringSz,char **InString)
  74. {
  75. anscmd(*InString);
  76. }
复制代码
回复
分享到:

使用道具 举报

发表于 2008-1-3 14:24 | 显示全部楼层
看看形参是否一致,这个错误提示给的很清楚了,自己对一下吧
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

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

GMT+8, 2024-12-24 00:55 , Processed in 0.085486 second(s), 17 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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