Fortran Coder

查看: 43|回复: 0

[IDE] Makefile项目管理

[复制链接]

41

帖子

6

主题

0

精华

专家

超凡脱俗

F 币
296 元
贡献
157 点
发表于 2018-11-5 23:11:09 | 显示全部楼层 |阅读模式
本帖最后由 Jackdaw 于 2018-11-6 08:48 编辑

写在前面:
在开发程序的时候,可能程序规模不大或者其他原因,我们想自己写makefile管理项目,那么这个帖子有一个示例。
闲话少说,上代码。

代码:

main.f90


[Fortran] 纯文本查看 复制代码
program main 
        use func_m
        implicit none 
        real(fp):: a(5)
        call sub(a) 
        write(*,*) a
end program main 


fun.f90


[Fortran] 纯文本查看 复制代码
module func_m
        implicit none 
#ifdef DOUBLE_PRECISION
        integer,parameter :: fp = kind(1.0d0)
#else 
        integer,parameter :: fp = kind(1.0)
#endif

        contains 

subroutine sub(a)
        real(fp):: a(:)
        a = 10.0_fp 
end subroutine 
end module 


makefile


[Make] 纯文本查看 复制代码
#!/usr/bin/bash 
SRC = fun.f90 
SRC:= $(SRC) main.f90 
OBJ = $(SRC:.f90=.o)
FC  = gfortran 
FF  = -cpp -O0 -g -fbacktrace 
DF  = -DDOUBLE_PRECISION 
EXE = myPro

ALL : $(OBJ) 
        $(FC) $(FF) $(DF) -o $(EXE) *.o 
        
$(OBJ):%.o:%.f90 
        $(FC) $(FF) $(DF) -c $< -o $@
        
.PONHY: clean
clean :        
        rm -rf *.mod *.o $(EXE) 


演示:




演示

演示

评分

参与人数 1权杖 +10 F 币 +20 收起 理由
fcode + 10 + 20 很给力!

查看全部评分

天下英雄出我辈,一入江湖岁月催。

鸿图霸业谈笑间,不胜人生一场醉。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

QQ|捐赠本站|Archiver|关于我们 About Us|群聊|Fcode

GMT+8, 2018-11-14 06:50

Powered by Discuz! X3.2

© 2001-2017 Comsenz Inc.

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