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	// 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