]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - MINICERN/packlib/kernlib/kerngen/ccgen/dosgs/tmproi.c
Merging the VirtualMC branch to the main development branch (HEAD)
[u/mrichter/AliRoot.git] / MINICERN / packlib / kernlib / kerngen / ccgen / dosgs / tmproi.c
diff --git a/MINICERN/packlib/kernlib/kerngen/ccgen/dosgs/tmproi.c b/MINICERN/packlib/kernlib/kerngen/ccgen/dosgs/tmproi.c
deleted file mode 100644 (file)
index 867da5b..0000000
+++ /dev/null
@@ -1,41 +0,0 @@
-/*
-* $Id$
-*
-* $Log$
-* Revision 1.1.1.1  1996/02/15 17:49:32  mclareni
-* Kernlib
-*
-*/
-/*>    ROUTINE TMPROI
-  CERN PROGLIB#         TMPROI          .VERSION KERNFOR  4.36  930602
-  ORIG. 30/05/91, JZ
-  Fortran interface routine to print a prompt string
-      CALL TMPRO (TEXT)
-*/
-#ifdef WIN32
-#include <io.h>
-#endif
-#include <stdio.h>
-#include "kerngen/fortchar.inc"
-#if defined(CERNLIB_QX_SC)
-void tmproi_(ftext, lgtext)
-#endif
-#if defined(CERNLIB_QXNO_SC)
-void tmproi(ftext, lgtext)
-#endif
-#if defined(CERNLIB_QXCAPT)
-void TMPROI(ftext, lgtext)
-#endif
-#if defined(CERNLIB_QMCRY)
-      _fcd ftext;
-#endif
-#if !defined(CERNLIB_QMCRY)
-      char *ftext;
-#endif
-      int  *lgtext;
-{
-      write (1, ftext, *lgtext);
-      return;
-}
-/*> END <----------------------------------------------------------*/
-