OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [libgo/] [runtime/] [go-new-map.c] - Blame information for rev 772

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 747 jeremybenn
/* go-new-map.c -- allocate a new map.
2
 
3
   Copyright 2009 The Go Authors. All rights reserved.
4
   Use of this source code is governed by a BSD-style
5
   license that can be found in the LICENSE file.  */
6
 
7
#include "runtime.h"
8
#include "go-alloc.h"
9
#include "map.h"
10
 
11
/* List of prime numbers, copied from libstdc++/src/hashtable.c.  */
12
 
13
static const unsigned long prime_list[] = /* 256 + 1 or 256 + 48 + 1 */
14
{
15
  2ul, 3ul, 5ul, 7ul, 11ul, 13ul, 17ul, 19ul, 23ul, 29ul, 31ul,
16
  37ul, 41ul, 43ul, 47ul, 53ul, 59ul, 61ul, 67ul, 71ul, 73ul, 79ul,
17
  83ul, 89ul, 97ul, 103ul, 109ul, 113ul, 127ul, 137ul, 139ul, 149ul,
18
  157ul, 167ul, 179ul, 193ul, 199ul, 211ul, 227ul, 241ul, 257ul,
19
  277ul, 293ul, 313ul, 337ul, 359ul, 383ul, 409ul, 439ul, 467ul,
20
  503ul, 541ul, 577ul, 619ul, 661ul, 709ul, 761ul, 823ul, 887ul,
21
  953ul, 1031ul, 1109ul, 1193ul, 1289ul, 1381ul, 1493ul, 1613ul,
22
  1741ul, 1879ul, 2029ul, 2179ul, 2357ul, 2549ul, 2753ul, 2971ul,
23
  3209ul, 3469ul, 3739ul, 4027ul, 4349ul, 4703ul, 5087ul, 5503ul,
24
  5953ul, 6427ul, 6949ul, 7517ul, 8123ul, 8783ul, 9497ul, 10273ul,
25
  11113ul, 12011ul, 12983ul, 14033ul, 15173ul, 16411ul, 17749ul,
26
  19183ul, 20753ul, 22447ul, 24281ul, 26267ul, 28411ul, 30727ul,
27
  33223ul, 35933ul, 38873ul, 42043ul, 45481ul, 49201ul, 53201ul,
28
  57557ul, 62233ul, 67307ul, 72817ul, 78779ul, 85229ul, 92203ul,
29
  99733ul, 107897ul, 116731ul, 126271ul, 136607ul, 147793ul,
30
  159871ul, 172933ul, 187091ul, 202409ul, 218971ul, 236897ul,
31
  256279ul, 277261ul, 299951ul, 324503ul, 351061ul, 379787ul,
32
  410857ul, 444487ul, 480881ul, 520241ul, 562841ul, 608903ul,
33
  658753ul, 712697ul, 771049ul, 834181ul, 902483ul, 976369ul,
34
  1056323ul, 1142821ul, 1236397ul, 1337629ul, 1447153ul, 1565659ul,
35
  1693859ul, 1832561ul, 1982627ul, 2144977ul, 2320627ul, 2510653ul,
36
  2716249ul, 2938679ul, 3179303ul, 3439651ul, 3721303ul, 4026031ul,
37
  4355707ul, 4712381ul, 5098259ul, 5515729ul, 5967347ul, 6456007ul,
38
  6984629ul, 7556579ul, 8175383ul, 8844859ul, 9569143ul, 10352717ul,
39
  11200489ul, 12117689ul, 13109983ul, 14183539ul, 15345007ul,
40
  16601593ul, 17961079ul, 19431899ul, 21023161ul, 22744717ul,
41
  24607243ul, 26622317ul, 28802401ul, 31160981ul, 33712729ul,
42
  36473443ul, 39460231ul, 42691603ul, 46187573ul, 49969847ul,
43
  54061849ul, 58488943ul, 63278561ul, 68460391ul, 74066549ul,
44
  80131819ul, 86693767ul, 93793069ul, 101473717ul, 109783337ul,
45
  118773397ul, 128499677ul, 139022417ul, 150406843ul, 162723577ul,
46
  176048909ul, 190465427ul, 206062531ul, 222936881ul, 241193053ul,
47
  260944219ul, 282312799ul, 305431229ul, 330442829ul, 357502601ul,
48
  386778277ul, 418451333ul, 452718089ul, 489790921ul, 529899637ul,
49
  573292817ul, 620239453ul, 671030513ul, 725980837ul, 785430967ul,
50
  849749479ul, 919334987ul, 994618837ul, 1076067617ul, 1164186217ul,
51
  1259520799ul, 1362662261ul, 1474249943ul, 1594975441ul, 1725587117ul,
52
  1866894511ul, 2019773507ul, 2185171673ul, 2364114217ul, 2557710269ul,
53
  2767159799ul, 2993761039ul, 3238918481ul, 3504151727ul, 3791104843ul,
54
  4101556399ul, 4294967291ul,
55
#if __SIZEOF_LONG__ >= 8
56
  6442450933ul, 8589934583ul, 12884901857ul, 17179869143ul,
57
  25769803693ul, 34359738337ul, 51539607367ul, 68719476731ul,
58
  103079215087ul, 137438953447ul, 206158430123ul, 274877906899ul,
59
  412316860387ul, 549755813881ul, 824633720731ul, 1099511627689ul,
60
  1649267441579ul, 2199023255531ul, 3298534883309ul, 4398046511093ul,
61
  6597069766607ul, 8796093022151ul, 13194139533241ul, 17592186044399ul,
62
  26388279066581ul, 35184372088777ul, 52776558133177ul, 70368744177643ul,
63
  105553116266399ul, 140737488355213ul, 211106232532861ul, 281474976710597ul,
64
  562949953421231ul, 1125899906842597ul, 2251799813685119ul,
65
  4503599627370449ul, 9007199254740881ul, 18014398509481951ul,
66
  36028797018963913ul, 72057594037927931ul, 144115188075855859ul,
67
  288230376151711717ul, 576460752303423433ul,
68
  1152921504606846883ul, 2305843009213693951ul,
69
  4611686018427387847ul, 9223372036854775783ul,
70
  18446744073709551557ul
71
#endif
72
};
73
 
