gcc/libgo/runtime/go-reflect-map.c
Ian Lance Taylor 7a9389330e Add Go frontend, libgo library, and Go testsuite.
gcc/:
	* gcc.c (default_compilers): Add entry for ".go".
	* common.opt: Add -static-libgo as a driver option.
	* doc/install.texi (Configuration): Mention libgo as an option for
	--enable-shared.  Mention go as an option for --enable-languages.
	* doc/invoke.texi (Overall Options): Mention .go as a file name
	suffix.  Mention go as a -x option.
	* doc/frontends.texi (G++ and GCC): Mention Go as a supported
	language.
	* doc/sourcebuild.texi (Top Level): Mention libgo.
	* doc/standards.texi (Standards): Add section on Go language.
	Move references for other languages into their own section.
	* doc/contrib.texi (Contributors): Mention that I contributed the
	Go frontend.
gcc/testsuite/:
	* lib/go.exp: New file.
	* lib/go-dg.exp: New file.
	* lib/go-torture.exp: New file.
	* lib/target-supports.exp (check_compile): Match // Go.

From-SVN: r167407
2010-12-03 04:34:57 +00:00

140 lines
3.5 KiB
C

/* go-reflect-map.c -- map reflection support for Go.
Copyright 2009, 2010 The Go Authors. All rights reserved.
Use of this source code is governed by a BSD-style
license that can be found in the LICENSE file. */
#include <stdlib.h>
#include <stdint.h>
#include "go-alloc.h"
#include "go-type.h"
#include "map.h"
/* This file implements support for reflection on maps. These
functions are called from reflect/value.go. */
extern _Bool mapaccess (unsigned char *, unsigned char *, unsigned char *)
asm ("libgo_reflect.reflect.mapaccess");
_Bool
mapaccess (unsigned char *m, unsigned char *key, unsigned char *val)
{
struct __go_map *map = (struct __go_map *) m;
void *p;
const struct __go_type_descriptor *val_descriptor;
p = __go_map_index (map, key, 0);
if (p == NULL)
return 0;
else
{
val_descriptor = map->__descriptor->__map_descriptor->__val_type;
__builtin_memcpy (val, p, val_descriptor->__size);
return 1;
}
}
extern void mapassign (unsigned char *, unsigned char *, unsigned char *)
asm ("libgo_reflect.reflect.mapassign");
void
mapassign (unsigned char *m, unsigned char *key, unsigned char *val)
{
struct __go_map *map = (struct __go_map *) m;
if (val == NULL)
__go_map_delete (map, key);
else
{
void *p;
const struct __go_type_descriptor *val_descriptor;
p = __go_map_index (map, key, 1);
val_descriptor = map->__descriptor->__map_descriptor->__val_type;
__builtin_memcpy (p, val, val_descriptor->__size);
}
}
extern int32_t maplen (unsigned char *)
asm ("libgo_reflect.reflect.maplen");
int32_t
maplen (unsigned char *m __attribute__ ((unused)))
{
struct __go_map *map = (struct __go_map *) m;
return (int32_t) map->__element_count;
}
extern unsigned char *mapiterinit (unsigned char *)
asm ("libgo_reflect.reflect.mapiterinit");
unsigned char *
mapiterinit (unsigned char *m)
{
struct __go_hash_iter *it;
it = __go_alloc (sizeof (struct __go_hash_iter));
__go_mapiterinit ((struct __go_map *) m, it);
return (unsigned char *) it;
}
extern void mapiternext (unsigned char *)
asm ("libgo_reflect.reflect.mapiternext");
void
mapiternext (unsigned char *it)
{
__go_mapiternext ((struct __go_hash_iter *) it);
}
extern _Bool mapiterkey (unsigned char *, unsigned char *)
asm ("libgo_reflect.reflect.mapiterkey");
_Bool
mapiterkey (unsigned char *ita, unsigned char *key)
{
struct __go_hash_iter *it = (struct __go_hash_iter *) ita;
if (it->entry == NULL)
return 0;
else
{
__go_mapiter1 (it, key);
return 1;
}
}
/* Make a new map. We have to build our own map descriptor. */
extern unsigned char *makemap (const struct __go_map_type *)
asm ("libgo_reflect.reflect.makemap");
unsigned char *
makemap (const struct __go_map_type *t)
{
struct __go_map_descriptor *md;
unsigned int o;
const struct __go_type_descriptor *kt;
const struct __go_type_descriptor *vt;
/* FIXME: Reference count. */
md = (struct __go_map_descriptor *) __go_alloc (sizeof (*md));
md->__map_descriptor = t;
o = sizeof (void *);
kt = t->__key_type;
o = (o + kt->__field_align - 1) & ~ (kt->__field_align - 1);
md->__key_offset = o;
o += kt->__size;
vt = t->__val_type;
o = (o + vt->__field_align - 1) & ~ (vt->__field_align - 1);
md->__val_offset = o;
o += vt->__size;
o = (o + sizeof (void *) - 1) & ~ (sizeof (void *) - 1);
o = (o + kt->__field_align - 1) & ~ (kt->__field_align - 1);
o = (o + vt->__field_align - 1) & ~ (vt->__field_align - 1);
md->__entry_size = o;
return (unsigned char *) __go_new_map (md, 0);
}