]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - TFluka/sodraw.cxx
Adding abbreviation (Lars Bozyk)
[u/mrichter/AliRoot.git] / TFluka / sodraw.cxx
index 173ee756912cb1b0e325beb3382aec80b0ec0bc4..748ee24f53206d9c7e1e81fef9fcd62beebcab58 100644 (file)
@@ -1,5 +1,9 @@
 #include <Riostream.h>
+#include "TVirtualMCApplication.h"
+
 #include "TFluka.h"
+#include "TFlukaCodes.h"
+
 #ifndef WIN32
 # define sodraw sodraw_
 #else
@@ -8,9 +12,9 @@
 extern "C" {
 void sodraw()
 {
-  ((TFluka*) gMC)->SetIcode(0);
-  cout << endl << " !!! I am in sodraw" << endl;
-  ((TFluka*) gMC)->FutoTest();
+  ((TFluka*) gMC)->SetCaller(kSODRAW);
+  ((TFluka*) gMC)->SetIcode((FlukaProcessCode_t)0);
+  (TVirtualMCApplication::Instance())->Stepping();
 } // end of sodraw
 } // end of extern "C"