From 0abde16fada8671acc4adc2ff42cfdd47636550f Mon Sep 17 00:00:00 2001 From: "Guillermo J. Rozas" Date: Thu, 6 Jan 1994 19:51:22 +0000 Subject: [PATCH] Patch to allow ordinary compiled files to work with allow_cc. The utilities vector is not relevant for ordinary code, only for bands or dumped linked objects, which, for now, bintopsb cannot handle. --- v7/src/microcode/bintopsb.c | 7 ++++--- v8/src/microcode/bintopsb.c | 7 ++++--- 2 files changed, 8 insertions(+), 6 deletions(-) diff --git a/v7/src/microcode/bintopsb.c b/v7/src/microcode/bintopsb.c index 543d73051..86ea18b34 100644 --- a/v7/src/microcode/bintopsb.c +++ b/v7/src/microcode/bintopsb.c @@ -1,6 +1,6 @@ /* -*-C-*- -$Id: bintopsb.c,v 9.63 1993/11/16 04:50:02 gjr Exp $ +$Id: bintopsb.c,v 9.64 1994/01/06 19:51:22 gjr Exp $ Copyright (c) 1987-1993 Massachusetts Institute of Technology @@ -2126,8 +2126,9 @@ DEFUN_VOID (do_it) Heap_Start = (NROOTS + (TRAP_MAX_IMMEDIATE + 1)); Heap_Objects_Start = (Heap_Start + Heap_Count); - Mem_Base[(Heap_Start - NROOTS) + 0] - = dumped_utilities; + if (! band_p) + dumped_utilities = SHARP_F; + Mem_Base[(Heap_Start - NROOTS) + 0] = dumped_utilities; if (dumped_utilities != SHARP_F) { /* This knows the format of the utilities vector. */ diff --git a/v8/src/microcode/bintopsb.c b/v8/src/microcode/bintopsb.c index 543d73051..86ea18b34 100644 --- a/v8/src/microcode/bintopsb.c +++ b/v8/src/microcode/bintopsb.c @@ -1,6 +1,6 @@ /* -*-C-*- -$Id: bintopsb.c,v 9.63 1993/11/16 04:50:02 gjr Exp $ +$Id: bintopsb.c,v 9.64 1994/01/06 19:51:22 gjr Exp $ Copyright (c) 1987-1993 Massachusetts Institute of Technology @@ -2126,8 +2126,9 @@ DEFUN_VOID (do_it) Heap_Start = (NROOTS + (TRAP_MAX_IMMEDIATE + 1)); Heap_Objects_Start = (Heap_Start + Heap_Count); - Mem_Base[(Heap_Start - NROOTS) + 0] - = dumped_utilities; + if (! band_p) + dumped_utilities = SHARP_F; + Mem_Base[(Heap_Start - NROOTS) + 0] = dumped_utilities; if (dumped_utilities != SHARP_F) { /* This knows the format of the utilities vector. */ -- 2.25.1