d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

fix + some more statistics

Browse source
This commit is contained in:
ceriel 1987-08-11 15:31:09 +00:00
parent c3fec1f112
commit 123bcfc5e2
2 changed files with 8 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
util/led/main.c
View file

@ -51,7 +51,7 @@ main(argc, argv)
initializations(argc, argv); initializations(argc, argv);
first_pass(argv); first_pass(argv);
#ifndef NOSTATISTICS #ifndef NOSTATISTICS
do_statistics(); if (statistics) do_statistics();
#endif #endif
freeze_core(); freeze_core();
evaluate(); evaluate();
@ -461,8 +461,6 @@ complete_sections()
if (flagword & RFLAG) continue; if (flagword & RFLAG) continue;
sc->os_lign = sc->os_lign =
tstbit(sectindex, lignmap) ? sect_lign[sectindex] : 1; tstbit(sectindex, lignmap) ? sect_lign[sectindex] : 1;
sc->os_size += sc->os_lign - 1;
sc->os_size -= sc->os_size % sc->os_lign;
if (tstbit(sectindex, basemap)) { if (tstbit(sectindex, basemap)) {
base = sect_base[sectindex]; base = sect_base[sectindex];
if (base % sc->os_lign) if (base % sc->os_lign)

7
util/led/memory.c
View file

@ -21,6 +21,7 @@ static char rcsid[] = "$Header$";
* (70000 - 65536). * (70000 - 65536).
*/ */
#include <stdio.h>
#include <out.h> #include <out.h>
#include "const.h" #include "const.h"
#include "assert.h" #include "assert.h"
@ -143,6 +144,9 @@ move_up(piece, incr)
register ind_t incr; register ind_t incr;
{ {
register struct memory *mem; register struct memory *mem;
#ifndef NOSTATISTICS
extern int statistics;
#endif
debug("move_up(%d, %d)\n", piece, (int)incr, 0, 0); debug("move_up(%d, %d)\n", piece, (int)incr, 0, 0);
while (incr > 0 && sbreak(incr) == -1) while (incr > 0 && sbreak(incr) == -1)
@ -152,6 +156,9 @@ move_up(piece, incr)
incr = 0; incr = 0;
return (ind_t) 0; return (ind_t) 0;
} }
#ifndef NOSTATISTICS
if (statistics) fprintf(stderr,"moving up %X\n", (long) incr);
#endif
for (mem = &mems[NMEMS - 1]; mem > &mems[piece]; mem--) for (mem = &mems[NMEMS - 1]; mem > &mems[piece]; mem--)
copy_up(mem, incr); copy_up(mem, incr);