diff --git a/compiler.h b/compiler.h
new file mode 100644
index 000000000..7462d1a56
--- /dev/null
+++ b/compiler.h
@@ -0,0 +1,42 @@
+#ifndef __compiler_H
+#define __compiler_H
+/*
+ * Copyright (c) 1999 Stephen Williams (steve@icarus.com)
+ *
+ *    This source code is free software; you can redistribute it
+ *    and/or modify it in source code form under the terms of the GNU
+ *    General Public License as published by the Free Software
+ *    Foundation; either version 2 of the License, or (at your option)
+ *    any later version.
+ *
+ *    This program is distributed in the hope that it will be useful,
+ *    but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ *    GNU General Public License for more details.
+ *
+ *    You should have received a copy of the GNU General Public License
+ *    along with this program; if not, write to the Free Software
+ *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
+ */
+#if !defined(WINNT)
+#ident "$Id: compiler.h,v 1.1 1999/06/06 20:42:48 steve Exp $"
+#endif
+
+/*
+ * This defines constants and defaults for the compiler in general.
+ */
+
+
+/* The INTEGER_WIDTH is the default width of integer variables, and
+   the presumed width of unsigned literal numbers. */
+#ifndef INTEGER_WIDTH
+# define INTEGER_WIDTH 32
+#endif
+
+/*
+ * $Log: compiler.h,v $
+ * Revision 1.1  1999/06/06 20:42:48  steve
+ *  Make compiler width a compile time constant.
+ *
+ */
+#endif
diff --git a/lexor.lex b/lexor.lex
index 9060e4a8f..0839613d2 100644
--- a/lexor.lex
+++ b/lexor.lex
@@ -19,12 +19,13 @@
  *    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  */
 #if !defined(WINNT)
-#ident "$Id: lexor.lex,v 1.15 1999/05/16 05:08:42 steve Exp $"
+#ident "$Id: lexor.lex,v 1.16 1999/06/06 20:42:48 steve Exp $"
 #endif
 
       //# define YYSTYPE lexval
 
 # include  <iostream.h>
+# include  "compiler.h"
 # include  "parse_misc.h"
 # include  "parse.h"
 # include  <ctype.h>
@@ -384,7 +385,7 @@ static verinum*make_unsized_binary(const char*txt)
 {
       assert(*txt == '\'');
       txt += 1;
-      return make_binary_with_size(64, false, txt);
+      return make_binary_with_size(INTEGER_WIDTH, false, txt);
 }
 
 static verinum*make_sized_octal(const char*txt)