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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [libgo/] [runtime/] [go-append.c] - Rev 801

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

/* go-append.c -- the go builtin append function.
 
   Copyright 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 "go-type.h"
#include "go-panic.h"
#include "array.h"
#include "runtime.h"
#include "arch.h"
#include "malloc.h"
 
/* We should be OK if we don't split the stack here, since the only
   libc functions we call are memcpy and memmove.  If we don't do
   this, we will always split the stack, because of memcpy and
   memmove.  */
extern struct __go_open_array
__go_append (struct __go_open_array, void *, uintptr_t, uintptr_t)
  __attribute__ ((no_split_stack));
 
struct __go_open_array
__go_append (struct __go_open_array a, void *bvalues, uintptr_t bcount,
	     uintptr_t element_size)
{
  uintptr_t ucount;
  int count;
 
  if (bvalues == NULL || bcount == 0)
    return a;
 
  ucount = (uintptr_t) a.__count + bcount;
  count = (int) ucount;
  if ((uintptr_t) count != ucount || count <= a.__count)
    runtime_panicstring ("append: slice overflow");
 
  if (count > a.__capacity)
    {
      int m;
      void *n;
 
      m = a.__capacity;
      if (m == 0)
	m = (int) bcount;
      else
	{
	  do
	    {
	      if (a.__count < 1024)
		m += m;
	      else
		m += m / 4;
	    }
	  while (m < count);
	}
 
      n = __go_alloc (m * element_size);
      __builtin_memcpy (n, a.__values, a.__count * element_size);
 
      a.__values = n;
      a.__capacity = m;
    }
 
  __builtin_memmove ((char *) a.__values + a.__count * element_size,
		     bvalues, bcount * element_size);
  a.__count = count;
  return a;
}
 

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

powered by: WebSVN 2.1.0

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