summaryrefslogtreecommitdiff
path: root/otherlibs/unix/cst2constr.c
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/unix/cst2constr.c')
-rw-r--r--otherlibs/unix/cst2constr.c15
1 files changed, 0 insertions, 15 deletions
diff --git a/otherlibs/unix/cst2constr.c b/otherlibs/unix/cst2constr.c
deleted file mode 100644
index 7a519a7501..0000000000
--- a/otherlibs/unix/cst2constr.c
+++ /dev/null
@@ -1,15 +0,0 @@
-#include <mlvalues.h>
-#include <fail.h>
-#include "cst2constr.h"
-
-value cst_to_constr(n, tbl, size, deflt)
- int n;
- int * tbl;
- int size;
- int deflt;
-{
- int i;
- for (i = 0; i < size; i++)
- if (n == tbl[i]) return Atom(i);
- return Atom(deflt);
-}