cutil/tessarray.cpp

Go to the documentation of this file.

#include "tessarray.h"
#include "callcpp.h"
#include "freelist.h"

#include <stdio.h>
#include <string.h>
#ifdef __MSW32__
#include <process.h>
#endif
#include <ctype.h>
#if MAC_OR_DOS
#include <stdlib.h>
#endif

ARRAY array_insert(ARRAY array, int index, void *value) { 
  int x;

  array = array_push (array, NULL);
  for (x = array_count (array) - 1; x > index; x--)
    array_value (array, x) = array_value (array, x - 1);
  array_value (array, index) = value;
  return (array);
}


ARRAY array_new(int num) { 
  ARRAY temp;
  int x;

  if (num == 0)
    num = DEFAULT_SIZE;
  temp = (ARRAY) memalloc ((num - 2) * sizeof (char *) +
    sizeof (struct array_record));
  if (!temp) {
    cprintf ("error: Out of memory in array_new\n");
    exit (1);                    //?err_exit ();
  }
  array_count (temp) = 0;
  array_limit (temp) = num;
  for (x = 0; x < num; x++)
    array_value (temp, x) = (char *) 0;
  return (temp);
}


ARRAY array_push(ARRAY array, void *value) { 
  if (array_count (array) == array_limit (array)) {
    array = (ARRAY) memrealloc (array, (array_limit (array) * 2 - 2) *
      sizeof (char *) +
      sizeof (struct array_record),
      (array_limit (array) -
      2) * sizeof (char *) +
      sizeof (struct array_record));
    if (!array) {
      cprintf ("error: Out of memory in array_push\n");
      exit (1);                  //?err_exit ();
    }
    array_limit (array) *= 2;
  }
  array_count (array)++;
  array_top (array) = value;
  return (array);
}

---