Common blocks to access material properties and
[u/mrichter/AliRoot.git] / TFluka / eedraw.cxx
CommitLineData
fa3d1cc7 1#include <Riostream.h>
7dac99f1 2#include "TVirtualMCApplication.h"
a7bb59a2 3
fa3d1cc7 4#include "TFluka.h"
d566901f 5#include "TFlukaCodes.h"
a7bb59a2 6
fa3d1cc7 7#ifndef WIN32
8# define eedraw eedraw_
9#else
10# define eedraw EEDRAW
11#endif
12extern "C" {
13void eedraw(Int_t& icode)
14{
d566901f 15 ((TFluka*) gMC)->SetCaller(kEEDRAW);
16 ((TFluka*) gMC)->SetIcode((FlukaProcessCode_t) icode);
fa3d1cc7 17} // end of eedraw
18} // end of extern "C"
19