Hex Artifact Content
Not logged in

Artifact 3ff977492e8e9816400570f84c67074ded34c853:


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 48 65 70 6c 65 72 20 72 6f 75 74 69 6e 65  * Hepler routine
0060: 73 20 66 6f 72 20 75 6e 69 74 74 65 73 74 69 6e  s for unittestin
0070: 67 2e 0d 0a 20 2a 20 54 4f 44 4f 3a 20 49 73 20  g... * TODO: Is 
0080: 74 68 65 72 65 20 61 6e 79 20 63 6c 65 61 6e 20  there any clean 
0090: 77 61 79 20 74 6f 20 69 6d 70 6c 65 6d 65 6e 74  way to implement
00a0: 20 22 61 73 73 65 72 74 5f 63 6f 6d 70 69 6c 65   "assert_compile
00b0: 73 22 20 61 6e 64 20 22 61 73 73 65 72 74 5f 6e  s" and "assert_n
00c0: 6f 74 5f 63 6f 6d 70 69 6c 65 22 3f 0d 0a 20 2a  ot_compile"?.. *
00d0: 2f 0a 6d 6f 64 75 6c 65 20 74 72 69 63 6b 73 2e  /.module tricks.
00e0: 74 65 73 74 3b 0d 0a 69 6d 70 6f 72 74 20 73 74  test;..import st
00f0: 64 2e 63 6f 6e 76 20 3a 20 74 65 78 74 3b 0a 69  d.conv : text;.i
0100: 6d 70 6f 72 74 20 63 6f 72 65 2e 65 78 63 65 70  mport core.excep
0110: 74 69 6f 6e 3b 0a 0d 0a 76 65 72 73 69 6f 6e 28  tion;...version(
0120: 75 6e 69 74 74 65 73 74 29 0d 0a 7b 0d 0a 09 69  unittest)..{...i
0130: 6d 70 6f 72 74 20 73 74 64 2e 63 73 74 72 65 61  mport std.cstrea
0140: 6d 3b 0d 0a 09 69 6d 70 6f 72 74 20 63 6f 72 65  m;...import core
0150: 2e 72 75 6e 74 69 6d 65 3b 0d 0a 0d 0a 09 73 74  .runtime;.....st
0160: 61 74 69 63 20 74 68 69 73 28 29 0d 0a 09 7b 0d  atic this()...{.
0170: 0a 09 09 69 6e 73 74 61 6c 6c 43 75 73 74 6f 6d  ...installCustom
0180: 54 65 73 74 52 75 6e 6e 65 72 28 29 3b 0d 0a 09  TestRunner();...
0190: 7d 0d 0a 0d 0a 09 70 72 69 76 61 74 65 20 76 6f  }.....private vo
01a0: 69 64 20 69 6e 73 74 61 6c 6c 43 75 73 74 6f 6d  id installCustom
01b0: 54 65 73 74 52 75 6e 6e 65 72 28 29 0d 0a 09 7b  TestRunner()...{
01c0: 0d 0a 09 09 52 75 6e 74 69 6d 65 2e 6d 6f 64 75  ....Runtime.modu
01d0: 6c 65 55 6e 69 74 54 65 73 74 65 72 20 3d 20 66  leUnitTester = f
01e0: 75 6e 63 74 69 6f 6e 28 29 0d 0a 09 09 7b 0d 0a  unction()....{..
01f0: 09 09 09 54 68 72 6f 77 61 62 6c 65 20 66 69 72  ...Throwable fir
0200: 73 74 45 72 72 6f 72 20 3d 20 6e 75 6c 6c 3b 0d  stError = null;.
0210: 0a 0d 0a 09 09 09 76 6f 69 64 20 6c 6f 67 45 72  ......void logEr
0220: 72 6f 72 28 54 68 72 6f 77 61 62 6c 65 20 65 29  ror(Throwable e)
0230: 0d 0a 09 09 09 7b 0d 0a 09 09 09 09 69 66 28 66  .....{......if(f
0240: 69 72 73 74 45 72 72 6f 72 20 69 73 20 6e 75 6c  irstError is nul
0250: 6c 29 0d 0a 09 09 09 09 09 66 69 72 73 74 45 72  l).......firstEr
0260: 72 6f 72 20 3d 20 65 3b 0d 0a 09 09 09 09 64 65  ror = e;......de
0270: 72 72 2e 77 72 69 74 65 66 6c 6e 28 22 20 20 21  rr.writefln("  !
0280: 21 20 25 73 28 25 64 29 3a 20 25 73 22 2c 20 65  ! %s(%d): %s", e
0290: 2e 66 69 6c 65 2c 20 65 2e 6c 69 6e 65 2c 20 65  .file, e.line, e
02a0: 2e 6d 73 67 29 3b 0d 0a 09 09 09 7d 0d 0a 0d 0a  .msg);.....}....
02b0: 09 09 09 76 6f 69 64 20 74 65 73 74 4d 6f 64 75  ...void testModu
02c0: 6c 65 28 4d 6f 64 75 6c 65 49 6e 66 6f 2a 20 6d  le(ModuleInfo* m
02d0: 2c 20 76 6f 69 64 20 66 75 6e 63 74 69 6f 6e 28  , void function(
02e0: 29 20 74 65 73 74 29 0d 0a 09 09 09 7b 0d 0a 09  ) test).....{...
02f0: 09 09 09 64 65 72 72 2e 77 72 69 74 65 66 6c 6e  ...derr.writefln
0300: 28 22 5b 54 45 53 54 5d 20 25 73 22 2c 20 6d 2e  ("[TEST] %s", m.
0310: 6e 61 6d 65 29 3b 0d 0a 09 09 09 09 74 72 79 20  name);......try 
0320: 7b 20 74 65 73 74 28 29 3b 20 7d 20 63 61 74 63  { test(); } catc
0330: 68 28 20 54 68 72 6f 77 61 62 6c 65 20 65 20 29  h( Throwable e )
0340: 20 7b 20 6c 6f 67 45 72 72 6f 72 28 65 29 3b 20   { logError(e); 
0350: 7d 0d 0a 09 09 09 7d 0d 0a 0d 0a 09 09 09 62 6f  }.....}.......bo
0360: 6f 6c 20 72 65 70 6f 72 74 28 29 0d 0a 09 09 09  ol report().....
0370: 7b 0d 0a 09 09 09 09 69 66 28 66 69 72 73 74 45  {......if(firstE
0380: 72 72 6f 72 20 69 73 20 6e 75 6c 6c 29 0d 0a 09  rror is null)...
0390: 09 09 09 09 72 65 74 75 72 6e 20 74 72 75 65 3b  ....return true;
03a0: 0d 0a 09 09 09 09 64 65 72 72 2e 77 72 69 74 65  ......derr.write
03b0: 53 74 72 69 6e 67 28 22 5b 54 45 53 54 5d 20 70  String("[TEST] p
03c0: 72 65 73 73 20 65 6e 74 65 72 20 74 6f 20 65 78  ress enter to ex
03d0: 69 74 2e 22 29 3b 0d 0a 09 09 09 09 64 69 6e 2e  it.");......din.
03e0: 72 65 61 64 4c 69 6e 65 28 29 3b 0d 0a 09 09 09  readLine();.....
03f0: 09 72 65 74 75 72 6e 20 66 61 6c 73 65 3b 0d 0a  .return false;..
0400: 09 09 09 7d 0d 0a 0d 0a 09 09 09 66 6f 72 65 61  ...}.......forea
0410: 63 68 28 6d 3b 20 4d 6f 64 75 6c 65 49 6e 66 6f  ch(m; ModuleInfo
0420: 29 0d 0a 09 09 09 09 69 66 28 6d 20 26 26 20 6d  )......if(m && m
0430: 2e 75 6e 69 74 54 65 73 74 29 0d 0a 09 09 09 09  .unitTest)......
0440: 09 74 65 73 74 4d 6f 64 75 6c 65 28 6d 2c 20 6d  .testModule(m, m
0450: 2e 75 6e 69 74 54 65 73 74 29 3b 0d 0a 09 09 09  .unitTest);.....
0460: 72 65 74 75 72 6e 20 72 65 70 6f 72 74 28 29 3b  return report();
0470: 0d 0a 09 09 7d 3b 0d 0a 09 7d 0d 0a 7d 0d 0a 0d  ....};...}..}...
0480: 0a 2f 2f 2f 20 55 6e 69 74 74 65 73 74 20 68 65  ./// Unittest he
0490: 6c 70 65 72 20 74 68 61 74 20 61 73 73 65 72 74  lper that assert
04a0: 73 20 61 6e 20 65 78 70 72 65 73 73 69 6f 6e 20  s an expression 
04b0: 6d 75 73 74 20 74 68 72 6f 77 20 73 6f 6d 65 74  must throw somet
04c0: 68 69 6e 67 0a 0a 76 6f 69 64 20 61 73 73 65 72  hing..void asser
04d0: 74 5f 74 68 72 6f 77 28 45 78 63 54 3d 54 68 72  t_throw(ExcT=Thr
04e0: 6f 77 61 62 6c 65 2c 20 54 2c 20 73 74 72 69 6e  owable, T, strin
04f0: 67 20 66 6e 3d 5f 5f 46 49 4c 45 5f 5f 2c 20 73  g fn=__FILE__, s
0500: 69 7a 65 5f 74 20 6c 6e 3d 5f 5f 4c 49 4e 45 5f  ize_t ln=__LINE_
0510: 5f 29 28 6c 61 7a 79 20 54 20 74 2c 20 73 74 72  _)(lazy T t, str
0520: 69 6e 67 20 6d 73 67 3d 22 22 29 0a 7b 0d 0a 09  ing msg="").{...
0530: 73 74 61 74 69 63 20 69 66 28 20 69 73 28 45 78  static if( is(Ex
0540: 63 54 20 3d 3d 20 54 68 72 6f 77 61 62 6c 65 29  cT == Throwable)
0550: 20 29 0a 09 09 74 72 79 0d 0a 09 09 09 7b 20 74   )...try.....{ t
0560: 28 29 3b 20 7d 0d 0a 09 09 63 61 74 63 68 28 45  (); }....catch(E
0570: 78 63 54 29 0d 0a 09 09 09 7b 20 72 65 74 75 72  xcT).....{ retur
0580: 6e 3b 20 7d 0d 0a 09 65 6c 73 65 0d 0a 09 09 74  n; }...else....t
0590: 72 79 0a 09 09 09 7b 20 74 28 29 3b 20 7d 0a 09  ry....{ t(); }..
05a0: 09 63 61 74 63 68 28 45 78 63 54 29 0a 09 09 09  .catch(ExcT)....
05b0: 7b 20 72 65 74 75 72 6e 3b 20 7d 0a 09 09 63 61  { return; }...ca
05c0: 74 63 68 28 54 68 72 6f 77 61 62 6c 65 20 65 29  tch(Throwable e)
05d0: 0a 09 09 09 7b 20 6f 6e 41 73 73 65 72 74 45 72  ....{ onAssertEr
05e0: 72 6f 72 4d 73 67 28 66 6e 2c 20 6c 6e 2c 20 6d  rorMsg(fn, ln, m
05f0: 73 67 2e 6c 65 6e 67 74 68 20 3f 20 6d 73 67 20  sg.length ? msg 
0600: 3a 20 22 62 61 64 20 65 78 63 65 70 74 69 6f 6e  : "bad exception
0610: 20 5c 6e 20 20 3e 3e 20 22 7e 65 2e 74 6f 53 74   \n  >> "~e.toSt
0620: 72 69 6e 67 28 29 29 3b 20 7d 0d 0a 09 6f 6e 41  ring()); }...onA
0630: 73 73 65 72 74 45 72 72 6f 72 4d 73 67 28 66 6e  ssertErrorMsg(fn
0640: 2c 20 6c 6e 2c 20 6d 73 67 2e 6c 65 6e 67 74 68  , ln, msg.length
0650: 20 3f 20 6d 73 67 20 3a 20 22 6e 6f 74 20 74 68   ? msg : "not th
0660: 72 6f 77 6e 22 29 3b 0a 7d 0a 0a 2f 2f 2f 20 55  rown");.}../// U
0670: 6e 69 74 74 65 73 74 20 68 65 6c 70 65 72 20 74  nittest helper t
0680: 68 61 74 20 61 73 73 65 72 74 73 20 61 6e 20 65  hat asserts an e
0690: 78 70 72 65 73 73 69 6f 6e 20 6d 75 73 74 20 6e  xpression must n
06a0: 6f 74 20 74 68 72 6f 77 20 61 6e 79 74 68 69 6e  ot throw anythin
06b0: 67 0a 0a 54 20 61 73 73 65 72 74 5f 6e 6f 74 68  g..T assert_noth
06c0: 72 6f 77 28 54 2c 20 73 74 72 69 6e 67 20 66 6e  row(T, string fn
06d0: 3d 5f 5f 46 49 4c 45 5f 5f 2c 20 73 69 7a 65 5f  =__FILE__, size_
06e0: 74 20 6c 6e 3d 5f 5f 4c 49 4e 45 5f 5f 29 28 6c  t ln=__LINE__)(l
06f0: 61 7a 79 20 54 20 74 2c 20 73 74 72 69 6e 67 20  azy T t, string 
0700: 6d 73 67 3d 22 22 29 0a 7b 0a 09 74 72 79 0a 09  msg="").{..try..
0710: 09 7b 20 72 65 74 75 72 6e 20 74 28 29 3b 20 7d  .{ return t(); }
0720: 0a 09 63 61 74 63 68 28 54 68 72 6f 77 61 62 6c  ..catch(Throwabl
0730: 65 20 65 29 0a 09 09 7b 20 6f 6e 41 73 73 65 72  e e)...{ onAsser
0740: 74 45 72 72 6f 72 4d 73 67 28 66 6e 2c 20 6c 6e  tErrorMsg(fn, ln
0750: 2c 20 6d 73 67 2e 6c 65 6e 67 74 68 20 3f 20 6d  , msg.length ? m
0760: 73 67 20 3a 20 22 62 61 64 20 65 78 63 65 70 74  sg : "bad except
0770: 69 6f 6e 20 5c 6e 20 20 3e 3e 20 22 7e 65 2e 74  ion \n  >> "~e.t
0780: 6f 53 74 72 69 6e 67 28 29 29 3b 20 7d 0d 0a 09  oString()); }...
0790: 61 73 73 65 72 74 28 66 61 6c 73 65 29 3b 0a 7d  assert(false);.}
07a0: 0a 0d 0a 75 6e 69 74 74 65 73 74 0a 7b 0a 09 61  ...unittest.{..a
07b0: 75 74 6f 20 65 72 72 6f 72 20 3d 20 7b 74 68 72  uto error = {thr
07c0: 6f 77 20 6e 65 77 20 45 72 72 6f 72 28 22 68 65  ow new Error("he
07d0: 6c 6c 6f 22 29 3b 7d 3b 0a 09 61 75 74 6f 20 6e  llo");};..auto n
07e0: 6f 74 68 69 6e 67 20 3d 20 28 29 7b 7d 3b 0a 09  othing = (){};..
07f0: 61 75 74 6f 20 61 73 73 65 72 74 45 72 72 6f 72  auto assertError
0800: 20 3d 20 7b 61 73 73 65 72 74 28 30 29 3b 7d 3b   = {assert(0);};
0810: 0a 0a 09 61 73 73 65 72 74 5f 6e 6f 74 68 72 6f  ...assert_nothro
0820: 77 20 20 20 20 20 20 20 20 20 20 28 20 61 73 73  w          ( ass
0830: 65 72 74 5f 6e 6f 74 68 72 6f 77 28 6e 6f 74 68  ert_nothrow(noth
0840: 69 6e 67 28 29 29 20 29 3b 0a 09 61 73 73 65 72  ing()) );..asser
0850: 74 5f 74 68 72 6f 77 21 41 73 73 65 72 74 45 72  t_throw!AssertEr
0860: 72 6f 72 28 20 61 73 73 65 72 74 5f 6e 6f 74 68  ror( assert_noth
0870: 72 6f 77 28 65 72 72 6f 72 28 29 29 20 29 3b 0a  row(error()) );.
0880: 09 61 73 73 65 72 74 5f 74 68 72 6f 77 21 41 73  .assert_throw!As
0890: 73 65 72 74 45 72 72 6f 72 28 20 61 73 73 65 72  sertError( asser
08a0: 74 5f 6e 6f 74 68 72 6f 77 28 61 73 73 65 72 74  t_nothrow(assert
08b0: 45 72 72 6f 72 28 29 29 20 29 3b 0a 0a 09 61 73  Error()) );...as
08c0: 73 65 72 74 5f 6e 6f 74 68 72 6f 77 20 20 20 20  sert_nothrow    
08d0: 20 20 20 20 20 20 28 20 61 73 73 65 72 74 5f 74        ( assert_t
08e0: 68 72 6f 77 21 45 72 72 6f 72 28 65 72 72 6f 72  hrow!Error(error
08f0: 28 29 29 20 29 3b 0a 09 61 73 73 65 72 74 5f 74  ()) );..assert_t
0900: 68 72 6f 77 21 41 73 73 65 72 74 45 72 72 6f 72  hrow!AssertError
0910: 28 20 61 73 73 65 72 74 5f 74 68 72 6f 77 21 45  ( assert_throw!E
0920: 72 72 6f 72 28 6e 6f 74 68 69 6e 67 28 29 29 20  rror(nothing()) 
0930: 29 3b 0a 09 61 73 73 65 72 74 5f 6e 6f 74 68 72  );..assert_nothr
0940: 6f 77 20 20 20 20 20 20 20 20 20 20 28 20 61 73  ow          ( as
0950: 73 65 72 74 5f 74 68 72 6f 77 21 45 72 72 6f 72  sert_throw!Error
0960: 28 61 73 73 65 72 74 45 72 72 6f 72 28 29 29 20  (assertError()) 
0970: 29 3b 0a 09 61 73 73 65 72 74 5f 74 68 72 6f 77  );..assert_throw
0980: 21 41 73 73 65 72 74 45 72 72 6f 72 28 20 61 73  !AssertError( as
0990: 73 65 72 74 5f 74 68 72 6f 77 21 41 73 73 65 72  sert_throw!Asser
09a0: 74 45 72 72 6f 72 28 65 72 72 6f 72 28 29 29 20  tError(error()) 
09b0: 29 3b 0d 0a 7d 0a 0d 0a 74 65 6d 70 6c 61 74 65  );..}...template
09c0: 20 61 73 73 65 72 74 4f 70 28 73 74 72 69 6e 67   assertOp(string
09d0: 20 6f 70 29 0a 7b 0a 09 76 6f 69 64 20 61 73 73   op).{..void ass
09e0: 65 72 74 4f 70 28 41 2c 20 42 2c 20 73 74 72 69  ertOp(A, B, stri
09f0: 6e 67 20 66 6e 3d 5f 5f 46 49 4c 45 5f 5f 2c 20  ng fn=__FILE__, 
0a00: 73 69 7a 65 5f 74 20 6c 6e 3d 5f 5f 4c 49 4e 45  size_t ln=__LINE
0a10: 5f 5f 29 28 6c 61 7a 79 20 41 20 61 5f 2c 20 6c  __)(lazy A a_, l
0a20: 61 7a 79 20 42 20 62 5f 2c 20 73 74 72 69 6e 67  azy B b_, string
0a30: 20 6d 73 67 3d 22 22 29 0a 09 7b 0d 0a 09 09 74   msg="")..{....t
0a40: 72 79 0a 09 09 09 7b 20 41 20 61 3d 61 5f 28 29  ry....{ A a=a_()
0a50: 3b 20 42 20 62 3d 62 5f 28 29 3b 20 69 66 28 20  ; B b=b_(); if( 
0a60: 6d 69 78 69 6e 28 22 61 22 7e 6f 70 7e 22 62 22  mixin("a"~op~"b"
0a70: 29 20 29 20 72 65 74 75 72 6e 3b 0d 0a 09 09 09  ) ) return;.....
0a80: 20 20 6f 6e 41 73 73 65 72 74 45 72 72 6f 72 4d    onAssertErrorM
0a90: 73 67 28 66 6e 2c 20 6c 6e 2c 20 6d 73 67 2e 6c  sg(fn, ln, msg.l
0aa0: 65 6e 67 74 68 20 3f 20 6d 73 67 20 3a 20 74 65  ength ? msg : te
0ab0: 78 74 28 61 2c 20 22 20 21 22 2c 20 6f 70 2c 20  xt(a, " !", op, 
0ac0: 22 20 22 2c 20 62 29 29 3b 20 7d 0a 09 09 63 61  " ", b)); }...ca
0ad0: 74 63 68 28 54 68 72 6f 77 61 62 6c 65 20 65 29  tch(Throwable e)
0ae0: 0a 09 09 09 7b 20 6f 6e 41 73 73 65 72 74 45 72  ....{ onAssertEr
0af0: 72 6f 72 4d 73 67 28 66 6e 2c 20 6c 6e 2c 20 6d  rorMsg(fn, ln, m
0b00: 73 67 2e 6c 65 6e 67 74 68 20 3f 20 6d 73 67 20  sg.length ? msg 
0b10: 3a 20 22 62 61 64 20 65 78 63 65 70 74 69 6f 6e  : "bad exception
0b20: 20 5c 6e 20 20 3e 3e 20 22 7e 65 2e 74 6f 53 74   \n  >> "~e.toSt
0b30: 72 69 6e 67 28 29 29 3b 20 7d 0d 0a 09 09 61 73  ring()); }....as
0b40: 73 65 72 74 28 66 61 6c 73 65 29 3b 0d 0a 09 7d  sert(false);...}
0b50: 0a 7d 0a 0a 61 6c 69 61 73 20 61 73 73 65 72 74  .}..alias assert
0b60: 4f 70 21 28 60 3d 3d 60 29 20 61 73 73 65 72 74  Op!(`==`) assert
0b70: 5f 65 71 3b 20 2f 2f 2f 20 61 73 73 65 72 74 73  _eq; /// asserts
0b80: 20 74 77 6f 20 6f 70 65 72 61 6e 64 73 20 61 72   two operands ar
0b90: 65 20 3d 3d 0a 61 6c 69 61 73 20 61 73 73 65 72  e ==.alias asser
0ba0: 74 4f 70 21 28 60 21 3d 60 29 20 61 73 73 65 72  tOp!(`!=`) asser
0bb0: 74 5f 6e 65 3b 20 2f 2f 2f 20 61 73 73 65 72 74  t_ne; /// assert
0bc0: 73 20 74 77 6f 20 6f 70 65 72 61 6e 64 73 20 61  s two operands a
0bd0: 72 65 20 21 3d 0a 61 6c 69 61 73 20 61 73 73 65  re !=.alias asse
0be0: 72 74 4f 70 21 28 60 3c 60 29 20 20 61 73 73 65  rtOp!(`<`)  asse
0bf0: 72 74 5f 6c 74 3b 20 2f 2f 2f 20 61 73 73 65 72  rt_lt; /// asser
0c00: 74 73 20 74 77 6f 20 6f 70 65 72 61 6e 64 73 20  ts two operands 
0c10: 61 72 65 20 3c 0a 61 6c 69 61 73 20 61 73 73 65  are <.alias asse
0c20: 72 74 4f 70 21 28 60 3c 3d 60 29 20 61 73 73 65  rtOp!(`<=`) asse
0c30: 72 74 5f 6c 65 3b 20 2f 2f 2f 20 61 73 73 65 72  rt_le; /// asser
0c40: 74 73 20 74 77 6f 20 6f 70 65 72 61 6e 64 73 20  ts two operands 
0c50: 61 72 65 20 3c 3d 0a 61 6c 69 61 73 20 61 73 73  are <=.alias ass
0c60: 65 72 74 4f 70 21 28 60 3e 60 29 20 20 61 73 73  ertOp!(`>`)  ass
0c70: 65 72 74 5f 67 74 3b 20 2f 2f 2f 20 61 73 73 65  ert_gt; /// asse
0c80: 72 74 73 20 74 77 6f 20 6f 70 65 72 61 6e 64 73  rts two operands
0c90: 20 61 72 65 20 3e 0a 61 6c 69 61 73 20 61 73 73   are >.alias ass
0ca0: 65 72 74 4f 70 21 28 60 3e 3d 60 29 20 61 73 73  ertOp!(`>=`) ass
0cb0: 65 72 74 5f 67 65 3b 20 2f 2f 2f 20 61 73 73 65  ert_ge; /// asse
0cc0: 72 74 73 20 74 77 6f 20 6f 70 65 72 61 6e 64 73  rts two operands
0cd0: 20 61 72 65 20 3e 3d 0d 0a 0d 0a 75 6e 69 74 74   are >=....unitt
0ce0: 65 73 74 0a 7b 0a 09 61 73 73 65 72 74 5f 6e 6f  est.{..assert_no
0cf0: 74 68 72 6f 77 28 20 61 73 73 65 72 74 5f 65 71  throw( assert_eq
0d00: 28 31 2c 20 31 29 20 29 3b 0a 09 61 73 73 65 72  (1, 1) );..asser
0d10: 74 5f 6e 6f 74 68 72 6f 77 28 20 61 73 73 65 72  t_nothrow( asser
0d20: 74 5f 6e 65 28 31 2c 20 30 29 20 29 3b 0a 09 61  t_ne(1, 0) );..a
0d30: 73 73 65 72 74 5f 6e 6f 74 68 72 6f 77 28 20 61  ssert_nothrow( a
0d40: 73 73 65 72 74 5f 6c 74 28 30 2c 20 31 29 20 29  ssert_lt(0, 1) )
0d50: 3b 0a 09 61 73 73 65 72 74 5f 6e 6f 74 68 72 6f  ;..assert_nothro
0d60: 77 28 20 61 73 73 65 72 74 5f 6c 65 28 30 2c 20  w( assert_le(0, 
0d70: 31 29 20 29 3b 0a 09 61 73 73 65 72 74 5f 6e 6f  1) );..assert_no
0d80: 74 68 72 6f 77 28 20 61 73 73 65 72 74 5f 6c 65  throw( assert_le
0d90: 28 30 2c 20 30 29 20 29 3b 0a 09 61 73 73 65 72  (0, 0) );..asser
0da0: 74 5f 6e 6f 74 68 72 6f 77 28 20 61 73 73 65 72  t_nothrow( asser
0db0: 74 5f 67 74 28 31 2c 20 30 29 20 29 3b 0a 09 61  t_gt(1, 0) );..a
0dc0: 73 73 65 72 74 5f 6e 6f 74 68 72 6f 77 28 20 61  ssert_nothrow( a
0dd0: 73 73 65 72 74 5f 67 65 28 31 2c 20 30 29 20 29  ssert_ge(1, 0) )
0de0: 3b 0a 09 61 73 73 65 72 74 5f 6e 6f 74 68 72 6f  ;..assert_nothro
0df0: 77 28 20 61 73 73 65 72 74 5f 67 65 28 30 2c 20  w( assert_ge(0, 
0e00: 30 29 20 29 3b 0a 0a 09 61 73 73 65 72 74 5f 74  0) );...assert_t
0e10: 68 72 6f 77 21 41 73 73 65 72 74 45 72 72 6f 72  hrow!AssertError
0e20: 28 20 61 73 73 65 72 74 5f 65 71 28 31 2c 20 30  ( assert_eq(1, 0
0e30: 29 20 29 3b 0a 09 61 73 73 65 72 74 5f 74 68 72  ) );..assert_thr
0e40: 6f 77 21 41 73 73 65 72 74 45 72 72 6f 72 28 20  ow!AssertError( 
0e50: 61 73 73 65 72 74 5f 6e 65 28 31 2c 20 31 29 20  assert_ne(1, 1) 
0e60: 29 3b 0a 09 61 73 73 65 72 74 5f 74 68 72 6f 77  );..assert_throw
0e70: 21 41 73 73 65 72 74 45 72 72 6f 72 28 20 61 73  !AssertError( as
0e80: 73 65 72 74 5f 6c 74 28 31 2c 20 31 29 20 29 3b  sert_lt(1, 1) );
0e90: 0a 09 61 73 73 65 72 74 5f 74 68 72 6f 77 21 41  ..assert_throw!A
0ea0: 73 73 65 72 74 45 72 72 6f 72 28 20 61 73 73 65  ssertError( asse
0eb0: 72 74 5f 6c 74 28 31 2c 20 30 29 20 29 3b 0a 09  rt_lt(1, 0) );..
0ec0: 61 73 73 65 72 74 5f 74 68 72 6f 77 21 41 73 73  assert_throw!Ass
0ed0: 65 72 74 45 72 72 6f 72 28 20 61 73 73 65 72 74  ertError( assert
0ee0: 5f 6c 65 28 31 2c 20 30 29 20 29 3b 0a 09 61 73  _le(1, 0) );..as
0ef0: 73 65 72 74 5f 74 68 72 6f 77 21 41 73 73 65 72  sert_throw!Asser
0f00: 74 45 72 72 6f 72 28 20 61 73 73 65 72 74 5f 67  tError( assert_g
0f10: 74 28 30 2c 20 30 29 20 29 3b 0a 09 61 73 73 65  t(0, 0) );..asse
0f20: 72 74 5f 74 68 72 6f 77 21 41 73 73 65 72 74 45  rt_throw!AssertE
0f30: 72 72 6f 72 28 20 61 73 73 65 72 74 5f 67 74 28  rror( assert_gt(
0f40: 30 2c 20 31 29 20 29 3b 0a 09 61 73 73 65 72 74  0, 1) );..assert
0f50: 5f 74 68 72 6f 77 21 41 73 73 65 72 74 45 72 72  _throw!AssertErr
0f60: 6f 72 28 20 61 73 73 65 72 74 5f 67 65 28 30 2c  or( assert_ge(0,
0f70: 20 31 29 20 29 3b 0a 0a 09 63 6c 61 73 73 20 54   1) );...class T
0f80: 65 6d 70 20 7b 20 62 6f 6f 6c 20 6f 70 45 71 75  emp { bool opEqu
0f90: 61 6c 73 28 69 6e 74 20 78 29 7b 72 65 74 75 72  als(int x){retur
0fa0: 6e 20 78 2f 78 3d 3d 78 3b 7d 20 7d 0a 09 61 73  n x/x==x;} }..as
0fb0: 73 65 72 74 5f 74 68 72 6f 77 21 41 73 73 65 72  sert_throw!Asser
0fc0: 74 45 72 72 6f 72 28 20 61 73 73 65 72 74 5f 65  tError( assert_e
0fd0: 71 28 6e 65 77 20 54 65 6d 70 2c 20 30 29 20 29  q(new Temp, 0) )
0fe0: 3b 0a 09 61 73 73 65 72 74 5f 6e 6f 74 68 72 6f  ;..assert_nothro
0ff0: 77 20 20 20 20 20 20 20 20 20 20 28 20 61 73 73  w          ( ass
1000: 65 72 74 5f 65 71 28 6e 65 77 20 54 65 6d 70 2c  ert_eq(new Temp,
1010: 20 31 29 20 29 3b 0a 09 61 73 73 65 72 74 5f 74   1) );..assert_t
1020: 68 72 6f 77 21 41 73 73 65 72 74 45 72 72 6f 72  hrow!AssertError
1030: 28 20 61 73 73 65 72 74 5f 65 71 28 6e 65 77 20  ( assert_eq(new 
1040: 54 65 6d 70 2c 20 32 29 20 29 3b 0a 7d 0a        Temp, 2) );.}.