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

forcal

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

/ r) Z8 Q7 g& T7 q3 G9 zmatlab 2009a代码：

1. clear all; U; m* q6 I\" m# C: B1 N5 u\" t\" s
   
2. tic5 C/ Y9 v9 A/ O5 x% k  k( `
   
3. s=0;
   $ [. N& P7 X  s' V( ?* Y& }  W
4. for k=1:10008 D5 _& G4 m7 i. L$ M$ q. I
   
5.   for i=1:1000* }6 |! }0 \% e# I' L
   
6.     a=linspace(2,2,1000);
   - j9 N+ X! o* q+ _
7.     s=s+a(i);; Y& P- R$ _6 w$ T2 C$ ^' D
   
8.   end  f# |9 W. J7 m5 @! J1 @! ^
   
9. end
     A) J  T7 r% Z. w2 _  e0 Y3 B9 p! {
10. s
    - p5 n! }) b& i$ p1 f% ^% a
11. toc' j; D  t. u% p% H
    
12. 6 g' u9 x- I5 e  _0 `' G, C: ?% K
    
13. s =- s- r  D8 c$ k8 ~% N
    
14. 
    ; B+ Z. |4 }0 Y6 M% |
15.      2000000& _. b  X5 x& N# h5 I& d
    
16. / Q8 x9 J' ]  E+ V( q# X
    
17. Elapsed time is 18.325900 seconds.

复制代码

程序运行时内存比较稳定。
7 r: v6 N& f! f8 F) h. d- s
8 ]3 ?; q8 p, v& c( y# j& Y+ F－－－－－－－－

Forcal代码：

2. !using["math","sys"];8 f) h; q7 t% m: K, \2 N6 ^3 i* t
   
4. mvar:
   
