program ex1
implicit none
integer::a
a=10
call sub()
write(*,*)a
end
subroutine sub()
implicit none
integer::a
a=20
write(*,*)a
return
end
module global
implicit none
integer::a
end module
program ex
use global
implicit none
a=10
call sub()
write(*,*)a
end
subroutine sub()
use global
implicit none
a=20
write(*,*)a
return
end
2015-12-01_152826.jpg (34.71 KB, 下载次数: 455)
fcode 发表于 2015-12-1 15:45
是的。这是一个有争议的问题。
虽然语法没明确说 module 变量一定具有 save 属性。但我们接触到的所有编译 ...
Glen 发表于 2022-10-17 23:28
module有点像c++里面的static变量,是存放在内存空间的全局/静态区,而不是栈区或堆区。不知我说的对不对。 ...
kyra 发表于 2022-10-18 09:24
module中的变量,生命周期是整个程序运行期间。作用域只在use了该module的程序单元。
至于他存储的位置, ...
欢迎光临 Fortran Coder (http://bbs.fcode.cn/) | Powered by Discuz! X3.2 |