[net.emacs] Gnu Bugfix

rms@prep.AI.MIT.EDU (02/14/86)

From: rms@prep.AI.MIT.EDU (Richard M. Stallman)
Date: Wednesday, 12 February 1986 16:52:20 EST
From: Donald.Stone@a.sei.cmu.edu
To: rms%mit-oz@xx.lcs.mit.edu
Subject: Gnu Bugfix

Hi,

   Regarding the bug in Gnu on the Apollo
    (running out of Pure space)

   Pure is being allocated at A10000

   So in purecopy (and some other places, too) the test
[purecopy and mark_object in alloc.c, CHECK_IMPURE in lisp.h]

  if (XINT (obj) < (int) ((char *) pure + PURESIZE)
      && XINT (obj) >= (int) pure)

   always fails because XINT is sign extending the address.

   When I changed the XINTs to XUINTs, things worked.

   You'd know better than I would whether that fix will break 
   anything else.

        Don Stone (ds@a.sei.cmu.edu)