ra_aux.c 789 B

123456789101112131415161718192021222324252627282930313233343536373839404142434445
  1. /* $Id$ */
  2. /*
  3. * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
  4. * See the copyright notice in the ACK home directory, in the file "Copyright".
  5. */
  6. /* R E G I S T E R A L L O C A T I O N
  7. *
  8. * A U X I L I A R Y R O U T I N E S
  9. */
  10. #include <em_mnem.h>
  11. #include <em_spec.h>
  12. #include <em_pseu.h>
  13. #include <em_reg.h>
  14. #include "../share/types.h"
  15. #include "../share/debug.h"
  16. #include "../share/def.h"
  17. #include "../share/global.h"
  18. #include "../share/lset.h"
  19. #include "../share/alloc.h"
  20. #include "ra.h"
  21. #include "ra_aux.h"
  22. time_p cons_time(l,b)
  23. line_p l;
  24. bblock_p b;
  25. {
  26. /* Construct a time */
  27. time_p t = newtime();
  28. t->t_line = l;
  29. t->t_bblock = b;
  30. return t;
  31. }
  32. short loop_scale(lev)
  33. short lev;
  34. {
  35. return (lev == 0 ? 1 : (lev > 3 ? 32 : 8 * lev));
  36. }