perl 2.0 (no announcement message available)

[perl5.git] / util.h

diff --git a/util.h b/util.h
index 4f92eeb..5571edd 100644 (file)
--- a/util.h
+++ b/util.h
@@ -1,36 +1,26 @@
-/* $Header: util.h,v 1.0 87/12/18 13:06:33 root Exp $
+/* $Header: util.h,v 2.0 88/06/05 00:15:15 root Exp $
  *
  * $Log:       util.h,v $
- * Revision 1.0  87/12/18  13:06:33  root
- * Initial revision
+ * Revision 2.0  88/06/05  00:15:15  root
+ * Baseline version 2.0.
  * 
  */
 
-/* is the string for makedir a directory name or a filename? */
+int *screamfirst INIT(Null(int*));
+int *screamnext INIT(Null(int*));
+int *screamcount INIT(Null(int*));
 
-#define MD_DIR 0
-#define MD_FILE 1
-
-void   util_init();
-int    doshell();
 char   *safemalloc();
 char   *saferealloc();
-char   *safecpy();
-char   *safecat();
 char   *cpytill();
 char   *instr();
-#ifdef SETUIDGID
-    int                eaccess();
-#endif
-char   *getwd();
-void   cat();
-void   prexit();
+char   *bminstr();
+char   *fbminstr();
+char   *screaminstr();
+void   bmcompile();
+void   fbmcompile();
 char   *get_a_line();
 char   *savestr();
-int    makedir();
 void   setenv();
 int    envix();
-void   notincl();
-char   *getval();
 void   growstr();
-void   setdef();