diff --git a/compiler/old-rt/parms.lisp b/compiler/old-rt/parms.lisp index 2aa395e1b10943f252bbe27d223d5a9b7c47b8bb..86b5178c645e5f9b2286fb42478596aaf4b07eae 100644 --- a/compiler/old-rt/parms.lisp +++ b/compiler/old-rt/parms.lisp @@ -60,4 +60,13 @@ (defparameter vm-version "IBM RT PC/Mach 0.0") +;;; The byte ordering of the target implementation. +;;; +(defparameter target-byte-order :big-endian) + +;;; +;;; The native byte ordering (should come from somewhere else once +;;; bootstrapped.) +(defconstant native-byte-order :big-endian) + ); Eval-When (Compile Load Eval)