/* $Header$ */
+#if !defined(EM_WSIZE)
+#define EM_WSIZE _EM_WSIZE
+#endif
+
_randomi()
{
int i;
loi EM_PSIZE
lae _penvp
sti EM_PSIZE
-#if unix && ! (em22 || em24 || em44)
+#if __unix && ! (__em22 || __em24 || __em44)
lpi $_ctch_
sig
asp EM_PSIZE
cal $exit
end
-#if unix && ! (em22 || em24 || em44)
+#if __unix && ! (__em22 || __em24 || __em44)
exp $_ctch_
pro $_ctch_,0
lol 0
#define ASSERT(b) /* empty */
#endif
-#if EM_WSIZE == EM_PSIZE
+#if _EM_WSIZE == _EM_PSIZE
#define ptrint int
#else
#define ptrint long
#endif
-#if EM_PSIZE == 2
+#if _EM_PSIZE == 2
#define BRKSIZE 1024
#else
#define BRKSIZE 4096
int rand()
{
seed = (1103515245L * seed + 12345) & 0x7FFFFFFF;
-#if EM_WSIZE == 4
+#if _EM_WSIZE == 4
return (int) seed;
#else
return ((int)(seed >> 8) & 0x7FFF);