Hex Artifact Content
Not logged in

Artifact b76be1f6ad977d56752dcf1616d70912ccc92dbe:


0000: 70 75 62 6c 69 63 20 69 6d 70 6f 72 74 20 73 74  public import st
0010: 64 2e 61 6c 67 6f 72 69 74 68 6d 3b 0a 70 75 62  d.algorithm;.pub
0020: 6c 69 63 20 69 6d 70 6f 72 74 20 73 74 64 2e 61  lic import std.a
0030: 72 72 61 79 3b 0a 70 75 62 6c 69 63 20 69 6d 70  rray;.public imp
0040: 6f 72 74 20 73 74 64 2e 63 6f 6e 76 3b 0a 70 75  ort std.conv;.pu
0050: 62 6c 69 63 20 69 6d 70 6f 72 74 20 73 74 64 2e  blic import std.
0060: 72 61 6e 67 65 3b 0a 70 75 62 6c 69 63 20 69 6d  range;.public im
0070: 70 6f 72 74 20 73 74 64 2e 73 74 64 69 6f 3b 0a  port std.stdio;.
0080: 70 75 62 6c 69 63 20 69 6d 70 6f 72 74 20 73 74  public import st
0090: 64 2e 73 74 72 69 6e 67 3b 0a 70 75 62 6c 69 63  d.string;.public
00a0: 20 69 6d 70 6f 72 74 20 73 74 64 2e 74 79 70 65   import std.type
00b0: 63 6f 6e 73 3b 0a 70 75 62 6c 69 63 20 69 6d 70  cons;.public imp
00c0: 6f 72 74 20 73 74 64 2e 6d 61 74 68 3b 0a 69 6d  ort std.math;.im
00d0: 70 6f 72 74 20 73 74 64 2e 63 2e 73 74 64 6c 69  port std.c.stdli
00e0: 62 3b 0a 0a 54 5b 5d 20 65 72 61 73 65 28 54 2c  b;..T[] erase(T,
00f0: 56 29 28 54 5b 5d 20 78 73 2c 20 56 20 79 29 0a  V)(T[] xs, V y).
0100: 7b 0a 09 66 6f 72 65 61 63 68 28 69 2c 78 3b 20  {..foreach(i,x; 
0110: 78 73 29 0a 09 09 69 66 28 78 20 3d 3d 20 79 29  xs)...if(x == y)
0120: 0a 09 09 09 72 65 74 75 72 6e 20 78 73 5b 30 2e  ....return xs[0.
0130: 2e 69 5d 7e 78 73 5b 69 2b 31 2e 2e 24 5d 3b 0a  .i]~xs[i+1..$];.
0140: 09 72 65 74 75 72 6e 20 78 73 3b 0a 7d 0a 0a 2f  .return xs;.}../
0150: 2f 20 54 6f 20 61 76 6f 69 64 65 20 74 68 65 20  / To avoide the 
0160: 66 6f 6c 6c 6f 77 69 6e 67 20 49 43 45 3a 0a 2f  following ICE:./
0170: 2f 20 20 20 73 72 63 5c 70 68 6f 62 6f 73 5c 73  /   src\phobos\s
0180: 74 64 5c 61 6c 67 6f 72 69 74 68 6d 2e 64 28 34  td\algorithm.d(4
0190: 35 35 32 29 3a 0a 2f 2f 20 20 20 20 20 45 72 72  552):.//     Err
01a0: 6f 72 3a 20 66 75 6e 63 74 69 6f 6e 20 73 74 64  or: function std
01b0: 2e 61 6c 67 6f 72 69 74 68 6d 2e 63 6f 75 6e 74  .algorithm.count
01c0: 21 28 22 61 20 3d 3d 20 62 22 2c 73 74 72 69 6e  !("a == b",strin
01d0: 67 2c 63 68 61 72 29 2e 63 6f 75 6e 74 0a 2f 2f  g,char).count.//
01e0: 20 20 20 20 20 63 6f 6d 70 69 6c 65 72 20 65 72       compiler er
01f0: 72 6f 72 2c 20 70 61 72 61 6d 65 74 65 72 20 27  ror, parameter '
0200: 76 61 6c 75 65 27 2c 20 62 75 67 7a 69 6c 6c 61  value', bugzilla
0210: 20 32 39 36 32 3f 0a 2f 2f 20 20 20 20 20 41 73   2962?.//     As
0220: 73 65 72 74 69 6f 6e 20 66 61 69 6c 75 72 65 3a  sertion failure:
0230: 20 27 30 27 20 6f 6e 20 6c 69 6e 65 20 37 31 37   '0' on line 717
0240: 20 69 6e 20 66 69 6c 65 20 27 67 6c 75 65 2e 63   in file 'glue.c
0250: 27 0a 69 6e 74 20 63 6f 75 6e 74 28 54 2c 56 29  '.int count(T,V)
0260: 28 54 5b 5d 20 61 2c 20 56 20 76 29 0a 7b 0a 09  (T[] a, V v).{..
0270: 69 6e 74 20 63 6e 74 20 3d 20 30 3b 0a 09 66 6f  int cnt = 0;..fo
0280: 72 65 61 63 68 28 65 3b 20 61 29 0a 09 09 69 66  reach(e; a)...if
0290: 28 65 20 3d 3d 20 76 29 0a 09 09 09 2b 2b 63 6e  (e == v)....++cn
02a0: 74 3b 0a 09 72 65 74 75 72 6e 20 63 6e 74 3b 0a  t;..return cnt;.
02b0: 7d 0a 0a 76 6f 69 64 20 61 70 70 6c 69 63 61 74  }..void applicat
02c0: 69 6f 6e 5f 65 78 69 74 28 29 0a 7b 0a 09 73 74  ion_exit().{..st
02d0: 64 2e 63 2e 73 74 64 6c 69 62 2e 65 78 69 74 28  d.c.stdlib.exit(
02e0: 30 29 3b 0a 7d 0a 0a 74 65 6d 70 6c 61 74 65 20  0);.}..template 
02f0: 44 65 72 69 76 65 43 72 65 61 74 65 28 29 0a 7b  DeriveCreate().{
0300: 0a 09 74 68 69 73 28 54 53 2e 2e 2e 29 28 54 53  ..this(TS...)(TS
0310: 20 70 61 72 61 6d 73 29 0a 09 7b 0a 09 09 74 68   params)..{...th
0320: 69 73 2e 74 75 70 6c 65 6f 66 20 3d 20 70 61 72  is.tupleof = par
0330: 61 6d 73 3b 0a 09 7d 0a 7d 0a 0a 74 65 6d 70 6c  ams;..}.}..templ
0340: 61 74 65 20 44 65 72 69 76 65 43 6f 6d 70 61 72  ate DeriveCompar
0350: 65 28 29 0a 7b 0a 6f 76 65 72 72 69 64 65 3a 0a  e().{.override:.
0360: 09 62 6f 6f 6c 20 6f 70 45 71 75 61 6c 73 28 4f  .bool opEquals(O
0370: 62 6a 65 63 74 20 72 68 73 29 20 63 6f 6e 73 74  bject rhs) const
0380: 0a 09 7b 0a 09 09 72 65 74 75 72 6e 20 74 75 70  ..{...return tup
0390: 6c 65 28 74 68 69 73 2e 74 75 70 6c 65 6f 66 29  le(this.tupleof)
03a0: 20 3d 3d 20 74 75 70 6c 65 28 28 63 61 73 74 28   == tuple((cast(
03b0: 74 79 70 65 6f 66 28 74 68 69 73 29 29 72 68 73  typeof(this))rhs
03c0: 29 2e 74 75 70 6c 65 6f 66 29 3b 0a 09 7d 0a 0a  ).tupleof);..}..
03d0: 09 69 6e 74 20 6f 70 43 6d 70 28 4f 62 6a 65 63  .int opCmp(Objec
03e0: 74 20 72 68 73 29 20 63 6f 6e 73 74 0a 09 7b 0a  t rhs) const..{.
03f0: 09 09 72 65 74 75 72 6e 20 74 75 70 6c 65 28 74  ..return tuple(t
0400: 68 69 73 2e 74 75 70 6c 65 6f 66 29 2e 6f 70 43  his.tupleof).opC
0410: 6d 70 28 74 75 70 6c 65 28 28 63 61 73 74 28 74  mp(tuple((cast(t
0420: 79 70 65 6f 66 28 74 68 69 73 29 29 72 68 73 29  ypeof(this))rhs)
0430: 2e 74 75 70 6c 65 6f 66 29 29 3b 0a 09 7d 0a 0a  .tupleof));..}..
0440: 09 68 61 73 68 5f 74 20 74 6f 48 61 73 68 28 29  .hash_t toHash()
0450: 20 63 6f 6e 73 74 0a 09 7b 0a 09 09 68 61 73 68   const..{...hash
0460: 5f 74 20 76 20 3d 20 30 3b 0a 09 09 66 6f 72 65  _t v = 0;...fore
0470: 61 63 68 28 6d 65 6d 3b 20 74 68 69 73 2e 74 75  ach(mem; this.tu
0480: 70 6c 65 6f 66 29 20 7b 0a 09 09 09 76 20 2a 3d  pleof) {....v *=
0490: 20 31 31 3b 0a 09 09 09 73 74 61 74 69 63 20 69   11;....static i
04a0: 66 28 5f 5f 74 72 61 69 74 73 28 63 6f 6d 70 69  f(__traits(compi
04b0: 6c 65 73 2c 20 76 5e 3d 6d 65 6d 29 29 0a 09 09  les, v^=mem))...
04c0: 09 09 76 20 5e 3d 20 6d 65 6d 3b 0a 09 09 09 65  ..v ^= mem;....e
04d0: 6c 73 65 0a 09 09 09 09 76 20 5e 3d 20 74 79 70  lse.....v ^= typ
04e0: 65 69 64 28 6d 65 6d 29 2e 67 65 74 48 61 73 68  eid(mem).getHash
04f0: 28 26 6d 65 6d 29 3b 0a 09 09 7d 0a 09 09 72 65  (&mem);...}...re
0500: 74 75 72 6e 20 76 3b 0a 09 7d 0a 7d 0a 0a 74 65  turn v;..}.}..te
0510: 6d 70 6c 61 74 65 20 44 65 72 69 76 65 53 68 6f  mplate DeriveSho
0520: 77 28 29 0a 7b 0a 6f 76 65 72 72 69 64 65 3a 0a  w().{.override:.
0530: 09 73 74 72 69 6e 67 20 74 6f 53 74 72 69 6e 67  .string toString
0540: 28 29 20 63 6f 6e 73 74 0a 09 7b 0a 09 09 73 74  () const..{...st
0550: 72 69 6e 67 20 73 74 72 20 3d 20 74 65 78 74 28  ring str = text(
0560: 74 79 70 65 6f 66 28 74 68 69 73 29 2e 73 74 72  typeof(this).str
0570: 69 6e 67 6f 66 2c 20 22 28 22 29 3b 0a 09 09 66  ingof, "(");...f
0580: 6f 72 65 61 63 68 28 69 2c 6d 65 6d 3b 20 74 68  oreach(i,mem; th
0590: 69 73 2e 74 75 70 6c 65 6f 66 29 20 7b 0a 09 09  is.tupleof) {...
05a0: 09 69 66 28 69 29 20 73 74 72 20 7e 3d 20 22 2c  .if(i) str ~= ",
05b0: 20 22 3b 0a 09 09 09 73 74 72 20 3d 20 74 65 78   ";....str = tex
05c0: 74 28 73 74 72 2c 20 74 68 69 73 2e 74 75 70 6c  t(str, this.tupl
05d0: 65 6f 66 5b 69 5d 2e 73 74 72 69 6e 67 6f 66 5b  eof[i].stringof[
05e0: 35 2e 2e 24 5d 2c 20 22 3a 22 2c 20 20 6d 65 6d  5..$], ":",  mem
05f0: 29 3b 0a 09 09 7d 0a 09 09 72 65 74 75 72 6e 20  );...}...return 
0600: 73 74 72 20 7e 20 22 29 22 3b 0a 09 7d 0a 7d 0a  str ~ ")";..}.}.