root2paw/src/liboptoflev1.C

//     openntuple shared library        v. 0.2
//     Written by Emiliano Mocchiutti
//
#include "ctofstruct.h"
#define optoflev1 optoflev1_
extern "C" int optoflev1(char [], int &);
void coptoflev1(const char name[100], Toflev1 & toflev1, int & trnev) {
  extern struct Toflev1 toflev1_;
  memcpy(&toflev1_, &toflev1, sizeof(toflev1));
  printf(" Open file \n\n             %s \n\n",name);
  optoflev1((char *)name, (int &)trnev);
  printf(" ...done!\n\n");
};

1	mocchiut	1.1	// openntuple shared library v. 0.2
2			// Written by Emiliano Mocchiutti
3			//
4			#include "ctofstruct.h"
5			#define optoflev1 optoflev1_
6			extern "C" int optoflev1(char [], int &);
7			void coptoflev1(const char name[100], Toflev1 & toflev1, int & trnev) {
8			extern struct Toflev1 toflev1_;
9			memcpy(&toflev1_, &toflev1, sizeof(toflev1));
10			printf(" Open file \n\n %s \n\n",name);
11			optoflev1((char *)name, (int &)trnev);
12			printf(" ...done!\n\n");
13			};
14