include/ntuple/qp_exe_conv.h

0001 /*
0002  *  qp_exe_conv.h  --
0003  *
0004  *  Original: 25-Jan-1995 16:10
0005  *
0006  *  Author:   Maarten Ballintijn <Maarten.Ballintijn@cern.ch>
0007  *
0008  *  $Id$
0009  *
0010  *  $Log$
0011  *  Revision 1.2  1996/04/23 18:38:24  maartenb
0012  *  - Add RCS keywords
0013  *
0014  *
0015  */
0016
0017 {
0018     Int32       *r, *o1;
0019
0020     switch ( fc ) {
0021
0022 #include    "qp_exe_conv_case.h"
0023
0024
0025     default:
0026         sf_report( "qp_exe_conv.h: Unkown Fcode ( %d )\n", fc );
0027         *errp = R_INTERNAL_ERROR;
0028         running = FALSE;
0029         break;
0030     }
0031 }