nsz Git - libfirm/blob - ir/ir/irflag.c

   1 /* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
   2 ** All rights reserved.
   3 **
   4 ** Authors: Christian Schaefer
   5 **
   6 ** irflag --- optimization flags
   7 */
   8
   9 # include "irflag.h"
  10
  11 int opt_cse = 0;
  12 int opt_constant_folding = 1;
  13 int optimized = 1;
  14
  15 /* set the flags with set_flagname, get the flag with get_flagname */
  16
  17 void
  18 set_opt_cse (int value)
  19 {
  20   opt_cse = value;
  21 }
  22
  23 int
  24 get_opt_cse (void)
  25 {
  26   return opt_cse;
  27 }
  28
  29 void
  30 set_opt_constant_folding (int value)
  31 {
  32   opt_constant_folding=value;
  33 }
  34
  35 int
  36 get_opt_constant_folding (void)
  37 {
  38   return opt_constant_folding;
  39 }
  40
  41 void
  42 set_optimize (int value)
  43 {
  44   optimized = value;
  45 }
  46
  47 int
  48 get_optimize (void)
  49 {
  50   return optimized;
  51 }