src/gras/Virtu/rl_emul.c

   1 /* $Id$ */
   2
   3 /* rl_emul - Emulation support (real life)                                  */
   4
   5 /* Copyright (c) 2003-5 Arnaud Legrand, Martin Quinson. All rights reserved.*/
   6
   7 /* This program is free software; you can redistribute it and/or modify it
   8  * under the terms of the license (GNU LGPL) which comes with this package. */
   9
  10 #include "gras/emul.h"
  11 #include "gras/Virtu/virtu_rl.h"
  12 #include "gras_modinter.h"
  13
  14 XBT_LOG_NEW_SUBCATEGORY(gras_virtu_emul, gras_virtu, "Emulation support");
  15
  16 /*** CPU burning */
  17 void gras_cpu_burn(double flops) {
  18   while (flops>0) {
  19     flops-=2;
  20   }
  21 }
  22
  23
  24 /*** Timing macros: nothing to do in RL. Actually do the job and shutup ***/
  25
  26 void gras_emul_init(void)
  27 {
  28 }
  29
  30 void gras_emul_exit(void)
  31 {
  32 }
  33
  34 int gras_bench_always_begin(const char *location, int line)
  35 {
  36   return 0;
  37 }
  38
  39 int gras_bench_always_end(void)
  40 {
  41   return 0;
  42 }
  43
  44 int gras_bench_once_begin(const char *location, int line)
  45 {
  46   return 1;
  47 }
  48
  49 int gras_bench_once_end(void)
  50 {
  51   return 0;
  52 }
  53
  54 /*** Conditional execution support ***/
  55
  56 int gras_if_RL(void)
  57 {
  58   return 1;
  59 }
  60
  61 int gras_if_SG(void)
  62 {
  63   return 0;
  64 }