Replaced some EM code by C code

lang/m2/libm2/rcki.c

@@ -0,0 +1,23 @@
+/*
+ * (c) copyright 1988 by the Vrije Universiteit, Amsterdam, The Netherlands.
+ * See the copyright notice in the ACK home directory, in the file "Copyright".
+ *
+ *
+ * Module:	range checks for INTEGER
+ * Author:	Ceriel J.H. Jacobs
+ * Version:	$Header$
+*/
+
+#include <em_abs.h>
+
+extern TRP();
+
+struct range_descr {
+  int	low, high;
+};
+
+rcki(descr, val)
+  struct range_descr *descr;
+{
+  if (val < descr->low || val > descr->high) TRP(ERANGE);
+}