查看: 8851|回复: 4

极限测试之Matlab与Forcal动态内存管理效率

[复制链接]

字体大小: 正常放大

forcal

45 主题	3 听众	282 积分

升级 91%

TA的每日心情

	难过 2012-8-27 18:22

签到天数: 1 天

[LV.1]初来乍到

电梯直达

1^#

发表于 2011-8-2 09:51 |只看该作者 |倒序浏览

|招呼Ta 关注Ta

这里用一个不太常用的小例子说明一下。

matlab 2009a代码：

clear all
5 v! J8 S+ c/ o, Q
tic
# u0 V/ J7 ~! A2 I
s=0;- [! Y( M5 n/ _/ t/ L( `+ f
for k=1:1000. K, m0 ]2 W$ X) {
for i=1:10006 k, r8 c( o7 Z- s4 F
a=linspace(2,2,1000);) U, |( l- B. v# C6 I* C- x
s=s+a(i);4 i3 A! r' r\" L0 x- n
end
3 x4 ~/ _ ^+ V! I' t. }0 U
end
8 w, K0 j+ }. H4 j8 u7 x( P
s3 t8 H; w/ a1 I \7 ]: t\" F
toc* `/ i& @( O: J4 k0 [# r' i' b
& e8 g7 W6 T2 b# `/ r
s =2 v2 s$ h/ V r+ a! I
7 |+ x3 o! N' R+ y$ n5 X3 ^
2000000
. E& o9 Y% I5 X- D/ B% F; F
! ?- `\" m9 I( n; v
Elapsed time is 18.325900 seconds.

复制代码

程序运行时内存比较稳定。

－－－－－－－－

Forcal代码：

!using["math","sys"];5 D, a% ], g$ {
mvar:
6 s b, v7 _( ]& h\\" F9 x9 x
main(:a)=) C+ |% R; C1 K* g) i* W, C\\" J
t0=clock(),5 T0 n& j, c6 c+ n\\" P\\" d
s=0,
( m( x8 P2 `0 K5 K/ p
k=0, while{k<1000,& ?! }+ a8 u\\" Q2 }2 G4 M
i=0, while{i<1000, a=linspace(2,2,1000), s=s+a.i, i++}, // 嗯，a.i 就是 a(i)
( C1 @, x8 v% O
k++& F& L5 I& k2 w3 s$ H
},5 ]9 C3 q6 y& X) O) h
s;
) r/ v W\\" K* v: L5 j
[clock()-t0]/1000;

结果：
2000000.
40.766 秒

程序运行时内存不稳定，时大时小。该程序导致Forcal垃圾收集器启动约10次，垃圾收集前内存消耗大，垃圾收集后内存小。
因垃圾收集器多次启动，故耗时较长。

－－－－－－－－－－－－

以下将a=linspace(2,2,1000)放到了oo{ }函数中：

!using["math","sys"];( ^+ R% R2 `3 Y& J\\" M
mvar:: H3 d\\" y2 u5 u7 E* p
main(:a)=2 r1 A0 V+ P* {. v. P
t0=clock(),
( } e4 N. b8 k+ g4 N# A
s=0,
! \% D x( @, v# F, b, ~
k=0, while{k<1000,9 Q6 h! m% d& D2 K: T
i=0, while{i<1000, oo{a=linspace(2,2,1000)}, s=s+a.i, i++}, // 嗯，a.i就是a(i)2 O7 {& l @- Y( U
k++( @& F% p8 c, j) h- E) Q
},$ U9 a0 ~/ q/ Q' n' ~
s;4 l# b& G; W1 A$ u0 e
[clock()-t0]/1000;