查看: 8939|回复: 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\" R4 P( o- b( v- w( ~
tic- K+ e4 d/ H$ }7 R# a* M5 \
s=0;$ E1 o9 L' p& N* ]7 N$ V$ h
for k=1:1000
1 _; X% Y9 O9 t/ m
for i=1:1000
( f& L2 |/ z/ a3 k7 `$ X
a=linspace(2,2,1000);+ Z7 k8 J) z6 x0 a# J [
s=s+a(i);\" Q* @7 U$ `' L8 h
end\" F3 g4 S, E g\" G
end
- f+ Z; B! r: b$ `# Y0 x
s
]( Y5 @1 F6 s
toc
% ], s( j( @: d$ _6 _( P/ g
+ L0 b1 k8 _& ?0 @$ z o
s =
4 R' p$ K1 O. {7 P
2 ?. X0 W A1 y' I+ p6 F
2000000
7 A/ l& ?- Q; Q& K
) u; \7 o# G9 l
Elapsed time is 18.325900 seconds.

复制代码

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

－－－－－－－－

Forcal代码：

!using["math","sys"];
- `# O\\" V( r; ~! Q5 F
mvar:
# h0 _4 x) A+ ]\\" [, Y4 Y H( A- i
main(:a)=
7 X) Q% b$ x$ c
t0=clock(),
Q7 n' a }$ X8 d' S8 ?
s=0,- ^+ G! }\\" u' S+ y! X* F. n
k=0, while{k<1000,
: Q2 }) `' G) a; {
i=0, while{i<1000, a=linspace(2,2,1000), s=s+a.i, i++}, // 嗯，a.i 就是 a(i)
g/ r* l) H6 A! e0 I0 @\\" ^
k++2 n* I( H' s C2 u0 s% n' J0 C
},
6 b7 D* G) \. X8 j4 T) e6 m/ `
s;
; V/ ~$ \% d: f3 t. n
[clock()-t0]/1000;

结果：
2000000.
40.766 秒

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

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

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

!using["math","sys"];* L) [3 @/ R3 `
mvar:
2 m% S4 A- v( @* O: \) R8 c0 L
main(:a)=4 N( `1 S. z$ |
t0=clock(),) c; Q9 z+ N; y) e# j) v( \' ?\\" m
s=0,* `4 C# s5 x( C
k=0, while{k<1000,( @, T% [6 T5 {% N' `\\" t
i=0, while{i<1000, oo{a=linspace(2,2,1000)}, s=s+a.i, i++}, // 嗯，a.i就是a(i)+ k) w [5 v; ^5 n9 J
k++
2 t, I& Z2 a# V; C$ q
},4 w) _8 L! v7 G4 K4 k& v
s;0 i: H' [& h! E: d\\" S; l
[clock()-t0]/1000;