Hex Artifact Content
Not logged in

Artifact 63ca5d91a9064dd84a0e4b50ebe4f8afff9846af:


0000: ef bb bf 2f 2a 2a 0d 0a 20 2a 20 41 75 74 68 6f  .../**.. * Autho
0010: 72 73 3a 20 6b 2e 69 6e 61 62 61 0d 0a 20 2a 20  rs: k.inaba.. * 
0020: 4c 69 63 65 6e 73 65 3a 20 4e 59 53 4c 20 30 2e  License: NYSL 0.
0030: 39 39 38 32 20 68 74 74 70 3a 2f 2f 77 77 77 2e  9982 http://www.
0040: 6b 6d 6f 6e 6f 73 2e 6e 65 74 2f 6e 79 73 6c 2f  kmonos.net/nysl/
0050: 0d 0a 20 2a 0d 0a 20 2a 20 43 6f 6d 6d 6f 6e 20  .. *.. * Common 
0060: 74 72 69 63 6b 73 20 61 6e 64 20 75 74 69 6c 69  tricks and utili
0070: 74 69 65 73 20 66 6f 72 20 70 72 6f 67 72 61 6d  ties for program
0080: 6d 69 6e 67 20 69 6e 20 44 2e 0d 0a 20 2a 2f 0d  ming in D... */.
0090: 0a 6d 6f 64 75 6c 65 20 70 6f 6c 65 6d 79 2e 74  .module polemy.t
00a0: 72 69 63 6b 73 3b 0d 0a 73 74 61 74 69 63 20 69  ricks;..static i
00b0: 6d 70 6f 72 74 20 73 74 64 2e 61 72 72 61 79 3b  mport std.array;
00c0: 0d 0a 73 74 61 74 69 63 20 69 6d 70 6f 72 74 20  ..static import 
00d0: 73 74 64 2e 66 6f 72 6d 61 74 3b 0d 0a 73 74 61  std.format;..sta
00e0: 74 69 63 20 69 6d 70 6f 72 74 20 63 6f 72 65 2e  tic import core.
00f0: 65 78 63 65 70 74 69 6f 6e 3b 0d 0a 0d 0a 2f 2f  exception;....//
0100: 2f 20 53 69 6d 70 6c 65 20 57 72 61 70 70 65 72  / Simple Wrapper
0110: 20 66 6f 72 20 73 74 64 2e 66 6f 72 6d 61 74 2e   for std.format.
0120: 64 6f 46 6f 72 6d 61 74 0d 0a 0d 0a 73 74 72 69  doFormat....stri
0130: 6e 67 20 73 70 72 69 6e 74 66 28 73 74 72 69 6e  ng sprintf(strin
0140: 67 20 66 6d 74 2c 20 54 2e 2e 2e 29 28 54 20 70  g fmt, T...)(T p
0150: 61 72 61 6d 73 29 0d 0a 7b 0d 0a 09 61 75 74 6f  arams)..{...auto
0160: 20 77 72 69 74 65 72 20 3d 20 73 74 64 2e 61 72   writer = std.ar
0170: 72 61 79 2e 61 70 70 65 6e 64 65 72 21 73 74 72  ray.appender!str
0180: 69 6e 67 28 29 3b 0d 0a 09 73 74 64 2e 66 6f 72  ing();...std.for
0190: 6d 61 74 2e 66 6f 72 6d 61 74 74 65 64 57 72 69  mat.formattedWri
01a0: 74 65 28 77 72 69 74 65 72 2c 20 66 6d 74 2c 20  te(writer, fmt, 
01b0: 70 61 72 61 6d 73 29 3b 0d 0a 09 72 65 74 75 72  params);...retur
01c0: 6e 20 77 72 69 74 65 72 2e 64 61 74 61 3b 0d 0a  n writer.data;..
01d0: 7d 0d 0a 0d 0a 75 6e 69 74 74 65 73 74 0d 0a 7b  }....unittest..{
01e0: 0d 0a 09 61 73 73 65 72 74 28 20 73 70 72 69 6e  ...assert( sprin
01f0: 74 66 21 22 25 73 20 3d 3d 20 25 64 22 28 22 31  tf!"%s == %d"("1
0200: 2b 32 22 2c 20 33 29 20 3d 3d 20 22 31 2b 32 20  +2", 3) == "1+2 
0210: 3d 3d 20 33 22 20 29 3b 0d 0a 09 61 73 73 65 72  == 3" );...asser
0220: 74 28 20 73 70 72 69 6e 74 66 21 22 25 73 20 3d  t( sprintf!"%s =
0230: 3d 20 25 30 34 64 22 28 22 31 2b 32 22 2c 20 33  = %04d"("1+2", 3
0240: 29 20 3d 3d 20 22 31 2b 32 20 3d 3d 20 30 30 30  ) == "1+2 == 000
0250: 33 22 20 29 3b 0d 0a 7d 0d 0a 0d 0a 2f 2f 2f 20  3" );..}..../// 
0260: 55 6e 69 74 74 65 73 74 20 68 65 6c 70 65 72 73  Unittest helpers
0270: 20 61 73 73 65 72 74 69 6e 67 20 74 77 6f 20 76   asserting two v
0280: 61 6c 75 65 73 20 61 72 65 20 69 6e 20 73 6f 6d  alues are in som
0290: 65 20 72 65 6c 61 74 69 6f 6e 20 3d 3d 2c 20 21  e relation ==, !
02a0: 3d 2c 20 3c 2c 20 3c 3d 2c 20 3e 2c 20 3e 3d 0d  =, <, <=, >, >=.
02b0: 0a 0d 0a 74 65 6d 70 6c 61 74 65 20 61 73 73 65  ...template asse
02c0: 72 74 4f 70 28 73 74 72 69 6e 67 20 6f 70 29 0d  rtOp(string op).
02d0: 0a 7b 0d 0a 09 76 6f 69 64 20 61 73 73 65 72 74  .{...void assert
02e0: 4f 70 28 41 2c 20 42 2c 20 73 74 72 69 6e 67 20  Op(A, B, string 
02f0: 66 6e 3d 5f 5f 46 49 4c 45 5f 5f 2c 20 69 6e 74  fn=__FILE__, int
0300: 20 6c 6e 3d 5f 5f 4c 49 4e 45 5f 5f 29 28 41 20   ln=__LINE__)(A 
0310: 61 2c 20 42 20 62 2c 20 73 74 72 69 6e 67 20 6d  a, B b, string m
0320: 73 67 3d 22 22 29 0d 0a 09 7b 0d 0a 09 09 74 72  sg="")...{....tr
0330: 79 20 7b 0d 0a 09 09 09 69 66 28 20 6d 69 78 69  y {.....if( mixi
0340: 6e 28 22 61 22 7e 6f 70 7e 22 62 22 29 20 29 20  n("a"~op~"b") ) 
0350: 72 65 74 75 72 6e 3b 0d 0a 09 09 7d 20 63 61 74  return;....} cat
0360: 63 68 28 54 68 72 6f 77 61 62 6c 65 20 65 29 20  ch(Throwable e) 
0370: 7b 0d 0a 09 09 09 63 6f 72 65 2e 65 78 63 65 70  {.....core.excep
0380: 74 69 6f 6e 2e 6f 6e 41 73 73 65 72 74 45 72 72  tion.onAssertErr
0390: 6f 72 4d 73 67 28 66 6e 2c 20 6c 6e 2c 20 6d 73  orMsg(fn, ln, ms
03a0: 67 2e 6c 65 6e 67 74 68 20 3f 20 6d 73 67 20 3a  g.length ? msg :
03b0: 20 73 70 72 69 6e 74 66 21 22 65 78 63 65 70 74   sprintf!"except
03c0: 69 6f 6e 20 5b 25 73 5d 22 28 65 29 29 3b 0d 0a  ion [%s]"(e));..
03d0: 09 09 7d 0d 0a 09 09 63 6f 72 65 2e 65 78 63 65  ..}....core.exce
03e0: 70 74 69 6f 6e 2e 6f 6e 41 73 73 65 72 74 45 72  ption.onAssertEr
03f0: 72 6f 72 4d 73 67 28 66 6e 2c 20 6c 6e 2c 20 6d  rorMsg(fn, ln, m
0400: 73 67 2e 6c 65 6e 67 74 68 20 3f 20 6d 73 67 20  sg.length ? msg 
0410: 3a 20 73 70 72 69 6e 74 66 21 22 25 73 20 21 25  : sprintf!"%s !%
0420: 73 20 25 73 22 28 61 2c 6f 70 2c 62 29 29 3b 0d  s %s"(a,op,b));.
0430: 0a 09 7d 0d 0a 7d 0d 0a 0d 0a 61 6c 69 61 73 20  ..}..}....alias 
0440: 61 73 73 65 72 74 4f 70 21 28 60 3d 3d 60 29 20  assertOp!(`==`) 
0450: 61 73 73 65 72 74 5f 65 71 3b 0d 0a 61 6c 69 61  assert_eq;..alia
0460: 73 20 61 73 73 65 72 74 4f 70 21 28 60 21 3d 60  s assertOp!(`!=`
0470: 29 20 61 73 73 65 72 74 5f 6e 65 3b 0d 0a 61 6c  ) assert_ne;..al
0480: 69 61 73 20 61 73 73 65 72 74 4f 70 21 28 60 3c  ias assertOp!(`<
0490: 60 29 20 20 61 73 73 65 72 74 5f 6c 74 3b 0d 0a  `)  assert_lt;..
04a0: 61 6c 69 61 73 20 61 73 73 65 72 74 4f 70 21 28  alias assertOp!(
04b0: 60 3c 3d 60 29 20 61 73 73 65 72 74 5f 6c 65 3b  `<=`) assert_le;
04c0: 0d 0a 61 6c 69 61 73 20 61 73 73 65 72 74 4f 70  ..alias assertOp
04d0: 21 28 60 3e 60 29 20 20 61 73 73 65 72 74 5f 67  !(`>`)  assert_g
04e0: 74 3b 0d 0a 61 6c 69 61 73 20 61 73 73 65 72 74  t;..alias assert
04f0: 4f 70 21 28 60 3e 3d 60 29 20 61 73 73 65 72 74  Op!(`>=`) assert
0500: 5f 67 65 3b 0d 0a 0d 0a 2f 2f 2f 20 55 6e 69 74  _ge;..../// Unit
0510: 74 65 73 74 20 68 65 6c 70 65 72 20 74 68 61 74  test helper that
0520: 20 61 73 73 65 72 74 73 20 61 6e 20 65 78 70 72   asserts an expr
0530: 65 73 73 69 6f 6e 20 6d 75 73 74 20 74 68 72 6f  ession must thro
0540: 77 20 73 6f 6d 65 74 68 69 6e 67 0d 0a 0d 0a 76  w something....v
0550: 6f 69 64 20 61 73 73 65 72 74 5f 74 68 72 6f 77  oid assert_throw
0560: 28 45 78 63 65 70 74 69 6f 6e 54 79 70 65 2c 20  (ExceptionType, 
0570: 54 2c 20 73 74 72 69 6e 67 20 66 6e 3d 5f 5f 46  T, string fn=__F
0580: 49 4c 45 5f 5f 2c 20 69 6e 74 20 6c 6e 3d 5f 5f  ILE__, int ln=__
0590: 4c 49 4e 45 5f 5f 29 28 6c 61 7a 79 20 54 20 74  LINE__)(lazy T t
05a0: 2c 20 73 74 72 69 6e 67 20 6d 73 67 3d 22 22 29  , string msg="")
05b0: 0d 0a 7b 0d 0a 09 74 72 79 20 7b 0d 0a 09 09 74  ..{...try {....t
05c0: 28 29 3b 0d 0a 09 7d 20 63 61 74 63 68 28 45 78  ();...} catch(Ex
05d0: 63 65 70 74 69 6f 6e 54 79 70 65 29 20 7b 0d 0a  ceptionType) {..
05e0: 09 09 72 65 74 75 72 6e 3b 0d 0a 09 7d 20 63 61  ..return;...} ca
05f0: 74 63 68 28 54 68 72 6f 77 61 62 6c 65 20 65 29  tch(Throwable e)
0600: 20 7b 0d 0a 09 09 63 6f 72 65 2e 65 78 63 65 70   {....core.excep
0610: 74 69 6f 6e 2e 6f 6e 41 73 73 65 72 74 45 72 72  tion.onAssertErr
0620: 6f 72 4d 73 67 28 66 6e 2c 20 6c 6e 2c 20 6d 73  orMsg(fn, ln, ms
0630: 67 2e 6c 65 6e 67 74 68 20 3f 20 6d 73 67 20 3a  g.length ? msg :
0640: 20 73 70 72 69 6e 74 66 21 22 65 78 63 65 70 74   sprintf!"except
0650: 69 6f 6e 20 5b 25 73 5d 22 28 65 29 29 3b 0d 0a  ion [%s]"(e));..
0660: 09 7d 0d 0a 09 63 6f 72 65 2e 65 78 63 65 70 74  .}...core.except
0670: 69 6f 6e 2e 6f 6e 41 73 73 65 72 74 45 72 72 6f  ion.onAssertErro
0680: 72 4d 73 67 28 66 6e 2c 20 6c 6e 2c 20 6d 73 67  rMsg(fn, ln, msg
0690: 2e 6c 65 6e 67 74 68 20 3f 20 6d 73 67 20 3a 20  .length ? msg : 
06a0: 22 6e 6f 20 65 78 65 63 70 74 69 6f 6e 22 29 3b  "no execption");
06b0: 0d 0a 7d 0d 0a 0d 0a 2f 2f 2f 20 55 6e 69 74 74  ..}..../// Unitt
06c0: 65 73 74 20 68 65 6c 70 65 72 20 74 68 61 74 20  est helper that 
06d0: 61 73 73 65 72 74 73 20 61 6e 20 65 78 70 72 65  asserts an expre
06e0: 73 73 69 6f 6e 20 6d 75 73 74 20 6e 6f 74 20 74  ssion must not t
06f0: 68 72 6f 77 20 61 6e 79 74 68 69 6e 67 0d 0a 0d  hrow anything...
0700: 0a 76 6f 69 64 20 61 73 73 65 72 74 5f 6e 6f 74  .void assert_not
0710: 68 72 6f 77 28 45 78 63 65 70 74 69 6f 6e 54 79  hrow(ExceptionTy
0720: 70 65 2c 20 54 2c 20 73 74 72 69 6e 67 20 66 6e  pe, T, string fn
0730: 3d 5f 5f 46 49 4c 45 5f 5f 2c 20 69 6e 74 20 6c  =__FILE__, int l
0740: 6e 3d 5f 5f 4c 49 4e 45 5f 5f 29 28 6c 61 7a 79  n=__LINE__)(lazy
0750: 20 54 20 74 2c 20 73 74 72 69 6e 67 20 6d 73 67   T t, string msg
0760: 3d 22 22 29 0d 0a 7b 0d 0a 09 74 72 79 20 7b 0d  ="")..{...try {.
0770: 0a 09 09 74 28 29 3b 0d 0a 09 7d 20 63 61 74 63  ...t();...} catc
0780: 68 28 54 68 72 6f 77 61 62 6c 65 20 65 29 20 7b  h(Throwable e) {
0790: 0d 0a 09 09 63 6f 72 65 2e 65 78 63 65 70 74 69  ....core.excepti
07a0: 6f 6e 2e 6f 6e 41 73 73 65 72 74 45 72 72 6f 72  on.onAssertError
07b0: 4d 73 67 28 66 6e 2c 20 6c 6e 2c 20 6d 73 67 2e  Msg(fn, ln, msg.
07c0: 6c 65 6e 67 74 68 20 3f 20 6d 73 67 20 3a 20 73  length ? msg : s
07d0: 70 72 69 6e 74 66 21 22 65 78 63 65 70 74 69 6f  printf!"exceptio
07e0: 6e 20 5b 25 73 5d 22 28 65 29 29 3b 0d 0a 09 7d  n [%s]"(e));...}
07f0: 0d 0a 7d 0d 0a 0d 0a 2f 2a 20 5b 54 6f 64 6f 5d  ..}..../* [Todo]
0800: 20 69 73 20 74 68 65 72 65 20 61 6e 79 20 77 61   is there any wa
0810: 79 20 74 6f 20 63 6c 65 61 72 6e 6c 79 20 69 6d  y to clearnly im
0820: 70 6c 65 6d 65 6e 74 20 22 61 73 73 65 72 74 5f  plement "assert_
0830: 63 6f 6d 70 69 6c 65 73 22 20 61 6e 64 20 22 61  compiles" and "a
0840: 73 73 65 72 74 5f 6e 6f 74 5f 63 6f 6d 70 69 6c  ssert_not_compil
0850: 65 22 3f 20 2a 2f 0d 0a 0d 0a 2f 2f 2f 20 4d 69  e"? */..../// Mi
0860: 78 69 6e 67 2d 69 6e 20 74 68 65 20 62 65 61 6e  xing-in the bean
0870: 20 63 6f 6e 73 74 72 75 63 74 6f 72 20 66 6f 72   constructor for
0880: 20 61 20 63 6c 61 73 73 0d 0a 0d 0a 74 65 6d 70   a class....temp
0890: 6c 61 74 65 20 53 69 6d 70 6c 65 43 6f 6e 73 74  late SimpleConst
08a0: 72 75 63 74 6f 72 28 29 0d 0a 7b 0d 0a 09 73 74  ructor()..{...st
08b0: 61 74 69 63 20 69 66 28 20 69 73 28 74 79 70 65  atic if( is(type
08c0: 6f 66 28 73 75 70 65 72 29 20 3d 3d 20 4f 62 6a  of(super) == Obj
08d0: 65 63 74 29 20 7c 7c 20 73 75 70 65 72 2e 74 75  ect) || super.tu
08e0: 70 6c 65 6f 66 2e 6c 65 6e 67 74 68 3d 3d 30 20  pleof.length==0 
08f0: 29 0d 0a 09 09 74 68 69 73 28 20 74 79 70 65 6f  )....this( typeo
0900: 66 28 74 68 69 73 2e 74 75 70 6c 65 6f 66 29 20  f(this.tupleof) 
0910: 70 61 72 61 6d 73 20 29 0d 0a 09 09 7b 0d 0a 09  params )....{...
0920: 09 09 73 74 61 74 69 63 20 69 66 28 74 68 69 73  ..static if(this
0930: 2e 74 75 70 6c 65 6f 66 2e 6c 65 6e 67 74 68 3e  .tupleof.length>
0940: 30 29 0d 0a 09 09 09 09 74 68 69 73 2e 74 75 70  0)......this.tup
0950: 6c 65 6f 66 20 3d 20 70 61 72 61 6d 73 3b 0d 0a  leof = params;..
0960: 09 09 7d 0d 0a 09 65 6c 73 65 0d 0a 09 09 74 68  ..}...else....th
0970: 69 73 28 20 74 79 70 65 6f 66 28 73 75 70 65 72  is( typeof(super
0980: 2e 74 75 70 6c 65 6f 66 29 20 70 73 2c 20 74 79  .tupleof) ps, ty
0990: 70 65 6f 66 28 74 68 69 73 2e 74 75 70 6c 65 6f  peof(this.tupleo
09a0: 66 29 20 70 61 72 61 6d 73 20 29 0d 0a 09 09 7b  f) params )....{
09b0: 0d 0a 09 09 09 2f 2f 20 69 6e 63 6c 75 64 69 6e  .....// includin
09c0: 67 20 28 6f 6e 6c 79 29 20 74 68 65 20 64 69 72  g (only) the dir
09d0: 65 63 74 20 73 75 70 65 72 20 63 6c 61 73 73 20  ect super class 
09e0: 6d 65 6d 62 65 72 73 0d 0a 09 09 09 2f 2f 20 6d  members.....// m
09f0: 61 79 20 6e 6f 74 20 61 6c 77 61 79 73 20 62 65  ay not always be
0a00: 20 61 20 64 65 73 69 72 61 62 6c 65 20 63 68 6f   a desirable cho
0a10: 69 63 65 2c 20 62 75 74 20 73 68 6f 75 6c 64 20  ice, but should 
0a20: 77 6f 72 6b 20 66 6f 72 20 6d 61 6e 79 20 63 61  work for many ca
0a30: 73 65 73 0d 0a 09 09 09 73 75 70 65 72 28 70 73  ses.....super(ps
0a40: 29 3b 0d 0a 09 09 09 73 74 61 74 69 63 20 69 66  );.....static if
0a50: 28 74 68 69 73 2e 74 75 70 6c 65 6f 66 2e 6c 65  (this.tupleof.le
0a60: 6e 67 74 68 3e 30 29 0d 0a 09 09 09 09 74 68 69  ngth>0)......thi
0a70: 73 2e 74 75 70 6c 65 6f 66 20 3d 20 70 61 72 61  s.tupleof = para
0a80: 6d 73 3b 0d 0a 09 09 7d 0d 0a 7d 0d 0a 0d 0a 75  ms;....}..}....u
0a90: 6e 69 74 74 65 73 74 0d 0a 7b 0d 0a 09 63 6c 61  nittest..{...cla
0aa0: 73 73 20 54 65 6d 70 0d 0a 09 7b 0d 0a 09 09 69  ss Temp...{....i
0ab0: 6e 74 20 78 3b 0d 0a 09 09 73 74 72 69 6e 67 20  nt x;....string 
0ac0: 79 3b 0d 0a 09 09 6d 69 78 69 6e 20 53 69 6d 70  y;....mixin Simp
0ad0: 6c 65 43 6f 6e 73 74 72 75 63 74 6f 72 3b 0d 0a  leConstructor;..
0ae0: 09 7d 0d 0a 09 61 73 73 65 72 74 5f 65 71 28 20  .}...assert_eq( 
0af0: 28 6e 65 77 20 54 65 6d 70 28 31 2c 22 66 6f 6f  (new Temp(1,"foo
0b00: 22 29 29 2e 78 2c 20 31 20 29 3b 0d 0a 09 61 73  ")).x, 1 );...as
0b10: 73 65 72 74 5f 65 71 28 20 28 6e 65 77 20 54 65  sert_eq( (new Te
0b20: 6d 70 28 31 2c 22 66 6f 6f 22 29 29 2e 79 2c 20  mp(1,"foo")).y, 
0b30: 22 66 6f 6f 22 20 29 3b 0d 0a 09 61 73 73 65 72  "foo" );...asser
0b40: 74 28 20 21 5f 5f 74 72 61 69 74 73 28 63 6f 6d  t( !__traits(com
0b50: 70 69 6c 65 73 2c 20 6e 65 77 20 54 65 6d 70 29  piles, new Temp)
0b60: 20 29 3b 0d 0a 09 61 73 73 65 72 74 28 20 21 5f   );...assert( !_
0b70: 5f 74 72 61 69 74 73 28 63 6f 6d 70 69 6c 65 73  _traits(compiles
0b80: 2c 20 6e 65 77 20 54 65 6d 70 28 31 29 29 20 29  , new Temp(1)) )
0b90: 3b 0d 0a 09 61 73 73 65 72 74 28 20 21 5f 5f 74  ;...assert( !__t
0ba0: 72 61 69 74 73 28 63 6f 6d 70 69 6c 65 73 2c 20  raits(compiles, 
0bb0: 6e 65 77 20 54 65 6d 70 28 22 66 6f 6f 22 2c 31  new Temp("foo",1
0bc0: 29 29 20 29 3b 0d 0a 7d 0d 0a 0d 0a 2f 2f 2f 20  )) );..}..../// 
0bd0: 4d 69 78 69 6e 67 2d 69 6e 20 74 68 65 20 4d 4f  Mixing-in the MO
0be0: 53 54 2d 44 45 52 49 56 45 44 2d 6d 65 6d 62 65  ST-DERIVED-membe
0bf0: 72 2d 77 69 73 65 20 63 6f 6d 70 61 72 61 74 6f  r-wise comparato
0c00: 72 20 66 6f 72 20 61 20 63 6c 61 73 73 0d 0a 0d  r for a class...
0c10: 0a 74 65 6d 70 6c 61 74 65 20 53 69 6d 70 6c 65  .template Simple
0c20: 43 6f 6d 70 61 72 65 28 29 0d 0a 7b 0d 0a 09 6f  Compare()..{...o
0c30: 76 65 72 72 69 64 65 20 62 6f 6f 6c 20 6f 70 45  verride bool opE
0c40: 71 75 61 6c 73 28 4f 62 6a 65 63 74 20 72 68 73  quals(Object rhs
0c50: 5f 29 20 63 6f 6e 73 74 0d 0a 09 7b 0d 0a 09 09  _) const...{....
0c60: 69 66 28 20 61 75 74 6f 20 72 68 73 20 3d 20 63  if( auto rhs = c
0c70: 61 73 74 28 74 79 70 65 6f 66 28 74 68 69 73 29  ast(typeof(this)
0c80: 29 72 68 73 5f 20 29 0d 0a 09 09 7b 0d 0a 09 09  )rhs_ )....{....
0c90: 09 66 6f 72 65 61 63 68 28 69 2c 5f 3b 20 74 68  .foreach(i,_; th
0ca0: 69 73 2e 74 75 70 6c 65 6f 66 29 0d 0a 09 09 09  is.tupleof).....
0cb0: 09 69 66 28 20 74 68 69 73 2e 74 75 70 6c 65 6f  .if( this.tupleo
0cc0: 66 5b 69 5d 20 21 3d 20 72 68 73 2e 74 75 70 6c  f[i] != rhs.tupl
0cd0: 65 6f 66 5b 69 5d 20 29 0d 0a 09 09 09 09 09 72  eof[i] ).......r
0ce0: 65 74 75 72 6e 20 66 61 6c 73 65 3b 0d 0a 09 09  eturn false;....
0cf0: 09 72 65 74 75 72 6e 20 74 72 75 65 3b 0d 0a 09  .return true;...
0d00: 09 7d 0d 0a 09 09 61 73 73 65 72 74 28 66 61 6c  .}....assert(fal
0d10: 73 65 2c 20 73 70 72 69 6e 74 66 21 22 43 61 6e  se, sprintf!"Can
0d20: 6e 6f 74 20 63 6f 6d 70 61 72 65 20 25 73 20 77  not compare %s w
0d30: 69 74 68 20 25 73 22 28 74 79 70 65 69 64 28 74  ith %s"(typeid(t
0d40: 68 69 73 29 2c 20 74 79 70 65 69 64 28 72 68 73  his), typeid(rhs
0d50: 5f 29 29 29 3b 0d 0a 09 7d 0d 0a 0d 0a 09 6f 76  _)));...}.....ov
0d60: 65 72 72 69 64 65 20 68 61 73 68 5f 74 20 74 6f  erride hash_t to
0d70: 48 61 73 68 28 29 20 63 6f 6e 73 74 0d 0a 09 7b  Hash() const...{
0d80: 0d 0a 09 09 68 61 73 68 5f 74 20 68 20 3d 20 30  ....hash_t h = 0
0d90: 3b 0d 0a 09 09 66 6f 72 65 61 63 68 28 6d 65 6d  ;....foreach(mem
0da0: 3b 20 74 68 69 73 2e 74 75 70 6c 65 6f 66 29 0d  ; this.tupleof).
0db0: 0a 09 09 09 68 20 2b 3d 20 74 79 70 65 69 64 28  ....h += typeid(
0dc0: 6d 65 6d 29 2e 67 65 74 48 61 73 68 28 26 6d 65  mem).getHash(&me
0dd0: 6d 29 3b 0d 0a 09 09 72 65 74 75 72 6e 20 68 3b  m);....return h;
0de0: 0d 0a 09 7d 0d 0a 0d 0a 09 6f 76 65 72 72 69 64  ...}.....overrid
0df0: 65 20 69 6e 74 20 6f 70 43 6d 70 28 4f 62 6a 65  e int opCmp(Obje
0e00: 63 74 20 72 68 73 5f 29 20 63 6f 6e 73 74 0d 0a  ct rhs_) const..
0e10: 09 7b 0d 0a 09 09 69 66 28 20 61 75 74 6f 20 72  .{....if( auto r
0e20: 68 73 20 3d 20 63 61 73 74 28 74 79 70 65 6f 66  hs = cast(typeof
0e30: 28 74 68 69 73 29 29 72 68 73 5f 20 29 0d 0a 09  (this))rhs_ )...
0e40: 09 7b 0d 0a 09 09 09 66 6f 72 65 61 63 68 28 69  .{.....foreach(i
0e50: 2c 5f 3b 20 74 68 69 73 2e 74 75 70 6c 65 6f 66  ,_; this.tupleof
0e60: 29 0d 0a 09 09 09 09 69 66 28 61 75 74 6f 20 63  )......if(auto c
0e70: 20 3d 20 74 79 70 65 69 64 28 5f 29 2e 63 6f 6d   = typeid(_).com
0e80: 70 61 72 65 28 26 74 68 69 73 2e 74 75 70 6c 65  pare(&this.tuple
0e90: 6f 66 5b 69 5d 2c 26 72 68 73 2e 74 75 70 6c 65  of[i],&rhs.tuple
0ea0: 6f 66 5b 69 5d 29 29 0d 0a 09 09 09 09 09 72 65  of[i])).......re
0eb0: 74 75 72 6e 20 63 3b 0d 0a 09 09 09 72 65 74 75  turn c;.....retu
0ec0: 72 6e 20 30 3b 0d 0a 09 09 7d 0d 0a 09 09 61 73  rn 0;....}....as
0ed0: 73 65 72 74 28 66 61 6c 73 65 2c 20 73 70 72 69  sert(false, spri
0ee0: 6e 74 66 21 22 43 61 6e 6e 6f 74 20 63 6f 6d 70  ntf!"Cannot comp
0ef0: 61 72 65 20 25 73 20 77 69 74 68 20 25 73 22 28  are %s with %s"(
0f00: 74 79 70 65 69 64 28 74 68 69 73 29 2c 20 74 79  typeid(this), ty
0f10: 70 65 69 64 28 72 68 73 5f 29 29 29 3b 0d 0a 09  peid(rhs_)));...
0f20: 7d 0d 0a 7d 0d 0a 0d 0a 75 6e 69 74 74 65 73 74  }..}....unittest
0f30: 0d 0a 7b 0d 0a 09 63 6c 61 73 73 20 54 65 6d 70  ..{...class Temp
0f40: 0d 0a 09 7b 0d 0a 09 09 69 6e 74 20 78 3b 0d 0a  ...{....int x;..
0f50: 09 09 73 74 72 69 6e 67 20 79 3b 0d 0a 09 09 6d  ..string y;....m
0f60: 69 78 69 6e 20 53 69 6d 70 6c 65 43 6f 6e 73 74  ixin SimpleConst
0f70: 72 75 63 74 6f 72 3b 0d 0a 09 09 6d 69 78 69 6e  ructor;....mixin
0f80: 20 53 69 6d 70 6c 65 43 6f 6d 70 61 72 65 3b 0d   SimpleCompare;.
0f90: 0a 09 7d 0d 0a 09 61 73 73 65 72 74 5f 65 71 28  ..}...assert_eq(
0fa0: 20 6e 65 77 20 54 65 6d 70 28 31 2c 22 66 6f 6f   new Temp(1,"foo
0fb0: 22 29 2c 20 6e 65 77 20 54 65 6d 70 28 31 2c 22  "), new Temp(1,"
0fc0: 66 6f 6f 22 29 20 29 3b 0d 0a 09 61 73 73 65 72  foo") );...asser
0fd0: 74 5f 65 71 28 20 28 6e 65 77 20 54 65 6d 70 28  t_eq( (new Temp(
0fe0: 31 2c 22 66 6f 6f 22 29 29 2e 74 6f 48 61 73 68  1,"foo")).toHash
0ff0: 2c 20 28 6e 65 77 20 54 65 6d 70 28 31 2c 22 66  , (new Temp(1,"f
1000: 6f 6f 22 29 29 2e 74 6f 48 61 73 68 20 29 3b 0d  oo")).toHash );.
1010: 0a 09 61 73 73 65 72 74 5f 6e 65 28 20 6e 65 77  ..assert_ne( new
1020: 20 54 65 6d 70 28 31 2c 22 66 6f 6f 22 29 2c 20   Temp(1,"foo"), 
1030: 6e 65 77 20 54 65 6d 70 28 32 2c 22 66 6f 6f 22  new Temp(2,"foo"
1040: 29 20 29 3b 0d 0a 09 61 73 73 65 72 74 5f 6e 65  ) );...assert_ne
1050: 28 20 6e 65 77 20 54 65 6d 70 28 31 2c 22 66 6f  ( new Temp(1,"fo
1060: 6f 22 29 2c 20 6e 65 77 20 54 65 6d 70 28 31 2c  o"), new Temp(1,
1070: 22 62 61 72 22 29 20 29 3b 0d 0a 09 61 73 73 65  "bar") );...asse
1080: 72 74 5f 67 74 28 20 6e 65 77 20 54 65 6d 70 28  rt_gt( new Temp(
1090: 31 2c 22 66 6f 6f 22 29 2c 20 6e 65 77 20 54 65  1,"foo"), new Te
10a0: 6d 70 28 31 2c 22 62 61 72 22 29 20 29 3b 0d 0a  mp(1,"bar") );..
10b0: 09 61 73 73 65 72 74 5f 6c 74 28 20 6e 65 77 20  .assert_lt( new 
10c0: 54 65 6d 70 28 31 2c 22 66 6f 6f 22 29 2c 20 6e  Temp(1,"foo"), n
10d0: 65 77 20 54 65 6d 70 28 32 2c 22 62 61 72 22 29  ew Temp(2,"bar")
10e0: 20 29 3b 0d 0a 7d 0d 0a                           );..}..