Make -fasl imply -large.

diff --git a/v7/src/microcode/option.c b/v7/src/microcode/option.c
index 66cb1acd4269bf34358887209692cd0d1999f300..2c6d6a95d5ad5c3211583e8daad134a6d7a23c8d 100644 (file)
--- a/v7/src/microcode/option.c
+++ b/v7/src/microcode/option.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/option.c,v 1.19 1992/05/27 03:24:44 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/option.c,v 1.20 1992/05/27 03:52:17 jinx Exp $
 
 Copyright (c) 1990-92 Massachusetts Institute of Technology
 
@@ -1118,6 +1118,7 @@ DEFUN (read_command_line_options, (argc, argv),
                     scheme_program_name, option_fasl_file);
            termination_init_error ();
          }
+       option_large_sizes = 1;
        option_band_specified = 1;
        option_band_file = 0;
       }