--- src/runtime/init.r.orig	Fri Nov 29 22:30:01 1996
+++ src/runtime/init.r	Tue Jan 20 10:14:06 1998
@@ -997,7 +997,7 @@
    env_int(COEXPSIZE, &stksize, 1, (uword)MaxUnsigned);
    env_int(STRSIZE, &ssize, 1, (uword)MaxBlock);
    env_int(HEAPSIZE, &abrsize, 1, (uword)MaxBlock);
-   env_int(BLOCKSIZE, &abrsize, 1, (uword)MaxBlock);    /* synonym */
+/*   env_int(BLOCKSIZE, &abrsize, 1, (uword)MaxBlock); */   /* synonym */
    env_int(BLKSIZE, &abrsize, 1, (uword)MaxBlock);      /* synonym */
    env_int(MSTKSIZE, &mstksize, 1, (uword)MaxUnsigned);
    env_int(QLSIZE, &qualsize, 1, (uword)MaxBlock);
