- 在线时间
- 13 小时
- 最后登录
- 2013-12-8
- 注册时间
- 2010-5-13
- 听众数
- 3
- 收听数
- 0
- 能力
- 0 分
- 体力
- 399 点
- 威望
- 11 点
- 阅读权限
- 30
- 积分
- 282
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 97
- 主题
- 45
- 精华
- 0
- 分享
- 0
- 好友
- 1
升级 91% TA的每日心情 | 难过 2012-8-27 18:22 |
---|
签到天数: 1 天 [LV.1]初来乍到
|
这里谈不上是极限测试了,只是还借用这个名称。4 J3 N; v( f, x8 _) ^( W; |
- X; j S3 c! r+ s
我们将通过错误处理检测经过多少次运行某个程序才能运行成功,即:通常程序运行时会出现运行错误,我们要测试一下程序运行多少次才能成功一次。' n. [& [* x; t+ v6 u. [4 M) \
: O) U) g! e) I: F# E+ m- R& i
在这个例子中,函数what(n,k)是这样设计的:n为大于1的整数,k为大于1的系数。生成一个长度为n的0~1之间均匀分布的随机数数组a,设m=n*k, mm=n*(k-1)/2,尝试取数组a的每一个元素a[a(i)*m-mm],其中a(i)*m-mm是元素的下标。这样,若元素下标有效,则取值成功,否则将产生一个运行错误。* J0 x/ o5 o! M+ [$ }- [
2 B6 H3 P# |" L- ]( g F
例如:n=10, k=1.1,则m=11, mm=0.5,设生成的随机数如下:
3 G) v9 N; p2 Y: i0.2, 0.05, 0.97, 0.8, 0.5, 0.7, 0.6, 0.4, 0.3, 0.6
" \' j. r) F) z0 s; ?0 _第1个数0.2的计算下标为:a(i)*m-mm=0.2*11-0.5=1.7,下标取整后为1,则这个下标是有效的;( }! r9 ~; q7 [4 y( f; h O" g
第2个数0.05的计算下标为:a(i)*m-mm=0.05*11-0.5=0.05,下标取整后为0,则这个下标是有效的;
: w1 b7 p( q# A' V1 b$ B0 p第3个数0.97的计算下标为:a(i)*m-mm=0.97*11-0.5=10.17,下标取整后为10,则这个下标是无效的;
6 E" |3 p# ^+ P7 ^% C9 v1 W以此类推。* H; h% G$ ?/ ?* ?: x. A7 g8 _
5 b6 k# O5 Z2 y/ b5 @, W$ ^
主函数main中有一个循环,不断执行what[100,1.1],然后检测运行错误,若出现运行错误且出错函数名为math:get,说明是函数what()中的元素下标出错,则清除运行错误,继续循环,直至函数what()运行成功,或者出现非math:get给出的运行错误(例如,用户终止程序运行产生的运行错误),变量i统计运行了多少次才成功了一次。6 T+ Y3 B, T* c+ a4 T" F1 R
$ Z0 ^9 J6 h Y; c/ r7 \" t, t
Forcal程序:- !using["math","string"];7 k' Q8 @& [5 U* V& }5 y; [
- what(n,k:a,i,m,mm)=' [; z# I# L8 v) }' `0 K4 D0 \
- oo{a = rand(n,1).reshape()}, m=n*k, mm=n*(k-1)/2,
- 9 j* H* U, ^* n c
- i=0, while{i<n, a[a(i)*m-mm], i++};
- R+ r8 @* r; e% X
- ) a* n. q' ` v0 p& P- k\\" O
- main(:i,ErrType,FunName,FunNameLen)=
- - G! Z\\" Z2 H6 ]$ y
- FunName="\[80]", FunNameLen=80,& x4 J( G' ~5 {( ^8 n0 ? G
- i=0,
- 8 Q0 Q( t, Y, l7 \ I& o9 @6 P
- while{1,
- - \ z ^% o- R+ L9 S0 ~
- i++,
- % e0 _! O2 h& T2 i. R6 @5 ], G
- what[100,1.1], //这个函数运行时可能返回运行错误+ w* u+ S! S! D+ m6 B5 w
- geterr(&ErrType,FunName,FunNameLen,0,0,0), //获取Forcal运行错误/ I+ A+ z+ a5 {: S1 v$ q' y
- if{!ErrType, break()}, //what正常运行,退出
- , }9 ~% S5 H) p3 c
- oo{if{wcscmp[ws(FunName),ws("math::oget")], break()}}, //不是函数math::oget给出的运行错误,退出! G9 m$ e; a' t; x: j( v% a
- clearerr() //清除Forcal运行错误
- * x; f: z- f% f9 G) r
- },0 x7 Z$ c! p+ m* E8 w0 V* F9 f
- i;
多次运行,一些可能的结果如下:8 [, J7 {& E( n: M( h3 Z
1518.
" s$ a' Q2 C7 ?' Z5 |448.5 v9 Z$ k T) p
1518.# U5 ?2 I/ Y/ k/ H
448.* T1 T* m% f" J; m" X! H7 M
4795.% i" k' }& K+ O
448.. V. ~) Q6 B8 f+ }
1518.$ L9 Q1 D) U. y7 P9 ~# d
448.
: W4 [& z1 _6 F* S3 F- I/ D1518.+ {, c' ~2 q. N. l1 B5 _% f5 C* I( @
3725.: b: A0 ?; X, g# R
1518. J# C2 ?3 j# a: \. o$ M; u
448.0 v: V! j7 T% c2 w0 k) G0 f+ m Q# o c
' }% h- I S0 V1 c( K) I对matlab的异常处理不熟悉,哪位朋友有兴趣给出此例的matlab版本?谢谢! |
zan
|