5. 5 a- j( N3 S8 A1 c/ ~2 o
6. main(:a)=
   
7. # B. U# U9 e- \
8. t0=clock(),( f7 h3 {( u( I
   
10. s=0,
    
11. , V/ t0 h4 \* {\\" A! [9 E4 e
12. k=0, while{k<1000,
    
13. / s\\" A( X+ R5 b; q
14.   i=0, while{i<1000, a=linspace(2,2,1000), s=s+a.i, i++},  // 嗯，a.i 就是 a(i); ?  b2 e6 ^0 m5 x0 A% N7 m1 u( e- P
    
16.   k++
    
17. 8 e0 }+ |+ Z$ F% b9 E8 c
18. },) S; i4 l( g8 w9 o\\" z% o+ R$ q
    
20. s;
    
21. ( J, A+ K  E0 ]2 x! U
22. [clock()-t0]/1000;

!using["math","sys"];<font class=\\"jammer\\">8 f) h; q7 t% m: K, \2 N6 ^3 i* t</font><br /> mvar:<br /> <span style=\\"display:none\\">5 a- j( N3 S8 A1 c/ ~2 o</span> main(:a)=<br /> <span style=\\"display:none\\"># B. U# U9 e- \</span> t0=clock(),<font class=\\"jammer\\">( f7 h3 {( u( I</font><br /> s=0,<br /> <span style=\\"display:none\\">, V/ t0 h4 \* {\\" A! [9 E4 e</span> k=0, while{k<1000,<br /> <span style=\\"display:none\\">/ s\\" A( X+ R5 b; q</span>   i=0, while{i<1000, a=linspace(2,2,1000), s=s+a.i, i++},  // 嗯，a.i 就是 a(i)<font class=\\"jammer\\">; ?  b2 e6 ^0 m5 x0 A% N7 m1 u( e- P</font><br />   k++<br /> <span style=\\"display:none\\">8 e0 }+ |+ Z$ F% b9 E8 c</span> },<font class=\\"jammer\\">) S; i4 l( g8 w9 o\\" z% o+ R$ q</font><br /> s;<br /> <span style=\\"display:none\\">( J, A+ K  E0 ]2 x! U</span> [clock()-t0]/1000;

结果：
: z! ^7 T- P, G" k& x2000000.
+ S+ s0 q; }2 L4 Y% S$ T9 p40.766 秒
  v5 V8 r1 Q6 N) v* [" |# @
5 _& h: {3 B6 {! d& W/ I程序运行时内存不稳定，时大时小。该程序导致Forcal垃圾收集器启动约10次，垃圾收集前内存消耗大，垃圾收集后内存小。
因垃圾收集器多次启动，故耗时较长。

# q& Q% B9 Q6 f2 L' Y－－－－－－－－－－－－

1 x3 s' R& Z: w6 ^8 S1 Z以下将a=linspace(2,2,1000)放到了oo{  }函数中：

2. !using["math","sys"];
   
3. + j3 u+ i* u5 F) A
4. mvar:
   
5. + [2 N/ Q\\" _7 ^8 [* l
6. main(:a)=8 w( h+ a% W( n3 _: h, @4 b
   
8. t0=clock(),& d8 A5 b/ [% ^
   
10. s=0,
    
11. / U# e, a# U1 o2 `8 l
12. k=0, while{k<1000,% e0 V/ c3 ]; {/ b8 j
    
14.   i=0, while{i<1000, oo{a=linspace(2,2,1000)}, s=s+a.i, i++},  // 嗯，a.i就是a(i)
    
15. ' a3 e- H. D6 ~) z5 Y+ M
16.   k++
    
17. / L2 a& k& ~1 |& |# d0 n
18. },
    
19. % v\\" _/ ]6 @! y$ Y$ P\\" p
20. s;- r( N: w: C8 L' o! d) P( ^
    
22. [clock()-t0]/1000;

!using["math","sys"];<br /> <span style=\\"display:none\\">+ j3 u+ i* u5 F) A</span> mvar:<br /> <span style=\\"display:none\\">+ [2 N/ Q\\" _7 ^8 [* l</span> main(:a)=<font class=\\"jammer\\">8 w( h+ a% W( n3 _: h, @4 b</font><br /> t0=clock(),<font class=\\"jammer\\">& d8 A5 b/ [% ^</font><br /> s=0,<br /> <span style=\\"display:none\\">/ U# e, a# U1 o2 `8 l</span> k=0, while{k<1000,<font class=\\"jammer\\">% e0 V/ c3 ]; {/ b8 j</font><br />   i=0, while{i<1000, oo{a=linspace(2,2,1000)}, s=s+a.i, i++},  // 嗯，a.i就是a(i)<br /> <span style=\\"display:none\\">' a3 e- H. D6 ~) z5 Y+ M</span>   k++<br /> <span style=\\"display:none\\">/ L2 a& k& ~1 |& |# d0 n</span> },<br /> <span style=\\"display:none\\">% v\\" _/ ]6 @! y$ Y$ P\\" p</span> s;<font class=\\"jammer\\">- r( N: w: C8 L' o! d) P( ^</font><br /> [clock()-t0]/1000;

结果：
2000000.
4.609 秒

6 ?. [( d7 b, V7 h  E可以发现，Forcal耗时大大减少了，远小于matlab耗时，这要归功于oo{ }函数。
在Forcal中，函数oo{ }不仅提供了运算符重载功能，而且会自动高效地回收垃圾。通常，所有涉及到对象的代码都要放到函数oo{ }中。

我就在你背后

太强大了 看不懂啊

forcal

我就在你背后 发表于 2011-8-2 16:08
太强大了 看不懂啊

函数linspace(2,2,1000)放到循环里，每循环一次就会产生一个垃圾对象（一维数组），主要对比Matlab和Forcal如何处理垃圾对象和进行内存管理。

我就在你背后

forcal 发表于 2011-8-2 18:18
函数linspace(2,2,1000)放到循环里，每循环一次就会产生一个垃圾对象（一维数组），主要对比Matlab和Forc ...

恩 我在研究研究，谢谢了

sxjm567

我反复看了多遍，好帖，得支持