projects/ldc: druntime/src/compiler/dmd/aaA.d annotate

author	Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
date	Tue, 11 Nov 2008 01:52:37 +0100
parents
children

rev	line source
759 d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	1 //_ aaA.d
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	2
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	3 /**
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	4 * Part of the D programming language runtime library.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	5 * Implementation of associative arrays.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	6 */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	7
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	8 /*
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	9 * Copyright (C) 2000-2008 by Digital Mars, http://www.digitalmars.com
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	10 * Written by Walter Bright
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	11 *
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	12 * This software is provided 'as-is', without any express or implied
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	13 * warranty. In no event will the authors be held liable for any damages
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	14 * arising from the use of this software.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	15 *
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	16 * Permission is granted to anyone to use this software for any purpose,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	17 * including commercial applications, and to alter it and redistribute it
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	18 * freely, subject to the following restrictions:
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	19 *
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	20 * o The origin of this software must not be misrepresented; you must not
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	21 * claim that you wrote the original software. If you use this software
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	22 * in a product, an acknowledgment in the product documentation would be
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	23 * appreciated but is not required.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	24 * o Altered source versions must be plainly marked as such, and must not
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	25 * be misrepresented as being the original software.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	26 * o This notice may not be removed or altered from any source
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	27 * distribution.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	28 */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	29
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	30 /*
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	31 * Modified by Sean Kelly for use with the D Runtime Project
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	32 */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	33
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	34 module rt.aaA;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	35
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	36 private
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	37 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	38 import stdc.stdarg;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	39 import stdc.string;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	40
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	41 enum BlkAttr : uint
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	42 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	43 FINALIZE = 0b0000_0001,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	44 NO_SCAN = 0b0000_0010,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	45 NO_MOVE = 0b0000_0100,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	46 ALL_BITS = 0b1111_1111
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	47 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	48
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	49 extern (C) void* gc_malloc( size_t sz, uint ba = 0 );
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	50 extern (C) void* gc_calloc( size_t sz, uint ba = 0 );
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	51 extern (C) void gc_free( void* p );
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	52 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	53
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	54 // Auto-rehash and pre-allocate - Dave Fladebo
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	55
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	56 static size_t[] prime_list = [
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	57 97UL, 389UL,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	58 1_543UL, 6_151UL,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	59 24_593UL, 98_317UL,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	60 393_241UL, 1_572_869UL,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	61 6_291_469UL, 25_165_843UL,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	62 100_663_319UL, 402_653_189UL,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	63 1_610_612_741UL, 4_294_967_291UL,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	64 // 8_589_934_513UL, 17_179_869_143UL
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	65 ];
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	66
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	67 /* This is the type of the return value for dynamic arrays.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	68 * It should be a type that is returned in registers.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	69 * Although DMD will return types of Array in registers,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	70 * gcc will not, so we instead use a 'long'.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	71 */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	72 alias long ArrayRet_t;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	73
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	74 struct Array
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	75 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	76 size_t length;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	77 void* ptr;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	78 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	79
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	80 struct aaA
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	81 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	82 aaA *left;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	83 aaA *right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	84 hash_t hash;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	85 /* key */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	86 /* value */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	87 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	88
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	89 struct BB
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	90 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	91 aaA*[] b;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	92 size_t nodes; // total number of aaA nodes
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	93 TypeInfo keyti; // TODO: replace this with TypeInfo_AssociativeArray when available in _aaGet()
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	94 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	95
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	96 /* This is the type actually seen by the programmer, although
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	97 * it is completely opaque.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	98 */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	99
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	100 struct AA
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	101 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	102 BB* a;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	103 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	104
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	105 /**********************************
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	106 * Align to next pointer boundary, so that
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	107 * GC won't be faced with misaligned pointers
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	108 * in value.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	109 */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	110
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	111 size_t aligntsize(size_t tsize)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	112 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	113 // Is pointer alignment on the x64 4 bytes or 8?
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	114 return (tsize + size_t.sizeof - 1) & ~(size_t.sizeof - 1);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	115 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	116
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	117 extern (C):
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	118
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	119 /*************************************************
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	120 * Invariant for aa.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	121 */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	122
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	123 /+
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	124 void _aaInvAh(aaA*[] aa)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	125 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	126 for (size_t i = 0; i < aa.length; i++)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	127 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	128 if (aa[i])
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	129 _aaInvAh_x(aa[i]);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	130 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	131 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	132
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	133 private int _aaCmpAh_x(aaA e1, aaA e2)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	134 { int c;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	135
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	136 c = e1.hash - e2.hash;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	137 if (c == 0)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	138 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	139 c = e1.key.length - e2.key.length;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	140 if (c == 0)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	141 c = memcmp((char )e1.key, (char )e2.key, e1.key.length);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	142 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	143 return c;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	144 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	145
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	146 private void _aaInvAh_x(aaA *e)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	147 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	148 hash_t key_hash;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	149 aaA *e1;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	150 aaA *e2;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	151
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	152 key_hash = getHash(e.key);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	153 assert(key_hash == e.hash);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	154
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	155 while (1)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	156 { int c;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	157
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	158 e1 = e.left;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	159 if (e1)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	160 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	161 _aaInvAh_x(e1); // ordinary recursion
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	162 do
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	163 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	164 c = _aaCmpAh_x(e1, e);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	165 assert(c < 0);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	166 e1 = e1.right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	167 } while (e1 != null);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	168 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	169
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	170 e2 = e.right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	171 if (e2)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	172 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	173 do
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	174 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	175 c = _aaCmpAh_x(e, e2);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	176 assert(c < 0);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	177 e2 = e2.left;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	178 } while (e2 != null);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	179 e = e.right; // tail recursion
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	180 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	181 else
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	182 break;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	183 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	184 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	185 +/
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	186
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	187 /****************************************************
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	188 * Determine number of entries in associative array.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	189 */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	190
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	191 size_t _aaLen(AA aa)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	192 in
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	193 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	194 //printf("_aaLen()+\n");
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	195 //_aaInv(aa);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	196 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	197 out (result)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	198 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	199 size_t len = 0;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	200
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	201 void _aaLen_x(aaA* ex)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	202 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	203 auto e = ex;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	204 len++;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	205
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	206 while (1)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	207 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	208 if (e.right)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	209 _aaLen_x(e.right);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	210 e = e.left;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	211 if (!e)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	212 break;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	213 len++;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	214 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	215 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	216
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	217 if (aa.a)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	218 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	219 foreach (e; aa.a.b)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	220 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	221 if (e)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	222 _aaLen_x(e);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	223 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	224 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	225 assert(len == result);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	226
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	227 //printf("_aaLen()-\n");
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	228 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	229 body
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	230 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	231 return aa.a ? aa.a.nodes : 0;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	232 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	233
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	234
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	235 /*************************************************
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	236 * Get pointer to value in associative array indexed by key.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	237 * Add entry for key if it is not already there.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	238 */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	239
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	240 void* _aaGet(AA* aa, TypeInfo keyti, size_t valuesize, ...)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	241 in
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	242 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	243 assert(aa);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	244 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	245 out (result)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	246 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	247 assert(result);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	248 assert(aa.a);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	249 assert(aa.a.b.length);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	250 //assert(_aaInAh(*aa.a, key));
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	251 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	252 body
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	253 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	254 auto pkey = cast(void *)(&valuesize + 1);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	255 size_t i;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	256 aaA *e;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	257 auto keysize = aligntsize(keyti.tsize());
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	258
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	259 if (!aa.a)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	260 aa.a = new BB();
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	261 aa.a.keyti = keyti;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	262
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	263 if (!aa.a.b.length)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	264 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	265 alias aaA *pa;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	266 auto len = prime_list[0];
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	267
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	268 aa.a.b = new pa[len];
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	269 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	270
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	271 auto key_hash = keyti.getHash(pkey);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	272 //printf("hash = %d\n", key_hash);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	273 i = key_hash % aa.a.b.length;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	274 auto pe = &aa.a.b[i];
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	275 while ((e = *pe) !is null)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	276 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	277 if (key_hash == e.hash)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	278 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	279 auto c = keyti.compare(pkey, e + 1);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	280 if (c == 0)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	281 goto Lret;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	282 pe = (c < 0) ? &e.left : &e.right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	283 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	284 else
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	285 pe = (key_hash < e.hash) ? &e.left : &e.right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	286 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	287
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	288 // Not found, create new elem
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	289 //printf("create new one\n");
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	290 size_t size = aaA.sizeof + keysize + valuesize;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	291 e = cast(aaA *) gc_calloc(size);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	292 memcpy(e + 1, pkey, keysize);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	293 e.hash = key_hash;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	294 *pe = e;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	295
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	296 auto nodes = ++aa.a.nodes;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	297 //printf("length = %d, nodes = %d\n", (*aa.a).length, nodes);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	298 if (nodes > aa.a.b.length * 4)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	299 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	300 _aaRehash(aa,keyti);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	301 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	302
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	303 Lret:
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	304 return cast(void *)(e + 1) + keysize;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	305 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	306
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	307
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	308 /*************************************************
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	309 * Get pointer to value in associative array indexed by key.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	310 * Returns null if it is not already there.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	311 */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	312
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	313 void* _aaGetRvalue(AA aa, TypeInfo keyti, size_t valuesize, ...)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	314 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	315 //printf("_aaGetRvalue(valuesize = %u)\n", valuesize);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	316 if (!aa.a)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	317 return null;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	318
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	319 auto pkey = cast(void *)(&valuesize + 1);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	320 auto keysize = aligntsize(keyti.tsize());
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	321 auto len = aa.a.b.length;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	322
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	323 if (len)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	324 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	325 auto key_hash = keyti.getHash(pkey);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	326 //printf("hash = %d\n", key_hash);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	327 size_t i = key_hash % len;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	328 auto e = aa.a.b[i];
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	329 while (e !is null)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	330 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	331 if (key_hash == e.hash)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	332 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	333 auto c = keyti.compare(pkey, e + 1);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	334 if (c == 0)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	335 return cast(void *)(e + 1) + keysize;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	336 e = (c < 0) ? e.left : e.right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	337 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	338 else
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	339 e = (key_hash < e.hash) ? e.left : e.right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	340 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	341 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	342 return null; // not found, caller will throw exception
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	343 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	344
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	345
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	346 /*************************************************
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	347 * Determine if key is in aa.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	348 * Returns:
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	349 * null not in aa
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	350 * !=null in aa, return pointer to value
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	351 */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	352
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	353 void* _aaIn(AA aa, TypeInfo keyti, ...)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	354 in
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	355 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	356 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	357 out (result)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	358 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	359 //assert(result == 0 \|\| result == 1);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	360 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	361 body
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	362 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	363 if (aa.a)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	364 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	365 auto pkey = cast(void *)(&keyti + 1);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	366
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	367 //printf("_aaIn(), .length = %d, .ptr = %x\n", aa.a.length, cast(uint)aa.a.ptr);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	368 auto len = aa.a.b.length;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	369
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	370 if (len)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	371 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	372 auto key_hash = keyti.getHash(pkey);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	373 //printf("hash = %d\n", key_hash);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	374 size_t i = key_hash % len;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	375 auto e = aa.a.b[i];
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	376 while (e !is null)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	377 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	378 if (key_hash == e.hash)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	379 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	380 auto c = keyti.compare(pkey, e + 1);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	381 if (c == 0)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	382 return cast(void *)(e + 1) + aligntsize(keyti.tsize());
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	383 e = (c < 0) ? e.left : e.right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	384 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	385 else
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	386 e = (key_hash < e.hash) ? e.left : e.right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	387 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	388 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	389 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	390
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	391 // Not found
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	392 return null;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	393 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	394
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	395 /*************************************************
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	396 * Delete key entry in aa[].
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	397 * If key is not in aa[], do nothing.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	398 */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	399
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	400 void _aaDel(AA aa, TypeInfo keyti, ...)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	401 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	402 auto pkey = cast(void *)(&keyti + 1);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	403 aaA *e;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	404
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	405 if (aa.a && aa.a.b.length)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	406 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	407 auto key_hash = keyti.getHash(pkey);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	408 //printf("hash = %d\n", key_hash);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	409 size_t i = key_hash % aa.a.b.length;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	410 auto pe = &aa.a.b[i];
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	411 while ((e = *pe) !is null) // null means not found
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	412 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	413 if (key_hash == e.hash)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	414 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	415 auto c = keyti.compare(pkey, e + 1);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	416 if (c == 0)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	417 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	418 if (!e.left && !e.right)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	419 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	420 *pe = null;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	421 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	422 else if (e.left && !e.right)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	423 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	424 *pe = e.left;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	425 e.left = null;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	426 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	427 else if (!e.left && e.right)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	428 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	429 *pe = e.right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	430 e.right = null;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	431 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	432 else
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	433 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	434 *pe = e.left;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	435 e.left = null;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	436 do
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	437 pe = &(*pe).right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	438 while (*pe);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	439 *pe = e.right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	440 e.right = null;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	441 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	442
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	443 aa.a.nodes--;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	444 gc_free(e);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	445 break;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	446 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	447 pe = (c < 0) ? &e.left : &e.right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	448 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	449 else
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	450 pe = (key_hash < e.hash) ? &e.left : &e.right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	451 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	452 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	453 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	454
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	455
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	456 /********************************************
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	457 * Produce array of values from aa.
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	458 */
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	459
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	460 ArrayRet_t _aaValues(AA aa, size_t keysize, size_t valuesize)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	461 in
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	462 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	463 assert(keysize == aligntsize(keysize));
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	464 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	465 body
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	466 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	467 size_t resi;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	468 Array a;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	469
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	470 void _aaValues_x(aaA* e)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	471 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	472 do
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	473 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	474 memcpy(a.ptr + resi * valuesize,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	475 cast(byte*)e + aaA.sizeof + keysize,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	476 valuesize);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	477 resi++;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	478 if (e.left)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	479 { if (!e.right)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	480 { e = e.left;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	481 continue;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	482 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	483 _aaValues_x(e.left);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	484 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	485 e = e.right;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	486 } while (e !is null);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	487 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	488
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	489 if (aa.a)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	490 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	491 a.length = _aaLen(aa);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	492 a.ptr = cast(byte) gc_malloc(a.length valuesize,
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	493 valuesize < (void*).sizeof ? BlkAttr.NO_SCAN : 0);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	494 resi = 0;
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	495 foreach (e; aa.a.b)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	496 {
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	497 if (e)
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	498 _aaValues_x(e);
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	499 }
d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: diff changeset	500 assert(resi == a.length);

759

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

1 //_ aaA.d

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

2

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

3 /**

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

4 * Part of the D programming language runtime library.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

5 * Implementation of associative arrays.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

6 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

7

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

8 /*

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

10 * Written by Walter Bright

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

11 *

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

12 * This software is provided 'as-is', without any express or implied

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

13 * warranty. In no event will the authors be held liable for any damages

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

14 * arising from the use of this software.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

15 *

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

16 * Permission is granted to anyone to use this software for any purpose,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

17 * including commercial applications, and to alter it and redistribute it

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

18 * freely, subject to the following restrictions:

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

19 *

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

20 * o The origin of this software must not be misrepresented; you must not

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

21 * claim that you wrote the original software. If you use this software

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

22 * in a product, an acknowledgment in the product documentation would be

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

23 * appreciated but is not required.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

24 * o Altered source versions must be plainly marked as such, and must not

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

25 * be misrepresented as being the original software.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

26 * o This notice may not be removed or altered from any source

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

27 * distribution.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

28 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

29

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

30 /*

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

31 * Modified by Sean Kelly for use with the D Runtime Project

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

32 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

33

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

34 module rt.aaA;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

35

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

36 private

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

37 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

38 import stdc.stdarg;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

39 import stdc.string;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

40

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

41 enum BlkAttr : uint

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

42 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

43 FINALIZE = 0b0000_0001,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

44 NO_SCAN = 0b0000_0010,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

45 NO_MOVE = 0b0000_0100,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

46 ALL_BITS = 0b1111_1111

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

47 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

48

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

49 extern (C) void* gc_malloc( size_t sz, uint ba = 0 );

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

50 extern (C) void* gc_calloc( size_t sz, uint ba = 0 );

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

51 extern (C) void gc_free( void* p );

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

52 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

53

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

54 // Auto-rehash and pre-allocate - Dave Fladebo

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

55

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

56 static size_t[] prime_list = [

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

57 97UL, 389UL,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

58 1_543UL, 6_151UL,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

59 24_593UL, 98_317UL,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

60 393_241UL, 1_572_869UL,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

61 6_291_469UL, 25_165_843UL,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

62 100_663_319UL, 402_653_189UL,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

63 1_610_612_741UL, 4_294_967_291UL,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

64 // 8_589_934_513UL, 17_179_869_143UL

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

65 ];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

66

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

67 /* This is the type of the return value for dynamic arrays.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

68 * It should be a type that is returned in registers.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

69 * Although DMD will return types of Array in registers,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

70 * gcc will not, so we instead use a 'long'.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

71 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

72 alias long ArrayRet_t;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

73

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

74 struct Array

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

75 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

76 size_t length;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

77 void* ptr;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

78 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

79

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

80 struct aaA

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

81 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

82 aaA *left;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

83 aaA *right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

84 hash_t hash;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

85 /* key */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

86 /* value */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

87 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

88

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

89 struct BB

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

90 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

91 aaA*[] b;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

92 size_t nodes; // total number of aaA nodes

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

93 TypeInfo keyti; // TODO: replace this with TypeInfo_AssociativeArray when available in _aaGet()

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

94 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

95

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

96 /* This is the type actually seen by the programmer, although

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

97 * it is completely opaque.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

98 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

99

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

100 struct AA

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

101 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

102 BB* a;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

103 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

104

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

105 /**********************************

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

106 * Align to next pointer boundary, so that

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

107 * GC won't be faced with misaligned pointers

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

108 * in value.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

109 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

110

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

111 size_t aligntsize(size_t tsize)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

112 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

113 // Is pointer alignment on the x64 4 bytes or 8?

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

114 return (tsize + size_t.sizeof - 1) & ~(size_t.sizeof - 1);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

115 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

116

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

117 extern (C):

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

118

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

119 /*************************************************

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

120 * Invariant for aa.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

121 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

122

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

123 /+

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

124 void _aaInvAh(aaA*[] aa)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

125 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

126 for (size_t i = 0; i < aa.length; i++)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

127 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

128 if (aa[i])

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

129 _aaInvAh_x(aa[i]);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

130 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

131 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

132

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

133 private int _aaCmpAh_x(aaA *e1, aaA *e2)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

134 { int c;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

135

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

136 c = e1.hash - e2.hash;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

137 if (c == 0)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

138 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

139 c = e1.key.length - e2.key.length;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

140 if (c == 0)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

141 c = memcmp((char *)e1.key, (char *)e2.key, e1.key.length);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

142 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

143 return c;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

144 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

145

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

146 private void _aaInvAh_x(aaA *e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

147 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

148 hash_t key_hash;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

149 aaA *e1;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

150 aaA *e2;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

151

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

152 key_hash = getHash(e.key);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

153 assert(key_hash == e.hash);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

154

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

155 while (1)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

156 { int c;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

157

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

158 e1 = e.left;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

159 if (e1)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

160 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

161 _aaInvAh_x(e1); // ordinary recursion

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

162 do

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

163 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

164 c = _aaCmpAh_x(e1, e);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

165 assert(c < 0);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

166 e1 = e1.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

167 } while (e1 != null);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

168 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

169

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

170 e2 = e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

171 if (e2)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

172 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

173 do

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

174 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

175 c = _aaCmpAh_x(e, e2);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

176 assert(c < 0);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

177 e2 = e2.left;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

178 } while (e2 != null);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

179 e = e.right; // tail recursion

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

180 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

181 else

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

182 break;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

183 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

184 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

185 +/

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

186

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

187 /****************************************************

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

188 * Determine number of entries in associative array.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

189 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

190

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

191 size_t _aaLen(AA aa)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

192 in

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

193 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

194 //printf("_aaLen()+\n");

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

195 //_aaInv(aa);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

196 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

197 out (result)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

198 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

199 size_t len = 0;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

200

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

201 void _aaLen_x(aaA* ex)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

202 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

203 auto e = ex;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

204 len++;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

205

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

206 while (1)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

207 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

208 if (e.right)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

209 _aaLen_x(e.right);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

210 e = e.left;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

211 if (!e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

212 break;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

213 len++;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

214 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

215 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

216

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

217 if (aa.a)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

218 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

219 foreach (e; aa.a.b)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

220 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

221 if (e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

222 _aaLen_x(e);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

223 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

224 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

225 assert(len == result);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

226

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

227 //printf("_aaLen()-\n");

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

228 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

229 body

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

230 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

231 return aa.a ? aa.a.nodes : 0;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

232 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

233

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

234

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

235 /*************************************************

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

236 * Get pointer to value in associative array indexed by key.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

237 * Add entry for key if it is not already there.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

238 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

239

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

240 void* _aaGet(AA* aa, TypeInfo keyti, size_t valuesize, ...)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

241 in

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

242 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

243 assert(aa);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

244 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

245 out (result)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

246 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

247 assert(result);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

248 assert(aa.a);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

249 assert(aa.a.b.length);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

250 //assert(_aaInAh(*aa.a, key));

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

251 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

252 body

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

253 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

254 auto pkey = cast(void *)(&valuesize + 1);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

255 size_t i;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

256 aaA *e;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

257 auto keysize = aligntsize(keyti.tsize());

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

258

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

259 if (!aa.a)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

260 aa.a = new BB();

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

261 aa.a.keyti = keyti;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

262

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

263 if (!aa.a.b.length)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

264 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

265 alias aaA *pa;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

266 auto len = prime_list[0];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

267

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

268 aa.a.b = new pa[len];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

269 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

270

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

271 auto key_hash = keyti.getHash(pkey);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

272 //printf("hash = %d\n", key_hash);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

273 i = key_hash % aa.a.b.length;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

274 auto pe = &aa.a.b[i];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

275 while ((e = *pe) !is null)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

276 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

277 if (key_hash == e.hash)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

278 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

279 auto c = keyti.compare(pkey, e + 1);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

280 if (c == 0)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

281 goto Lret;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

282 pe = (c < 0) ? &e.left : &e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

283 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

284 else

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

285 pe = (key_hash < e.hash) ? &e.left : &e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

286 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

287

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

288 // Not found, create new elem

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

289 //printf("create new one\n");

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

290 size_t size = aaA.sizeof + keysize + valuesize;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

291 e = cast(aaA *) gc_calloc(size);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

292 memcpy(e + 1, pkey, keysize);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

293 e.hash = key_hash;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

294 *pe = e;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

295

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

296 auto nodes = ++aa.a.nodes;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

297 //printf("length = %d, nodes = %d\n", (*aa.a).length, nodes);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

298 if (nodes > aa.a.b.length * 4)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

299 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

300 _aaRehash(aa,keyti);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

301 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

302

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

303 Lret:

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

304 return cast(void *)(e + 1) + keysize;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

305 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

306

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

307

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

308 /*************************************************

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

309 * Get pointer to value in associative array indexed by key.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

310 * Returns null if it is not already there.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

311 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

312

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

313 void* _aaGetRvalue(AA aa, TypeInfo keyti, size_t valuesize, ...)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

314 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

315 //printf("_aaGetRvalue(valuesize = %u)\n", valuesize);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

316 if (!aa.a)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

317 return null;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

318

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

319 auto pkey = cast(void *)(&valuesize + 1);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

320 auto keysize = aligntsize(keyti.tsize());

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

321 auto len = aa.a.b.length;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

322

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

323 if (len)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

324 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

325 auto key_hash = keyti.getHash(pkey);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

326 //printf("hash = %d\n", key_hash);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

327 size_t i = key_hash % len;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

328 auto e = aa.a.b[i];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

329 while (e !is null)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

330 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

331 if (key_hash == e.hash)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

332 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

333 auto c = keyti.compare(pkey, e + 1);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

334 if (c == 0)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

335 return cast(void *)(e + 1) + keysize;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

336 e = (c < 0) ? e.left : e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

337 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

338 else

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

339 e = (key_hash < e.hash) ? e.left : e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

340 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

341 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

342 return null; // not found, caller will throw exception

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

343 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

344

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

345

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

346 /*************************************************

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

347 * Determine if key is in aa.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

348 * Returns:

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

349 * null not in aa

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

350 * !=null in aa, return pointer to value

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

351 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

352

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

353 void* _aaIn(AA aa, TypeInfo keyti, ...)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

354 in

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

355 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

356 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

357 out (result)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

358 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

359 //assert(result == 0 || result == 1);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

360 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

361 body

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

362 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

363 if (aa.a)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

364 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

365 auto pkey = cast(void *)(&keyti + 1);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

366

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

367 //printf("_aaIn(), .length = %d, .ptr = %x\n", aa.a.length, cast(uint)aa.a.ptr);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

368 auto len = aa.a.b.length;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

369

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

370 if (len)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

371 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

372 auto key_hash = keyti.getHash(pkey);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

373 //printf("hash = %d\n", key_hash);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

374 size_t i = key_hash % len;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

375 auto e = aa.a.b[i];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

376 while (e !is null)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

377 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

378 if (key_hash == e.hash)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

379 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

380 auto c = keyti.compare(pkey, e + 1);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

381 if (c == 0)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

382 return cast(void *)(e + 1) + aligntsize(keyti.tsize());

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

383 e = (c < 0) ? e.left : e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

384 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

385 else

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

386 e = (key_hash < e.hash) ? e.left : e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

387 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

388 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

389 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

390

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

391 // Not found

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

392 return null;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

393 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

394

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

395 /*************************************************

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

396 * Delete key entry in aa[].

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

397 * If key is not in aa[], do nothing.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

398 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

399

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

400 void _aaDel(AA aa, TypeInfo keyti, ...)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

401 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

402 auto pkey = cast(void *)(&keyti + 1);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

403 aaA *e;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

404

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

405 if (aa.a && aa.a.b.length)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

406 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

407 auto key_hash = keyti.getHash(pkey);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

408 //printf("hash = %d\n", key_hash);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

409 size_t i = key_hash % aa.a.b.length;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

410 auto pe = &aa.a.b[i];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

411 while ((e = *pe) !is null) // null means not found

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

412 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

413 if (key_hash == e.hash)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

414 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

415 auto c = keyti.compare(pkey, e + 1);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

416 if (c == 0)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

417 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

418 if (!e.left && !e.right)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

419 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

420 *pe = null;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

421 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

422 else if (e.left && !e.right)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

423 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

424 *pe = e.left;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

425 e.left = null;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

426 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

427 else if (!e.left && e.right)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

428 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

429 *pe = e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

430 e.right = null;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

431 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

432 else

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

433 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

434 *pe = e.left;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

435 e.left = null;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

436 do

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

437 pe = &(*pe).right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

438 while (*pe);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

439 *pe = e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

440 e.right = null;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

441 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

442

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

443 aa.a.nodes--;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

444 gc_free(e);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

445 break;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

446 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

447 pe = (c < 0) ? &e.left : &e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

448 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

449 else

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

450 pe = (key_hash < e.hash) ? &e.left : &e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

451 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

452 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

453 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

454

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

455

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

456 /********************************************

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

457 * Produce array of values from aa.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

458 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

459

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

460 ArrayRet_t _aaValues(AA aa, size_t keysize, size_t valuesize)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

461 in

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

462 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

463 assert(keysize == aligntsize(keysize));

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

464 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

465 body

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

466 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

467 size_t resi;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

468 Array a;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

469

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

470 void _aaValues_x(aaA* e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

471 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

472 do

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

473 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

474 memcpy(a.ptr + resi * valuesize,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

475 cast(byte*)e + aaA.sizeof + keysize,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

476 valuesize);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

477 resi++;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

478 if (e.left)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

479 { if (!e.right)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

480 { e = e.left;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

481 continue;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

482 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

483 _aaValues_x(e.left);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

484 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

485 e = e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

486 } while (e !is null);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

487 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

488

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

489 if (aa.a)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

490 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

491 a.length = _aaLen(aa);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

492 a.ptr = cast(byte*) gc_malloc(a.length * valuesize,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

493 valuesize < (void*).sizeof ? BlkAttr.NO_SCAN : 0);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

494 resi = 0;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

495 foreach (e; aa.a.b)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

496 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

497 if (e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

498 _aaValues_x(e);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

499 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

500 assert(resi == a.length);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

501 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

502 return *cast(ArrayRet_t*)(&a);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

503 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

504

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

505

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

506 /********************************************

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

507 * Rehash an array.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

508 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

509

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

510 void* _aaRehash(AA* paa, TypeInfo keyti)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

511 in

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

512 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

513 //_aaInvAh(paa);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

514 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

515 out (result)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

516 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

517 //_aaInvAh(result);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

518 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

519 body

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

520 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

521 BB newb;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

522

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

523 void _aaRehash_x(aaA* olde)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

524 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

525 while (1)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

526 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

527 auto left = olde.left;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

528 auto right = olde.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

529 olde.left = null;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

530 olde.right = null;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

531

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

532 aaA *e;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

533

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

534 //printf("rehash %p\n", olde);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

535 auto key_hash = olde.hash;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

536 size_t i = key_hash % newb.b.length;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

537 auto pe = &newb.b[i];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

538 while ((e = *pe) !is null)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

539 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

540 //printf("\te = %p, e.left = %p, e.right = %p\n", e, e.left, e.right);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

541 assert(e.left != e);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

542 assert(e.right != e);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

543 if (key_hash == e.hash)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

544 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

545 auto c = keyti.compare(olde + 1, e + 1);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

546 assert(c != 0);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

547 pe = (c < 0) ? &e.left : &e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

548 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

549 else

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

550 pe = (key_hash < e.hash) ? &e.left : &e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

551 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

552 *pe = olde;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

553

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

554 if (right)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

555 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

556 if (!left)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

557 { olde = right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

558 continue;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

559 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

560 _aaRehash_x(right);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

561 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

562 if (!left)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

563 break;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

564 olde = left;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

565 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

566 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

567

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

568 //printf("Rehash\n");

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

569 if (paa.a)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

570 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

571 auto aa = paa.a;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

572 auto len = _aaLen(*paa);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

573 if (len)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

574 { size_t i;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

575

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

576 for (i = 0; i < prime_list.length - 1; i++)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

577 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

578 if (len <= prime_list[i])

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

579 break;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

580 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

581 len = prime_list[i];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

582 newb.b = new aaA*[len];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

583

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

584 foreach (e; aa.b)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

585 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

586 if (e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

587 _aaRehash_x(e);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

588 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

589

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

590 newb.nodes = aa.nodes;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

591 newb.keyti = aa.keyti;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

592 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

593

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

594 *paa.a = newb;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

595 _aaBalance(paa);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

596 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

597 return (*paa).a;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

598 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

599

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

600 /********************************************

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

601 * Balance an array.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

602 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

603

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

604 void _aaBalance(AA* paa)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

605 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

606 //printf("_aaBalance()\n");

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

607 if (paa.a)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

608 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

609 aaA*[16] tmp;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

610 aaA*[] array = tmp;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

611 auto aa = paa.a;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

612 foreach (j, e; aa.b)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

613 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

614 /* Temporarily store contents of bucket in array[]

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

615 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

616 size_t k = 0;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

617 void addToArray(aaA* e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

618 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

619 while (e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

620 { addToArray(e.left);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

621 if (k == array.length)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

622 array.length = array.length * 2;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

623 array[k++] = e;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

624 e = e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

625 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

626 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

627 addToArray(e);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

628 /* The contents of the bucket are now sorted into array[].

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

629 * Rebuild the tree.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

630 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

631 void buildTree(aaA** p, size_t x1, size_t x2)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

632 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

633 if (x1 >= x2)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

634 *p = null;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

635 else

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

636 { auto mid = (x1 + x2) >> 1;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

637 *p = array[mid];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

638 buildTree(&(*p).left, x1, mid);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

639 buildTree(&(*p).right, mid + 1, x2);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

640 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

641 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

642 auto p = &aa.b[j];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

643 buildTree(p, 0, k);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

644 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

645 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

646 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

647 /********************************************

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

648 * Produce array of N byte keys from aa.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

649 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

650

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

651 ArrayRet_t _aaKeys(AA aa, size_t keysize)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

652 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

653 byte[] res;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

654 size_t resi;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

655

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

656 void _aaKeys_x(aaA* e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

657 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

658 do

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

659 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

660 memcpy(&res[resi * keysize], cast(byte*)(e + 1), keysize);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

661 resi++;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

662 if (e.left)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

663 { if (!e.right)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

664 { e = e.left;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

665 continue;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

666 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

667 _aaKeys_x(e.left);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

668 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

669 e = e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

670 } while (e !is null);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

671 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

672

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

673 auto len = _aaLen(aa);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

674 if (!len)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

675 return 0;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

676 res = (cast(byte*) gc_malloc(len * keysize,

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

677 !(aa.a.keyti.flags() & 1) ? BlkAttr.NO_SCAN : 0))[0 .. len * keysize];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

678 resi = 0;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

679 foreach (e; aa.a.b)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

680 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

681 if (e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

682 _aaKeys_x(e);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

683 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

684 assert(resi == len);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

685

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

686 Array a;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

687 a.length = len;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

688 a.ptr = res.ptr;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

689 return *cast(ArrayRet_t*)(&a);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

690 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

691

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

692

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

693 /**********************************************

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

694 * 'apply' for associative arrays - to support foreach

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

695 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

696

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

697 // dg is D, but _aaApply() is C

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

698 extern (D) typedef int delegate(void *) dg_t;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

699

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

700 int _aaApply(AA aa, size_t keysize, dg_t dg)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

701 in

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

702 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

703 assert(aligntsize(keysize) == keysize);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

704 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

705 body

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

706 { int result;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

707

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

708 //printf("_aaApply(aa = x%llx, keysize = %d, dg = x%llx)\n", aa.a, keysize, dg);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

709

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

710 int treewalker(aaA* e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

711 { int result;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

712

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

713 do

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

714 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

715 //printf("treewalker(e = %p, dg = x%llx)\n", e, dg);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

716 result = dg(cast(void *)(e + 1) + keysize);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

717 if (result)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

718 break;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

719 if (e.right)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

720 { if (!e.left)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

721 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

722 e = e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

723 continue;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

724 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

725 result = treewalker(e.right);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

726 if (result)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

727 break;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

728 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

729 e = e.left;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

730 } while (e);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

731

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

732 return result;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

733 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

734

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

735 if (aa.a)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

736 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

737 foreach (e; aa.a.b)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

738 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

739 if (e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

740 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

741 result = treewalker(e);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

742 if (result)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

743 break;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

744 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

745 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

746 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

747 return result;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

748 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

749

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

750 // dg is D, but _aaApply2() is C

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

751 extern (D) typedef int delegate(void *, void *) dg2_t;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

752

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

753 int _aaApply2(AA aa, size_t keysize, dg2_t dg)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

754 in

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

755 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

756 assert(aligntsize(keysize) == keysize);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

757 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

758 body

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

759 { int result;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

760

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

761 //printf("_aaApply(aa = x%llx, keysize = %d, dg = x%llx)\n", aa.a, keysize, dg);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

762

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

763 int treewalker(aaA* e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

764 { int result;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

765

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

766 do

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

767 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

768 //printf("treewalker(e = %p, dg = x%llx)\n", e, dg);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

769 result = dg(cast(void *)(e + 1), cast(void *)(e + 1) + keysize);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

770 if (result)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

771 break;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

772 if (e.right)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

773 { if (!e.left)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

774 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

775 e = e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

776 continue;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

777 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

778 result = treewalker(e.right);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

779 if (result)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

780 break;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

781 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

782 e = e.left;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

783 } while (e);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

784

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

785 return result;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

786 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

787

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

788 if (aa.a)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

789 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

790 foreach (e; aa.a.b)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

791 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

792 if (e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

793 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

794 result = treewalker(e);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

795 if (result)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

796 break;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

797 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

798 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

799 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

800 return result;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

801 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

802

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

803

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

804 /***********************************

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

805 * Construct an associative array of type ti from

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

806 * length pairs of key/value pairs.

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

807 */

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

808

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

809 extern (C)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

810 BB* _d_assocarrayliteralT(TypeInfo_AssociativeArray ti, size_t length, ...)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

811 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

812 auto valuesize = ti.next.tsize(); // value size

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

813 auto keyti = ti.key;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

814 auto keysize = keyti.tsize(); // key size

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

815 BB* result;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

816

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

817 //printf("_d_assocarrayliteralT(keysize = %d, valuesize = %d, length = %d)\n", keysize, valuesize, length);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

818 //printf("tivalue = %.*s\n", ti.next.classinfo.name);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

819 if (length == 0 || valuesize == 0 || keysize == 0)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

820 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

821 ;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

822 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

823 else

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

824 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

825 va_list q;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

826 va_start!(size_t)(q, length);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

827

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

828 result = new BB();

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

829 result.keyti = keyti;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

830 size_t i;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

831

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

832 for (i = 0; i < prime_list.length - 1; i++)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

833 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

834 if (length <= prime_list[i])

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

835 break;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

836 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

837 auto len = prime_list[i];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

838 result.b = new aaA*[len];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

839

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

840 size_t keystacksize = (keysize + int.sizeof - 1) & ~(int.sizeof - 1);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

841 size_t valuestacksize = (valuesize + int.sizeof - 1) & ~(int.sizeof - 1);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

842

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

843 size_t keytsize = aligntsize(keysize);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

844

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

845 for (size_t j = 0; j < length; j++)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

846 { void* pkey = q;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

847 q += keystacksize;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

848 void* pvalue = q;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

849 q += valuestacksize;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

850 aaA* e;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

851

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

852 auto key_hash = keyti.getHash(pkey);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

853 //printf("hash = %d\n", key_hash);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

854 i = key_hash % len;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

855 auto pe = &result.b[i];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

856 while (1)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

857 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

858 e = *pe;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

859 if (!e)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

860 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

861 // Not found, create new elem

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

862 //printf("create new one\n");

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

863 e = cast(aaA *) cast(void*) new void[aaA.sizeof + keytsize + valuesize];

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

864 memcpy(e + 1, pkey, keysize);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

865 e.hash = key_hash;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

866 *pe = e;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

867 result.nodes++;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

868 break;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

869 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

870 if (key_hash == e.hash)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

871 {

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

872 auto c = keyti.compare(pkey, e + 1);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

873 if (c == 0)

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

874 break;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

875 pe = (c < 0) ? &e.left : &e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

876 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

877 else

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

878 pe = (key_hash < e.hash) ? &e.left : &e.right;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

879 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

880 memcpy(cast(void *)(e + 1) + keytsize, pvalue, valuesize);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

881 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

882

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

883 va_end(q);

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

884 }

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

885 return result;

d3eb054172f9 Added copy of druntime from DMD 2.020 modified for LDC.

Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>

parents:

diff changeset

886 }

Mercurial > projects > ldc

annotate druntime/src/compiler/dmd/aaA.d @ 759:d3eb054172f9