74
/* Return the next number from PRIME_LIST >= N.  */
75
 
76
uintptr_t
77
__go_map_next_prime (uintptr_t n)
78
{
79
  size_t low;
80
  size_t high;
81
 
82
  low = 0;
83
  high = sizeof prime_list / sizeof prime_list[0];
84
  while (low < high)
85
    {
86
      size_t mid;
87
 
88
      mid = (low + high) / 2;
89
 
90
      /* Here LOW <= MID < HIGH.  */
91
 
92
      if (prime_list[mid] < n)
93
        high = mid;
94
      else if (prime_list[mid] > n)
95
        low = mid + 1;
96
      else
97
        return n;
98
    }
99
  if (low >= sizeof prime_list / sizeof prime_list[0])
100
    return n;
101
  return prime_list[low];
102
}
103
 
104
/* Allocate a new map.  */
105
 
106
struct __go_map *
107
__go_new_map (const struct __go_map_descriptor *descriptor, uintptr_t entries)
108
{
109
  int ientries;
110
  struct __go_map *ret;
111
 
112
  ientries = (int) entries;
113
  if (ientries < 0 || (uintptr_t) ientries != entries)
114
    runtime_panicstring ("map size out of range");
115
 
116
  if (entries == 0)
117
    entries = 5;
118
  else
119
    entries = __go_map_next_prime (entries);
120
  ret = (struct __go_map *) __go_alloc (sizeof (struct __go_map));
121
  ret->__descriptor = descriptor;
122
  ret->__element_count = 0;
123
  ret->__bucket_count = entries;
124
  ret->__buckets = (void **) __go_alloc (entries * sizeof (void *));
125
  __builtin_memset (ret->__buckets, 0, entries * sizeof (void *));
126
  return ret;
127
}
128
 
129
/* Allocate a new map when the argument to make is a large type.  */
130
 
131
struct __go_map *
132
__go_new_map_big (const struct __go_map_descriptor *descriptor,
133
                  uint64_t entries)
134
{
135
  uintptr_t sentries;
136
 
137
  sentries = (uintptr_t) entries;
138
  if ((uint64_t) sentries != entries)
139
    runtime_panicstring ("map size out of range");
140
  return __go_new_map (descriptor, sentries);
141
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.