Fortran Coder

查看: 10621|回复: 7
打印 上一主题 下一主题

[混编] C++调用fortran问题

[复制链接]

13

帖子

3

主题

0

精华

入门

F 币
70 元
贡献
36 点
跳转到指定楼层
楼主
发表于 2017-10-27 22:14:53 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
环境:VS2008+Intel XE2011
C++部分,已添加项目依赖项,C++工程已添加附加库C:\Program Files (x86)\Intel\ComposerXE-2011\compiler\lib\intel64"
[C++] 纯文本查看 复制代码
#define HAS_FORTRAN true
#include "Sim.h"

using namespace std;
extern "C" void  F_TEST1();   //不能要 __stdcall
int TASKMAIN()
{
// Start your task code here
    F_TEST1();
    return TASK_OK;
}


FORTRAN部分
[Fortran] 纯文本查看 复制代码
subroutine F_TEST1
integer :: x=5,y=5,z
z=x+y
WRITE (*,*) z
READ (*,*) z
end subroutine


提示:
1>lib2.lib(Source1.obj) : error LNK2019: 无法解析的外部符号 _for_write_seq_lis,该符号在函数 _F_TEST1 中被引用
1>lib2.lib(Source1.obj) : error LNK2019: 无法解析的外部符号 _for_read_seq_lis,该符号在函数 _F_TEST1 中被引用

实在找不出原因,求助专家们。

分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

1958

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1341 元
贡献
565 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

沙发
发表于 2017-10-28 14:21:42 | 只看该作者
C++里连接输入增加一个 ifconsol.lib

13

帖子

3

主题

0

精华

入门

F 币
70 元
贡献
36 点
板凳
 楼主| 发表于 2017-10-31 15:06:42 来自移动端 | 只看该作者
还是一样不行。fortran调fortran的lib是好的。

2017-10-31_14.50.44.jpg (80.73 KB, 下载次数: 372)

2017-10-31_14.50.44.jpg

712

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
607 元
贡献
311 点

新人勋章爱心勋章水王勋章元老勋章热心勋章

地板
发表于 2017-10-31 15:59:47 | 只看该作者
来,加本论坛QQ群,2338021,我给你远程协助。

13

帖子

3

主题

0

精华

入门

F 币
70 元
贡献
36 点
5#
 楼主| 发表于 2017-10-31 23:00:25 | 只看该作者
我发现了:
我添加了Intel64,而且放在了ia32的上面。。。把intel64去掉了就好了。。

13

帖子

3

主题

0

精华

入门

F 币
70 元
贡献
36 点
6#
 楼主| 发表于 2017-10-31 23:05:06 | 只看该作者
话说为什么要intel64这个目录

13

帖子

3

主题

0

精华

入门

F 币
70 元
贡献
36 点
7#
 楼主| 发表于 2017-10-31 23:05:58 | 只看该作者
我是64位win7

954

帖子

0

主题

0

精华

大师

F 币
184 元
贡献
75 点

规矩勋章元老勋章新人勋章水王勋章热心勋章

QQ
8#
发表于 2017-11-1 08:52:57 | 只看该作者
请看
http://fcode.cn/guide-105-1.html
第三个问题 《32位和64位的一些问题》
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-4-25 07:51

Powered by Tencent X3.4

© 2013-2024 Tencent

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