From xemacs-m  Mon Mar  3 15:15:23 1997
Received: from altair.xemacs.org (steve@xemacs.miranova.com [206.190.83.19])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id PAA21626
	for <xemacs-beta@xemacs.org>; Mon, 3 Mar 1997 15:15:22 -0600 (CST)
Received: (from steve@localhost)
	by altair.xemacs.org (8.8.5/8.8.5) id NAA19174;
	Mon, 3 Mar 1997 13:26:43 -0800
Mail-Copies-To: never
To: xemacs-beta@xemacs.org
Subject: Re: b96 failure
References: <199703032025.PAA04168@verve.canada.sun.com>
X-Url: http://www.miranova.com/%7Esteve/
X-Face: #!T9!#9s-3o8)*uHlX{Ug[xW7E7Wr!*L46-OxqMu\xz23v|R9q}lH?cRS{rCNe^'[`^sr5"
 f8*@r4ipO6Jl!:Ccq<xoV[Qz2u8<8-+Vwf2gzJ44lf_/y9OaQ`@#Q65{U4/TC)i2`~/M&QI$X>p:9I
 OSS'2{-)-4wBnVeg0S\O4Al@)uC[pD|+
X-Attribution: sb
From: Steven L Baur <steve@miranova.com>
In-Reply-To: Georg Nikodym's message of Mon, 3 Mar 1997 15:25:45 -0500
Mime-Version: 1.0 (generated by tm-edit 7.105)
Content-Type: text/plain; charset=US-ASCII
Date: 03 Mar 1997 13:26:37 -0800
Message-ID: <m2wwroekfm.fsf@altair.xemacs.org>
Lines: 49
X-Mailer: Gnus v5.4.17/XEmacs 20.1

Georg Nikodym writes:

> Seems that the auto puresize hack doesn't want to work in my world
> because PURESIZE.h gets written out with ((mode_t) 0) permissions
> which causes the whole dump process to loop endlessly...

> Still investigating.

I think I screwed this up.

Bat puckey.  This has Chuck's changes intermixed.  You need to set a
file creation mask on the call to open() (Add |0666 to the open flags).


Index: alloc.c
===================================================================
RCS file: /usr/local/xemacs/xemacs-19.15/src/alloc.c,v
retrieving revision 1.5
diff -u -r1.5 alloc.c
--- alloc.c	1997/03/02 03:44:18	1.5
+++ alloc.c	1997/03/03 21:21:34
@@ -2576,18 +2576,19 @@
 PURESIZE_h(long int puresize)
 {
   int fd;
-  char *PURESIZE_h_file = "PURESIZE.h";
+  char *PURESIZE_h_file = "puresize_adjust.h";
   char *WARNING = "/* This file is generated by XEmacs, DO NOT MODIFY!!! */\n";
   char define_PURESIZE[256];
 
-  if ((fd = open(PURESIZE_h_file, O_WRONLY|O_CREAT)) < 0) {
-    report_file_error("Can't write PURESIZE",
+  if ((fd = open(PURESIZE_h_file, O_WRONLY|O_CREAT|O_TRUNC|0666)) < 0) {
+    report_file_error("Can't write PURESIZE_ADJUSTMENT",
 		      Fcons(build_ext_string(PURESIZE_h_file, FORMAT_FILENAME),
 			    Qnil));
   }
 
   write(fd, WARNING, strlen(WARNING));
-  sprintf(define_PURESIZE, "# define PURESIZE %ld\n", puresize);
+  sprintf(define_PURESIZE, "# define PURESIZE_ADJUSTMENT %ld\n",
+	  puresize - RAW_PURESIZE);
   write(fd, define_PURESIZE, strlen(define_PURESIZE));
   close(fd);
 }

-- 
steve@miranova.com baur
Unsolicited commercial e-mail will be billed at $250/message.

