Hex Artifact Content
Not logged in

Artifact 09cc57fcd7c969ca711aeb927df90de64b1972bd:


0000: 2f 2a 2a 0a 20 2a 20 41 75 74 68 6f 72 73 3a 20  /**. * Authors: 
0010: 6b 2e 69 6e 61 62 61 0a 20 2a 20 4c 69 63 65 6e  k.inaba. * Licen
0020: 73 65 3a 20 4e 59 53 4c 20 30 2e 39 39 38 32 20  se: NYSL 0.9982 
0030: 68 74 74 70 3a 2f 2f 77 77 77 2e 6b 6d 6f 6e 6f  http://www.kmono
0040: 73 2e 6e 65 74 2f 6e 79 73 6c 2f 0a 20 2a 0a 20  s.net/nysl/. *. 
0050: 2a 20 55 6e 69 74 74 65 73 74 20 68 65 6c 70 65  * Unittest helpe
0060: 72 73 2e 0a 20 2a 2f 0a 6d 6f 64 75 6c 65 20 74  rs.. */.module t
0070: 72 69 63 6b 73 2e 74 65 73 74 3b 0d 0a 69 6d 70  ricks.test;..imp
0080: 6f 72 74 20 73 74 64 2e 63 6f 6e 76 20 3a 20 74  ort std.conv : t
0090: 6f 3b 0a 69 6d 70 6f 72 74 20 63 6f 72 65 2e 65  o;.import core.e
00a0: 78 63 65 70 74 69 6f 6e 3b 0a 0a 2f 2f 2f 20 55  xception;../// U
00b0: 6e 69 74 74 65 73 74 20 68 65 6c 70 65 72 20 74  nittest helper t
00c0: 68 61 74 20 61 73 73 65 72 74 73 20 61 6e 20 65  hat asserts an e
00d0: 78 70 72 65 73 73 69 6f 6e 20 6d 75 73 74 20 74  xpression must t
00e0: 68 72 6f 77 20 73 6f 6d 65 74 68 69 6e 67 0a 0a  hrow something..
00f0: 76 6f 69 64 20 61 73 73 65 72 74 5f 74 68 72 6f  void assert_thro
0100: 77 28 45 78 63 65 70 74 69 6f 6e 54 79 70 65 2c  w(ExceptionType,
0110: 20 54 2c 20 73 74 72 69 6e 67 20 66 6e 3d 5f 5f   T, string fn=__
0120: 46 49 4c 45 5f 5f 2c 20 73 69 7a 65 5f 74 20 6c  FILE__, size_t l
0130: 6e 3d 5f 5f 4c 49 4e 45 5f 5f 29 28 6c 61 7a 79  n=__LINE__)(lazy
0140: 20 54 20 74 2c 20 73 74 72 69 6e 67 20 6d 73 67   T t, string msg
0150: 3d 22 22 29 0a 7b 0a 09 74 72 79 0a 09 09 7b 20  ="").{..try...{ 
0160: 74 28 29 3b 20 7d 0a 09 63 61 74 63 68 28 45 78  t(); }..catch(Ex
0170: 63 65 70 74 69 6f 6e 54 79 70 65 29 0a 09 09 7b  ceptionType)...{
0180: 20 72 65 74 75 72 6e 3b 20 7d 0a 09 63 61 74 63   return; }..catc
0190: 68 28 54 68 72 6f 77 61 62 6c 65 20 65 29 0a 09  h(Throwable e)..
01a0: 09 7b 20 6f 6e 41 73 73 65 72 74 45 72 72 6f 72  .{ onAssertError
01b0: 4d 73 67 28 66 6e 2c 20 6c 6e 2c 20 6d 73 67 2e  Msg(fn, ln, msg.
01c0: 6c 65 6e 67 74 68 20 3f 20 6d 73 67 20 3a 20 22  length ? msg : "
01d0: 62 61 64 20 65 78 63 65 70 74 69 6f 6e 5c 6e 20  bad exception\n 
01e0: 3e 3e 20 22 7e 65 2e 74 6f 53 74 72 69 6e 67 28  >> "~e.toString(
01f0: 29 29 3b 20 7d 0a 09 6f 6e 41 73 73 65 72 74 45  )); }..onAssertE
0200: 72 72 6f 72 4d 73 67 28 66 6e 2c 20 6c 6e 2c 20  rrorMsg(fn, ln, 
0210: 6d 73 67 2e 6c 65 6e 67 74 68 20 3f 20 6d 73 67  msg.length ? msg
0220: 20 3a 20 22 6e 6f 74 20 74 68 72 6f 77 6e 22 29   : "not thrown")
0230: 3b 0a 7d 0a 0a 2f 2f 2f 20 55 6e 69 74 74 65 73  ;.}../// Unittes
0240: 74 20 68 65 6c 70 65 72 20 74 68 61 74 20 61 73  t helper that as
0250: 73 65 72 74 73 20 61 6e 20 65 78 70 72 65 73 73  serts an express
0260: 69 6f 6e 20 6d 75 73 74 20 6e 6f 74 20 74 68 72  ion must not thr
0270: 6f 77 20 61 6e 79 74 68 69 6e 67 0a 0a 61 75 74  ow anything..aut
0280: 6f 20 61 73 73 65 72 74 5f 6e 6f 74 68 72 6f 77  o assert_nothrow
0290: 28 54 2c 20 73 74 72 69 6e 67 20 66 6e 3d 5f 5f  (T, string fn=__
02a0: 46 49 4c 45 5f 5f 2c 20 73 69 7a 65 5f 74 20 6c  FILE__, size_t l
02b0: 6e 3d 5f 5f 4c 49 4e 45 5f 5f 29 28 6c 61 7a 79  n=__LINE__)(lazy
02c0: 20 54 20 74 2c 20 73 74 72 69 6e 67 20 6d 73 67   T t, string msg
02d0: 3d 22 22 29 0a 7b 0a 09 74 72 79 0a 09 09 7b 20  ="").{..try...{ 
02e0: 72 65 74 75 72 6e 20 74 28 29 3b 20 7d 0a 09 63  return t(); }..c
02f0: 61 74 63 68 28 54 68 72 6f 77 61 62 6c 65 20 65  atch(Throwable e
0300: 29 0a 09 09 7b 20 6f 6e 41 73 73 65 72 74 45 72  )...{ onAssertEr
0310: 72 6f 72 4d 73 67 28 66 6e 2c 20 6c 6e 2c 20 6d  rorMsg(fn, ln, m
0320: 73 67 2e 6c 65 6e 67 74 68 20 3f 20 6d 73 67 20  sg.length ? msg 
0330: 3a 20 22 62 61 64 20 65 78 63 65 70 74 69 6f 6e  : "bad exception
0340: 5c 6e 20 3e 3e 20 22 7e 65 2e 74 6f 53 74 72 69  \n >> "~e.toStri
0350: 6e 67 28 29 29 3b 20 7d 0d 0a 09 61 73 73 65 72  ng()); }...asser
0360: 74 28 66 61 6c 73 65 29 3b 0a 7d 0a 0a 75 6e 69  t(false);.}..uni
0370: 74 74 65 73 74 0a 7b 0a 09 61 75 74 6f 20 65 72  ttest.{..auto er
0380: 72 6f 72 20 3d 20 7b 74 68 72 6f 77 20 6e 65 77  ror = {throw new
0390: 20 45 72 72 6f 72 28 22 68 65 6c 6c 6f 22 29 3b   Error("hello");
03a0: 7d 3b 0a 09 61 75 74 6f 20 6e 6f 74 68 69 6e 67  };..auto nothing
03b0: 20 3d 20 28 29 7b 7d 3b 0a 09 61 75 74 6f 20 61   = (){};..auto a
03c0: 73 73 65 72 74 45 72 72 6f 72 20 3d 20 7b 61 73  ssertError = {as
03d0: 73 65 72 74 28 30 29 3b 7d 3b 0a 0a 09 61 73 73  sert(0);};...ass
03e0: 65 72 74 5f 6e 6f 74 68 72 6f 77 20 20 20 20 20  ert_nothrow     
03f0: 20 20 20 20 20 28 20 61 73 73 65 72 74 5f 6e 6f       ( assert_no
0400: 74 68 72 6f 77 28 6e 6f 74 68 69 6e 67 28 29 29  throw(nothing())
0410: 20 29 3b 0a 09 61 73 73 65 72 74 5f 74 68 72 6f   );..assert_thro
0420: 77 21 41 73 73 65 72 74 45 72 72 6f 72 28 20 61  w!AssertError( a
0430: 73 73 65 72 74 5f 6e 6f 74 68 72 6f 77 28 65 72  ssert_nothrow(er
0440: 72 6f 72 28 29 29 20 29 3b 0a 09 61 73 73 65 72  ror()) );..asser
0450: 74 5f 74 68 72 6f 77 21 41 73 73 65 72 74 45 72  t_throw!AssertEr
0460: 72 6f 72 28 20 61 73 73 65 72 74 5f 6e 6f 74 68  ror( assert_noth
0470: 72 6f 77 28 61 73 73 65 72 74 45 72 72 6f 72 28  row(assertError(
0480: 29 29 20 29 3b 0a 0a 09 61 73 73 65 72 74 5f 6e  )) );...assert_n
0490: 6f 74 68 72 6f 77 20 20 20 20 20 20 20 20 20 20  othrow          
04a0: 28 20 61 73 73 65 72 74 5f 74 68 72 6f 77 21 45  ( assert_throw!E
04b0: 72 72 6f 72 28 65 72 72 6f 72 28 29 29 20 29 3b  rror(error()) );
04c0: 0a 09 61 73 73 65 72 74 5f 74 68 72 6f 77 21 41  ..assert_throw!A
04d0: 73 73 65 72 74 45 72 72 6f 72 28 20 61 73 73 65  ssertError( asse
04e0: 72 74 5f 74 68 72 6f 77 21 45 72 72 6f 72 28 6e  rt_throw!Error(n
04f0: 6f 74 68 69 6e 67 28 29 29 20 29 3b 0a 09 61 73  othing()) );..as
0500: 73 65 72 74 5f 6e 6f 74 68 72 6f 77 20 20 20 20  sert_nothrow    
0510: 20 20 20 20 20 20 28 20 61 73 73 65 72 74 5f 74        ( assert_t
0520: 68 72 6f 77 21 45 72 72 6f 72 28 61 73 73 65 72  hrow!Error(asser
0530: 74 45 72 72 6f 72 28 29 29 20 29 3b 0a 09 61 73  tError()) );..as
0540: 73 65 72 74 5f 74 68 72 6f 77 21 41 73 73 65 72  sert_throw!Asser
0550: 74 45 72 72 6f 72 28 20 61 73 73 65 72 74 5f 74  tError( assert_t
0560: 68 72 6f 77 21 41 73 73 65 72 74 45 72 72 6f 72  hrow!AssertError
0570: 28 65 72 72 6f 72 28 29 29 20 29 3b 0d 0a 7d 0a  (error()) );..}.
0580: 0a 2f 2f 2f 20 55 6e 69 74 74 65 73 74 20 68 65  ./// Unittest he
0590: 6c 70 65 72 73 20 61 73 73 65 72 74 69 6e 67 20  lpers asserting 
05a0: 74 77 6f 20 76 61 6c 75 65 73 20 61 72 65 20 69  two values are i
05b0: 6e 20 73 6f 6d 65 20 72 65 6c 61 74 69 6f 6e 20  n some relation 
05c0: 3d 3d 2c 20 21 3d 2c 20 3c 2c 20 3c 3d 2c 20 3e  ==, !=, <, <=, >
05d0: 2c 20 3e 3d 0a 0a 74 65 6d 70 6c 61 74 65 20 61  , >=..template a
05e0: 73 73 65 72 74 4f 70 28 73 74 72 69 6e 67 20 6f  ssertOp(string o
05f0: 70 29 0a 7b 0a 09 76 6f 69 64 20 61 73 73 65 72  p).{..void asser
0600: 74 4f 70 28 41 2c 20 42 2c 20 73 74 72 69 6e 67  tOp(A, B, string
0610: 20 66 6e 3d 5f 5f 46 49 4c 45 5f 5f 2c 20 73 69   fn=__FILE__, si
0620: 7a 65 5f 74 20 6c 6e 3d 5f 5f 4c 49 4e 45 5f 5f  ze_t ln=__LINE__
0630: 29 28 41 20 61 2c 20 42 20 62 2c 20 73 74 72 69  )(A a, B b, stri
0640: 6e 67 20 6d 73 67 3d 22 22 29 0a 09 7b 0a 09 09  ng msg="")..{...
0650: 74 72 79 0a 09 09 09 7b 20 69 66 28 20 6d 69 78  try....{ if( mix
0660: 69 6e 28 22 61 22 7e 6f 70 7e 22 62 22 29 20 29  in("a"~op~"b") )
0670: 20 72 65 74 75 72 6e 3b 20 7d 0a 09 09 63 61 74   return; }...cat
0680: 63 68 28 54 68 72 6f 77 61 62 6c 65 20 65 29 0a  ch(Throwable e).
0690: 09 09 09 7b 20 6f 6e 41 73 73 65 72 74 45 72 72  ...{ onAssertErr
06a0: 6f 72 4d 73 67 28 66 6e 2c 20 6c 6e 2c 20 6d 73  orMsg(fn, ln, ms
06b0: 67 2e 6c 65 6e 67 74 68 20 3f 20 6d 73 67 20 3a  g.length ? msg :
06c0: 20 22 65 78 63 65 70 74 69 6f 6e 20 5b 22 7e 65   "exception ["~e
06d0: 2e 74 6f 53 74 72 69 6e 67 28 29 7e 22 5d 22 29  .toString()~"]")
06e0: 3b 20 7d 0a 09 09 6f 6e 41 73 73 65 72 74 45 72  ; }...onAssertEr
06f0: 72 6f 72 4d 73 67 28 66 6e 2c 20 6c 6e 2c 20 6d  rorMsg(fn, ln, m
0700: 73 67 2e 6c 65 6e 67 74 68 20 3f 20 6d 73 67 20  sg.length ? msg 
0710: 3a 20 74 6f 21 73 74 72 69 6e 67 28 61 29 7e 22  : to!string(a)~"
0720: 20 21 22 7e 6f 70 7e 22 20 22 7e 74 6f 21 73 74   !"~op~" "~to!st
0730: 72 69 6e 67 28 62 29 29 3b 0a 09 7d 0a 7d 0a 0a  ring(b));..}.}..
0740: 61 6c 69 61 73 20 61 73 73 65 72 74 4f 70 21 28  alias assertOp!(
0750: 60 3d 3d 60 29 20 61 73 73 65 72 74 5f 65 71 3b  `==`) assert_eq;
0760: 0a 61 6c 69 61 73 20 61 73 73 65 72 74 4f 70 21  .alias assertOp!
0770: 28 60 21 3d 60 29 20 61 73 73 65 72 74 5f 6e 65  (`!=`) assert_ne
0780: 3b 0a 61 6c 69 61 73 20 61 73 73 65 72 74 4f 70  ;.alias assertOp
0790: 21 28 60 3c 60 29 20 20 61 73 73 65 72 74 5f 6c  !(`<`)  assert_l
07a0: 74 3b 0a 61 6c 69 61 73 20 61 73 73 65 72 74 4f  t;.alias assertO
07b0: 70 21 28 60 3c 3d 60 29 20 61 73 73 65 72 74 5f  p!(`<=`) assert_
07c0: 6c 65 3b 0a 61 6c 69 61 73 20 61 73 73 65 72 74  le;.alias assert
07d0: 4f 70 21 28 60 3e 60 29 20 20 61 73 73 65 72 74  Op!(`>`)  assert
07e0: 5f 67 74 3b 0a 61 6c 69 61 73 20 61 73 73 65 72  _gt;.alias asser
07f0: 74 4f 70 21 28 60 3e 3d 60 29 20 61 73 73 65 72  tOp!(`>=`) asser
0800: 74 5f 67 65 3b 0a 0a 75 6e 69 74 74 65 73 74 0a  t_ge;..unittest.
0810: 7b 0a 09 61 73 73 65 72 74 5f 6e 6f 74 68 72 6f  {..assert_nothro
0820: 77 28 20 61 73 73 65 72 74 5f 65 71 28 31 2c 20  w( assert_eq(1, 
0830: 31 29 20 29 3b 0a 09 61 73 73 65 72 74 5f 6e 6f  1) );..assert_no
0840: 74 68 72 6f 77 28 20 61 73 73 65 72 74 5f 6e 65  throw( assert_ne
0850: 28 31 2c 20 30 29 20 29 3b 0a 09 61 73 73 65 72  (1, 0) );..asser
0860: 74 5f 6e 6f 74 68 72 6f 77 28 20 61 73 73 65 72  t_nothrow( asser
0870: 74 5f 6c 74 28 30 2c 20 31 29 20 29 3b 0a 09 61  t_lt(0, 1) );..a
0880: 73 73 65 72 74 5f 6e 6f 74 68 72 6f 77 28 20 61  ssert_nothrow( a
0890: 73 73 65 72 74 5f 6c 65 28 30 2c 20 31 29 20 29  ssert_le(0, 1) )
08a0: 3b 0a 09 61 73 73 65 72 74 5f 6e 6f 74 68 72 6f  ;..assert_nothro
08b0: 77 28 20 61 73 73 65 72 74 5f 6c 65 28 30 2c 20  w( assert_le(0, 
08c0: 30 29 20 29 3b 0a 09 61 73 73 65 72 74 5f 6e 6f  0) );..assert_no
08d0: 74 68 72 6f 77 28 20 61 73 73 65 72 74 5f 67 74  throw( assert_gt
08e0: 28 31 2c 20 30 29 20 29 3b 0a 09 61 73 73 65 72  (1, 0) );..asser
08f0: 74 5f 6e 6f 74 68 72 6f 77 28 20 61 73 73 65 72  t_nothrow( asser
0900: 74 5f 67 65 28 31 2c 20 30 29 20 29 3b 0a 09 61  t_ge(1, 0) );..a
0910: 73 73 65 72 74 5f 6e 6f 74 68 72 6f 77 28 20 61  ssert_nothrow( a
0920: 73 73 65 72 74 5f 67 65 28 30 2c 20 30 29 20 29  ssert_ge(0, 0) )
0930: 3b 0a 0a 09 61 73 73 65 72 74 5f 74 68 72 6f 77  ;...assert_throw
0940: 21 41 73 73 65 72 74 45 72 72 6f 72 28 20 61 73  !AssertError( as
0950: 73 65 72 74 5f 65 71 28 31 2c 20 30 29 20 29 3b  sert_eq(1, 0) );
0960: 0a 09 61 73 73 65 72 74 5f 74 68 72 6f 77 21 41  ..assert_throw!A
0970: 73 73 65 72 74 45 72 72 6f 72 28 20 61 73 73 65  ssertError( asse
0980: 72 74 5f 6e 65 28 31 2c 20 31 29 20 29 3b 0a 09  rt_ne(1, 1) );..
0990: 61 73 73 65 72 74 5f 74 68 72 6f 77 21 41 73 73  assert_throw!Ass
09a0: 65 72 74 45 72 72 6f 72 28 20 61 73 73 65 72 74  ertError( assert
09b0: 5f 6c 74 28 31 2c 20 31 29 20 29 3b 0a 09 61 73  _lt(1, 1) );..as
09c0: 73 65 72 74 5f 74 68 72 6f 77 21 41 73 73 65 72  sert_throw!Asser
09d0: 74 45 72 72 6f 72 28 20 61 73 73 65 72 74 5f 6c  tError( assert_l
09e0: 74 28 31 2c 20 30 29 20 29 3b 0a 09 61 73 73 65  t(1, 0) );..asse
09f0: 72 74 5f 74 68 72 6f 77 21 41 73 73 65 72 74 45  rt_throw!AssertE
0a00: 72 72 6f 72 28 20 61 73 73 65 72 74 5f 6c 65 28  rror( assert_le(
0a10: 31 2c 20 30 29 20 29 3b 0a 09 61 73 73 65 72 74  1, 0) );..assert
0a20: 5f 74 68 72 6f 77 21 41 73 73 65 72 74 45 72 72  _throw!AssertErr
0a30: 6f 72 28 20 61 73 73 65 72 74 5f 67 74 28 30 2c  or( assert_gt(0,
0a40: 20 30 29 20 29 3b 0a 09 61 73 73 65 72 74 5f 74   0) );..assert_t
0a50: 68 72 6f 77 21 41 73 73 65 72 74 45 72 72 6f 72  hrow!AssertError
0a60: 28 20 61 73 73 65 72 74 5f 67 74 28 30 2c 20 31  ( assert_gt(0, 1
0a70: 29 20 29 3b 0a 09 61 73 73 65 72 74 5f 74 68 72  ) );..assert_thr
0a80: 6f 77 21 41 73 73 65 72 74 45 72 72 6f 72 28 20  ow!AssertError( 
0a90: 61 73 73 65 72 74 5f 67 65 28 30 2c 20 31 29 20  assert_ge(0, 1) 
0aa0: 29 3b 0a 0a 09 63 6c 61 73 73 20 54 65 6d 70 20  );...class Temp 
0ab0: 7b 20 62 6f 6f 6c 20 6f 70 45 71 75 61 6c 73 28  { bool opEquals(
0ac0: 69 6e 74 20 78 29 7b 72 65 74 75 72 6e 20 78 2f  int x){return x/
0ad0: 78 3d 3d 78 3b 7d 20 7d 0a 09 61 73 73 65 72 74  x==x;} }..assert
0ae0: 5f 74 68 72 6f 77 21 41 73 73 65 72 74 45 72 72  _throw!AssertErr
0af0: 6f 72 28 20 61 73 73 65 72 74 5f 65 71 28 6e 65  or( assert_eq(ne
0b00: 77 20 54 65 6d 70 2c 20 30 29 20 29 3b 0a 09 61  w Temp, 0) );..a
0b10: 73 73 65 72 74 5f 6e 6f 74 68 72 6f 77 20 20 20  ssert_nothrow   
0b20: 20 20 20 20 20 20 20 28 20 61 73 73 65 72 74 5f         ( assert_
0b30: 65 71 28 6e 65 77 20 54 65 6d 70 2c 20 31 29 20  eq(new Temp, 1) 
0b40: 29 3b 0a 09 61 73 73 65 72 74 5f 74 68 72 6f 77  );..assert_throw
0b50: 21 41 73 73 65 72 74 45 72 72 6f 72 28 20 61 73  !AssertError( as
0b60: 73 65 72 74 5f 65 71 28 6e 65 77 20 54 65 6d 70  sert_eq(new Temp
0b70: 2c 20 32 29 20 29 3b 0a 7d 0a 0a 2f 2a 20 5b 54  , 2) );.}../* [T
0b80: 6f 64 6f 5d 20 69 73 20 74 68 65 72 65 20 61 6e  odo] is there an
0b90: 79 20 77 61 79 20 74 6f 20 63 6c 65 61 72 6e 6c  y way to clearnl
0ba0: 79 20 69 6d 70 6c 65 6d 65 6e 74 20 22 61 73 73  y implement "ass
0bb0: 65 72 74 5f 63 6f 6d 70 69 6c 65 73 22 20 61 6e  ert_compiles" an
0bc0: 64 20 22 61 73 73 65 72 74 5f 6e 6f 74 5f 63 6f  d "assert_not_co
0bd0: 6d 70 69 6c 65 22 3f 20 2a 2f 0a                 mpile"? */.