comparison src/alloc.c @ 590:1a6483439acc

*** empty log message ***

589:03fd51103bc3

/* Storage allocation and gc for GNU Emacs Lisp interpreter.
   Copyright (C) 1985, 1986, 1988 Free Software Foundation, Inc.

This file is part of GNU Emacs.

GNU Emacs is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by

     long *block;
     int size;
{
  register long *val;

  val = (long *) realloc (block, size);

  if (!val && size) memory_full ();
  return val;
}


590:1a6483439acc

/* Storage allocation and gc for GNU Emacs Lisp interpreter.
   Copyright (C) 1985, 1986, 1988, 1992 Free Software Foundation, Inc.

This file is part of GNU Emacs.

GNU Emacs is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by

     long *block;
     int size;
{
  register long *val;

  /* We must call malloc explicitly when BLOCK is 0, since some
     reallocs don't do this.  */
  if (! block)
    val = (long *) malloc (size);
  ese
    val = (long *) realloc (block, size);

  if (!val && size) memory_full ();
  return val;
}