From 6cc21d4473ad6db1f4836e5a0720442f26cca879 Mon Sep 17 00:00:00 2001
From: Raymond Toy <toy.raymond@gmail.com>
Date: Sat, 15 Oct 2011 13:31:37 -0700
Subject: [PATCH] Update with new docstrings and code changes.

---
 i18n/locale/cmucl.pot                         |   134 +-
 .../en@piglatin/LC_MESSAGES/cmucl-bsd-os.po   |    11 +-
 .../en@piglatin/LC_MESSAGES/cmucl-linux-os.po |    11 +-
 .../en@piglatin/LC_MESSAGES/cmucl-mp.po       |   280 +-
 .../LC_MESSAGES/cmucl-sparc-svr4.po           |    19 +-
 .../en@piglatin/LC_MESSAGES/cmucl-sparc-vm.po |   129 +-
 .../en@piglatin/LC_MESSAGES/cmucl-sse2.po     |    12 +-
 .../en@piglatin/LC_MESSAGES/cmucl-sunos-os.po |    11 +-
 .../LC_MESSAGES/cmucl-unix-glibc2.po          |   798 +-
 .../en@piglatin/LC_MESSAGES/cmucl-unix.po     |   531 +-
 .../en@piglatin/LC_MESSAGES/cmucl-x86-vm.po   |   123 +-
 .../en@piglatin/LC_MESSAGES/cmucl-x87.po      |    12 +-
 i18n/locale/en@piglatin/LC_MESSAGES/cmucl.po  | 13845 ++++++++++------
 i18n/locale/ko/LC_MESSAGES/cmucl.po           |   189 +-
 14 files changed, 10125 insertions(+), 5980 deletions(-)

diff --git a/i18n/locale/cmucl.pot b/i18n/locale/cmucl.pot
index 08392c773..6ddb2afc7 100644
--- a/i18n/locale/cmucl.pot
+++ b/i18n/locale/cmucl.pot
@@ -4771,6 +4771,10 @@ msgid ""
 "  otherwise."
 msgstr ""
 
+#: src/code/float-trap.lisp
+msgid "SIGFPE with no exceptions currently enabled?"
+msgstr ""
+
 #: src/code/float-trap.lisp
 msgid ""
 "Execute BODY with the floating point exceptions listed in TRAPS\n"
@@ -17397,8 +17401,8 @@ msgstr ""
 msgid ""
 "Similar to *BYTE-COMPILE-DEFAULT*, but controls the compilation of top-level"
 "\n"
-"   forms (evaluated at load-time) when the :BYTE-COMPILE argument is :MAYBE\n"
-"   (the default.)  When true, we decide to byte-compile."
+"  forms (evaluated at load-time) when the :BYTE-COMPILE argument is :MAYBE\n"
+"  (the default.)  When true, we decide to byte-compile."
 msgstr ""
 
 #: src/compiler/main.lisp
@@ -17436,9 +17440,9 @@ msgstr ""
 #: src/compiler/main.lisp
 msgid ""
 "The user supplied source-info for the current compilation.  \n"
-"This is the :source-info argument to COMPILE-FROM-STREAM and will be\n"
-"stored in the INFO slot of the DEBUG-SOURCE in code components and \n"
-"in the user USER-INFO slot of STREAM-SOURCE-LOCATIONs."
+"  This is the :source-info argument to COMPILE-FROM-STREAM and will be\n"
+"  stored in the INFO slot of the DEBUG-SOURCE in code components and \n"
+"  in the user USER-INFO slot of STREAM-SOURCE-LOCATIONs."
 msgstr ""
 
 #: src/compiler/main.lisp
@@ -17596,68 +17600,72 @@ msgstr ""
 
 #: src/compiler/main.lisp
 msgid ""
-"Compiles Source, producing a corresponding .FASL file.  Source may be a "
-"list\n"
-"   of files, in which case the files are compiled as a unit, producing a "
+"Compiles Source, producing a corresponding FASL file.  Source may be a list\n"
+"  of files, in which case the files are compiled as a unit, producing a "
 "single\n"
-"   .FASL file.  The output file names are defaulted from the first (or only)"
+"  FASL file.  The output file names are defaulted from the first (or only)\n"
+"  input file name.  (The use of a list for Source is a CMUCL extension, not\n"
+"  specified in CLHS.)\n"
 "\n"
-"   input file name.  Other options available via keywords:\n"
-"   :Output-File\n"
-"      The name of the fasl to output, NIL for none, T for the default.\n"
-"   :Error-File\n"
-"      The name of the error listing file, NIL for none (the default), T for\n"
-"      .err.\n"
-"   :Trace-File\n"
-"      If specified, internal data structures are dumped to this file.  T "
-"for\n"
-"      the .trace default.\n"
-"   :Error-Output\n"
-"      If a stream, then error output is sent there as well as to the "
-"listing\n"
-"      file.  NIL suppresses this additional error output.  The default is T,"
-"\n"
-"      which means use *ERROR-OUTPUT*.\n"
-"   :Block-Compile {NIL | :SPECIFIED | T}\n"
-"      Determines whether multiple functions are compiled together as a unit,"
+"  These keywords are supported:\n"
 "\n"
-"      resolving function references at compile time.  NIL means that global\n"
-"      function names are never resolved at compilation time.  :SPECIFIED "
+"  :Output-File\n"
+"     The name of the FASL to output, NIL for none, T for the default.\n"
+"     (Note the difference between the treatment of NIL :Output-File\n"
+"     here and in COMPILE-FILE-PATHNAME.)  The returned pathname of the\n"
+"     output file may differ from the pathname of the :Output-File\n"
+"     parameter, e.g. when the latter is a designator for a directory.\n"
+"  :Load\n"
+"     Load the compiled file; T here requires :Output-File to be\n"
+"     non-NIL, as well.  The default for :Load is NIL.\n"
+"  :Error-File\n"
+"     The name of the error listing file, NIL for none (the default), T for "
+".err.\n"
+"  :Trace-File\n"
+"     If specified, internal data structures are dumped to this file.  T for\n"
+"     the .trace default.\n"
+"  :Error-Output\n"
+"     If a stream, then error output is sent there as well as to the listing\n"
+"     file.  NIL suppresses this additional error output.  The default is T,\n"
+"     which means use *ERROR-OUTPUT*.\n"
+"  :Block-Compile {NIL | :SPECIFIED | T}\n"
+"     Determines whether multiple functions are compiled together as a unit,\n"
+"     resolving function references at compile time.  NIL means that global\n"
+"     function names are never resolved at compilation time.  :SPECIFIED "
 "means\n"
-"      that names are resolved at compile-time when convenient (as in a\n"
-"      self-recursive call), but the compiler doesn't combine top-level "
+"     that names are resolved at compile-time when convenient (as in a\n"
+"     self-recursive call), but the compiler doesn't combine top-level "
 "DEFUNs.\n"
-"      With :SPECIFIED, an explicit START-BLOCK declaration will enable "
-"block\n"
-"      compilation.  A value of T indicates that all forms in the file(s) "
+"     With :SPECIFIED, an explicit START-BLOCK declaration will enable block\n"
+"     compilation.  A value of T indicates that all forms in the file(s) "
 "should\n"
-"      be compiled as a unit.  The default is the value of\n"
-"      EXT:*BLOCK-COMPILE-DEFAULT*, which is initially :SPECIFIED.\n"
-"   :Entry-Points\n"
-"      This specifies a list of function names for functions in the file(s) "
+"     be compiled as a unit.  The default is the value of\n"
+"     EXT:*BLOCK-COMPILE-DEFAULT*, which is initially :SPECIFIED.\n"
+"  :Entry-Points\n"
+"     This specifies a list of function names for functions in the file(s) "
 "that\n"
-"      must be given global definitions.  This only applies to block\n"
-"      compilation, and is useful mainly when :BLOCK-COMPILE T is specified "
+"     must be given global definitions.  This only applies to block\n"
+"     compilation, and is useful mainly when :BLOCK-COMPILE T is specified "
 "on a\n"
-"      file that lacks START-BLOCK declarations.  If the value is NIL (the\n"
-"      default) then all functions will be globally defined.\n"
-"   :Byte-Compile {T | NIL | :MAYBE}\n"
-"      Determines whether to compile into interpreted byte code instead of\n"
-"      machine instructions.  Byte code is several times smaller, but much\n"
-"      slower.  If :MAYBE, then only byte-compile when SPEED is 0 and\n"
-"      DEBUG <= 1.  The default is the value of EXT:*BYTE-COMPILE-DEFAULT*,\n"
-"      which is initially :MAYBE.\n"
-"   :Xref\n"
-"      If non-NIL, enable recording of cross-reference information.  The "
+"     file that lacks START-BLOCK declarations.  If the value is NIL (the\n"
+"     default) then all functions will be globally defined.\n"
+"  :Byte-Compile {T | NIL | :MAYBE}\n"
+"     Determines whether to compile into interpreted byte code instead of\n"
+"     machine instructions.  Byte code is several times smaller, but much\n"
+"     slower.  If :MAYBE, then only byte-compile when SPEED is 0 and\n"
+"     DEBUG <= 1.  The default is the value of EXT:*BYTE-COMPILE-DEFAULT*,\n"
+"     which is initially :MAYBE.\n"
+"  :Xref\n"
+"     If non-NIL, enable recording of cross-reference information.  The "
 "default\n"
-"      is the value of C:*RECORD-XREF-INFO*\n"
-"   :External-Format\n"
-"      The external format to use when opening the source file\n"
-"   :Decoding-Error\n"
-"      How to handle decoding errors in the external format when reading the\n"
-"      source file.  Default (T) is to signal an error.  Nil means silently\n"
-"      continue, replacing the invalid sequence with a suitable replacment\n"
-"      character."
+"     is the value of C:*RECORD-XREF-INFO*\n"
+"  :External-Format\n"
+"     The external format to use when opening the source file.\n"
+"  :Decoding-Error\n"
+"     How to handle decoding errors in the external format when reading the\n"
+"     source file.  Default (T) is to signal an error.  NIL means silently\n"
+"     continue, replacing the invalid sequence with a suitable replacment\n"
+"     character."
 msgstr ""
 
 #: src/compiler/main.lisp
@@ -17683,7 +17691,7 @@ msgid ""
 "  be compiled.  IF NAME names a macro, then the compiled expression\n"
 "  replaces the existing macro-function.  If NAME names a function, the\n"
 "  compiled expression is placed in the function cell of NAME.  If NAME\n"
-"  is Nil, the compiled code object is returned."
+"  is NIL, the compiled code object is returned."
 msgstr ""
 
 #: src/compiler/main.lisp
@@ -17699,8 +17707,12 @@ msgstr ""
 
 #: src/compiler/main.lisp
 msgid ""
-"Return a pathname describing what file COMPILE-FILE would write to given\n"
-"   these arguments."
+"Return a pathname describing what file COMPILE-FILE would write to\n"
+"  given these arguments.  The returned pathname of the output file may\n"
+"  differ from the pathname of the :Output-File parameter, e.g. when\n"
+"  the latter is a designator for a directory. The CMUCL caveat: NIL is\n"
+"  accepted for :Output-File there but not here, which is probably not\n"
+"  in line with CLHS."
 msgstr ""
 
 #: src/compiler/main.lisp
diff --git a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-bsd-os.po b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-bsd-os.po
index 02489adeb..fe09eb547 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-bsd-os.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-bsd-os.po
@@ -1,10 +1,12 @@
-#@ cmucl-bsd-os
+# @ cmucl-bsd-os
 # SOME DESCRIPTIVE TITLE
 # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR
 #
 #, fuzzy
 msgid ""
-msgstr "Project-Id-Version: CMUCL 20B\n"
+msgstr ""
+"Project-Id-Version: CMUCL 20B\n"
+"Report-Msgid-Bugs-To: \n"
 "PO-Revision-Date: YEAR-MO-DA HO:MI +ZONE\n"
 "Last-Translator: Automatic translation\n"
 "Language-Team: Pig Latin (auto-translated)\n"
@@ -20,7 +22,9 @@ msgstr "Ersionvay ingstray orfay upportingsay oftwaresay"
 
 #: src/code/bsd-os.lisp
 msgid "Returns a string describing version of the supporting software."
-msgstr "Eturnsray away ingstray escribingday ersionvay ofway ethay upportingsay oftwaresay."
+msgstr ""
+"Eturnsray away ingstray escribingday ersionvay ofway ethay upportingsay "
+"oftwaresay."
 
 #: src/code/bsd-os.lisp
 msgid "Unix system call getrusage failed: ~A."
@@ -37,4 +41,3 @@ msgstr "Emtway instructionway"
 #: src/code/signal.lisp
 msgid "Bad argument to system call"
 msgstr "Adbay argumentway otay ystemsay allcay"
-
diff --git a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-linux-os.po b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-linux-os.po
index 34c94e1b2..157eea45d 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-linux-os.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-linux-os.po
@@ -1,10 +1,12 @@
-#@ cmucl-linux-os
+# @ cmucl-linux-os
 # SOME DESCRIPTIVE TITLE
 # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR
 #
 #, fuzzy
 msgid ""
-msgstr "Project-Id-Version: CMUCL 20B\n"
+msgstr ""
+"Project-Id-Version: CMUCL 20B\n"
+"Report-Msgid-Bugs-To: \n"
 "PO-Revision-Date: YEAR-MO-DA HO:MI +ZONE\n"
 "Last-Translator: Automatic translation\n"
 "Language-Team: Pig Latin (auto-translated)\n"
@@ -16,7 +18,9 @@ msgstr "Project-Id-Version: CMUCL 20B\n"
 
 #: src/code/linux-os.lisp
 msgid "Returns a string describing version of the supporting software."
-msgstr "Eturnsray away ingstray escribingday ersionvay ofway ethay upportingsay oftwaresay."
+msgstr ""
+"Eturnsray away ingstray escribingday ersionvay ofway ethay upportingsay "
+"oftwaresay."
 
 #: src/code/linux-os.lisp
 msgid "Unix system call getrusage failed: ~A."
@@ -29,4 +33,3 @@ msgstr "Etpagesizegay ailedfay: ~Away"
 #: src/code/signal.lisp
 msgid "Stack fault on coprocessor"
 msgstr "Tacksay aultfay onway oprocessorcay"
-
diff --git a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-mp.po b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-mp.po
index 34f163334..5d9569b7f 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-mp.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-mp.po
@@ -1,10 +1,12 @@
-#@ cmucl-mp
+# @ cmucl-mp
 # SOME DESCRIPTIVE TITLE
 # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR
 #
 #, fuzzy
 msgid ""
-msgstr "Project-Id-Version: CMUCL 20B\n"
+msgstr ""
+"Project-Id-Version: CMUCL 20B\n"
+"Report-Msgid-Bugs-To: \n"
 "PO-Revision-Date: YEAR-MO-DA HO:MI +ZONE\n"
 "Last-Translator: Automatic translation\n"
 "Language-Team: Pig Latin (auto-translated)\n"
@@ -31,10 +33,10 @@ msgid "Return the run time in seconds"
 msgstr "Eturnray ethay unray imetay inway econdssay"
 
 #: src/code/multi-proc.lisp
-msgid ""
-"Return the process state which is either Run, Killed, or a wait reason."
+msgid "Return the process state which is either Run, Killed, or a wait reason."
 msgstr ""
-"Eturnray ethay ocesspray tatesay ichwhay isway eitherway Unray, Illedkay, orway away aitway easonray."
+"Eturnray ethay ocesspray tatesay ichwhay isway eitherway Unray, Illedkay, "
+"orway away aitway easonray."
 
 #: src/code/multi-proc.lisp
 msgid "Returns the current process."
@@ -54,11 +56,15 @@ msgstr "Executeway ethay odybay ethay edulingschay isabledday."
 
 #: src/code/multi-proc.lisp
 msgid "Increaments the reference by delta in a single atomic operation"
-msgstr "Increamentsway ethay eferenceray ybay eltaday inway away inglesay atomicway operationway"
+msgstr ""
+"Increamentsway ethay eferenceray ybay eltaday inway away inglesay atomicway "
+"operationway"
 
 #: src/code/multi-proc.lisp
 msgid "Decrements the reference by delta in a single atomic operation"
-msgstr "Ecrementsday ethay eferenceray ybay eltaday inway away inglesay atomicway operationway"
+msgstr ""
+"Ecrementsday ethay eferenceray ybay eltaday inway away inglesay atomicway "
+"operationway"
 
 #: src/code/multi-proc.lisp
 msgid "Atomically push object onto place."
@@ -76,78 +82,98 @@ msgid ""
 "  be restarted later with process-preset.\n"
 "\n"
 "  :NAME\n"
-"	A name for the process displayed in process listings.\n"
+"\tA name for the process displayed in process listings.\n"
 "\n"
 "  :RUN-REASONS\n"
-"	Initial value for process-run-reasons; defaults to (:ENABLE).  A\n"
-"	process needs a at least one run reason to be runnable.  Together with\n"
-"	arrest reasons, run reasons provide an alternative to process-wait for\n"
-"	controling whether or not a process is runnable.  To get the default\n"
-"	behavior of MAKE-PROCESS in Allegro Common Lisp, which is to create a\n"
-"	process which is active but not runnable, initialize RUN-REASONS to\n"
-"	NIL.\n"
+"\tInitial value for process-run-reasons; defaults to (:ENABLE).  A\n"
+"\tprocess needs a at least one run reason to be runnable.  Together with\n"
+"\tarrest reasons, run reasons provide an alternative to process-wait for\n"
+"\tcontroling whether or not a process is runnable.  To get the default\n"
+"\tbehavior of MAKE-PROCESS in Allegro Common Lisp, which is to create a\n"
+"\tprocess which is active but not runnable, initialize RUN-REASONS to\n"
+"\tNIL.\n"
 "\n"
 "  :ARREST-REASONS\n"
-"	Initial value for process-arrest-reasons; defaults to NIL.  A\n"
-"	process must have no arrest reasons in order to be runnable.\n"
+"\tInitial value for process-arrest-reasons; defaults to NIL.  A\n"
+"\tprocess must have no arrest reasons in order to be runnable.\n"
 "\n"
 "  :INITIAL-BINDINGS\n"
-"	An alist of initial special bindings for the process.  At\n"
-"	startup the new process has a fresh set of special bindings\n"
-"	with a default binding of *package* setup to the CL-USER\n"
-"	package.  INITIAL-BINDINGS specifies additional bindings for\n"
-"	the process.  The cdr of each alist element is evaluated in\n"
-"	the fresh dynamic environment and then bound to the car of the\n"
-"	element."
+"\tAn alist of initial special bindings for the process.  At\n"
+"\tstartup the new process has a fresh set of special bindings\n"
+"\twith a default binding of *package* setup to the CL-USER\n"
+"\tpackage.  INITIAL-BINDINGS specifies additional bindings for\n"
+"\tthe process.  The cdr of each alist element is evaluated in\n"
+"\tthe fresh dynamic environment and then bound to the car of the\n"
+"\telement."
 msgstr ""
-"Akemay away ocesspray ichwhay illway unray FUNCTION enwhay itway tartssay upway.  Ybay\n"
-"  efaultday ethay ocesspray isway eatedcray inway away unnableray (activeway) tatesay.\n"
-"  Ifway FUNCTION isway NIL, ethay ocesspray isway tartedsay inway away illedkay tatesay; itway aymay\n"
+"Akemay away ocesspray ichwhay illway unray FUNCTION enwhay itway tartssay "
+"upway.  Ybay\n"
+"  efaultday ethay ocesspray isway eatedcray inway away unnableray "
+"(activeway) tatesay.\n"
+"  Ifway FUNCTION isway NIL, ethay ocesspray isway tartedsay inway away "
+"illedkay tatesay; itway aymay\n"
 "  ebay estartedray aterlay ithway ocesspray-esetpray.\n"
 "\n"
 "  :NAME\n"
-"	Away amenay orfay ethay ocesspray isplayedday inway ocesspray istingslay.\n"
+"\tAway amenay orfay ethay ocesspray isplayedday inway ocesspray istingslay.\n"
 "\n"
 "  :RUN-REASONS\n"
-"	Initialway aluevay orfay ocesspray-unray-easonsray; efaultsday otay (:ENABLE).  Away\n"
-"	ocesspray eedsnay away atway eastlay oneway unray easonray otay ebay unnableray.  Ogethertay ithway\n"
-"	arrestway easonsray, unray easonsray ovidepray anway alternativeway otay ocesspray-aitway orfay\n"
-"	ontrolingcay etherwhay orway otnay away ocesspray isway unnableray.  Otay etgay ethay efaultday\n"
-"	ehaviorbay ofway MAKE-PROCESS inway Allegroway Ommoncay Isplay, ichwhay isway otay eatecray away\n"
-"	ocesspray ichwhay isway activeway utbay otnay unnableray, initializeway RUN-REASONS otay\n"
-"	NIL.\n"
+"\tInitialway aluevay orfay ocesspray-unray-easonsray; efaultsday otay (:"
+"ENABLE).  Away\n"
+"\tocesspray eedsnay away atway eastlay oneway unray easonray otay ebay "
+"unnableray.  Ogethertay ithway\n"
+"\tarrestway easonsray, unray easonsray ovidepray anway alternativeway otay "
+"ocesspray-aitway orfay\n"
+"\tontrolingcay etherwhay orway otnay away ocesspray isway unnableray.  Otay "
+"etgay ethay efaultday\n"
+"\tehaviorbay ofway MAKE-PROCESS inway Allegroway Ommoncay Isplay, ichwhay "
+"isway otay eatecray away\n"
+"\tocesspray ichwhay isway activeway utbay otnay unnableray, initializeway "
+"RUN-REASONS otay\n"
+"\tNIL.\n"
 "\n"
 "  :ARREST-REASONS\n"
-"	Initialway aluevay orfay ocesspray-arrestway-easonsray; efaultsday otay NIL.  Away\n"
-"	ocesspray ustmay avehay onay arrestway easonsray inway orderway otay ebay unnableray.\n"
+"\tInitialway aluevay orfay ocesspray-arrestway-easonsray; efaultsday otay "
+"NIL.  Away\n"
+"\tocesspray ustmay avehay onay arrestway easonsray inway orderway otay ebay "
+"unnableray.\n"
 "\n"
 "  :INITIAL-BINDINGS\n"
-"	Anway alistway ofway initialway ecialspay indingsbay orfay ethay ocesspray.  Atway\n"
-"	tartupsay ethay ewnay ocesspray ashay away eshfray etsay ofway ecialspay indingsbay\n"
-"	ithway away efaultday indingbay ofway *package* etupsay otay ethay CL-USER\n"
-"	ackagepay.  INITIAL-BINDINGS ecifiesspay additionalway indingsbay orfay\n"
-"	ethay ocesspray.  Ethay drcay ofway eachway alistway elementway isway evaluatedway inway\n"
-"	ethay eshfray ynamicday environmentway andway enthay oundbay otay ethay arcay ofway ethay\n"
-"	elementway."
+"\tAnway alistway ofway initialway ecialspay indingsbay orfay ethay "
+"ocesspray.  Atway\n"
+"\ttartupsay ethay ewnay ocesspray ashay away eshfray etsay ofway ecialspay "
+"indingsbay\n"
+"\tithway away efaultday indingbay ofway *package* etupsay otay ethay CL-"
+"USER\n"
+"\tackagepay.  INITIAL-BINDINGS ecifiesspay additionalway indingsbay orfay\n"
+"\tethay ocesspray.  Ethay drcay ofway eachway alistway elementway isway "
+"evaluatedway inway\n"
+"\tethay eshfray ynamicday environmentway andway enthay oundbay otay ethay "
+"arcay ofway ethay\n"
+"\telementway."
 
 #: src/code/multi-proc.lisp
 msgid "Interrupt process and cause it to evaluate function."
-msgstr "Interruptway ocesspray andway ausecay itway otay evaluateway unctionfay."
+msgstr ""
+"Interruptway ocesspray andway ausecay itway otay evaluateway unctionfay."
 
 #: src/code/multi-proc.lisp
 msgid ""
 "Destroy a process. The process is sent a interrupt which throws to\n"
 "  the end of the process allowing it to unwind gracefully."
 msgstr ""
-"Estroyday away ocesspray. Ethay ocesspray isway entsay away interruptway ichwhay rowsthay otay\n"
-"  ethay endway ofway ethay ocesspray allowingway itway otay unwindway acefullygray."
+"Estroyday away ocesspray. Ethay ocesspray isway entsay away interruptway "
+"ichwhay rowsthay otay\n"
+"  ethay endway ofway ethay ocesspray allowingway itway otay unwindway "
+"acefullygray."
 
 #: src/code/multi-proc.lisp
 msgid ""
 "Restart process by unwinding it to its initial state and calling its\n"
 "  initial function."
 msgstr ""
-"Estartray ocesspray ybay unwindingway itway otay itsway initialway tatesay andway allingcay itsway\n"
+"Estartray ocesspray ybay unwindingway itway otay itsway initialway tatesay "
+"andway allingcay itsway\n"
 "  initialway unctionfay."
 
 #: src/code/multi-proc.lisp
@@ -155,7 +181,8 @@ msgid ""
 "Restart process, unwinding it to its initial state and calls\n"
 "  function with args."
 msgstr ""
-"Estartray ocesspray, unwindingway itway otay itsway initialway tatesay andway allscay\n"
+"Estartray ocesspray, unwindingway itway otay itsway initialway tatesay "
+"andway allscay\n"
 "  unctionfay ithway argsway."
 
 #: src/code/multi-proc.lisp
@@ -164,7 +191,9 @@ msgstr "Isableday ocesspray omfray eingbay unnableray untilway enabledway."
 
 #: src/code/multi-proc.lisp
 msgid "Allow process to become runnable again after it has been disabled."
-msgstr "Allowway ocesspray otay ecomebay unnableray againway afterway itway ashay eenbay isabledday."
+msgstr ""
+"Allowway ocesspray otay ecomebay unnableray againway afterway itway ashay "
+"eenbay isabledday."
 
 #: src/code/multi-proc.lisp
 msgid ""
@@ -174,10 +203,14 @@ msgid ""
 "  times by the scheduler it should be relative fast native compiled code.\n"
 "  The single True predicate value is returned."
 msgstr ""
-"Ausescay ethay ocesspray otay aitway untilway edicatepray eturnsray Uetray. Ocessespray\n"
-"  ancay onlyway allcay ocesspray-aitway enwhay edulingschay isway enabledway, andway ethay edicatepray\n"
-"  ancay otnay allcay ocesspray-aitway. Incesay ethay edicatepray aymay ebay evaluatedway aymay\n"
-"  imestay ybay ethay edulerschay itway ouldshay ebay elativeray astfay ativenay ompiledcay odecay.\n"
+"Ausescay ethay ocesspray otay aitway untilway edicatepray eturnsray Uetray. "
+"Ocessespray\n"
+"  ancay onlyway allcay ocesspray-aitway enwhay edulingschay isway "
+"enabledway, andway ethay edicatepray\n"
+"  ancay otnay allcay ocesspray-aitway. Incesay ethay edicatepray aymay ebay "
+"evaluatedway aymay\n"
+"  imestay ybay ethay edulerschay itway ouldshay ebay elativeray astfay "
+"ativenay ompiledcay odecay.\n"
 "  Ethay inglesay Uetray edicatepray aluevay isway eturnedray."
 
 #: src/code/multi-proc.lisp
@@ -187,9 +220,12 @@ msgid ""
 "  be a fixnum or a float in seconds.  The single True predicate value is\n"
 "  returned, or NIL if the timeout was reached."
 msgstr ""
-"Ausescay ethay ocesspray otay aitway untilway edicatepray eturnsray Uetray, orway ethay\n"
-"  umbernay ofway econdssay ecifiedspay ybay imeouttay ashay elapsedway. Ethay imeouttay aymay\n"
-"  ebay away ixnumfay orway away oatflay inway econdssay.  Ethay inglesay Uetray edicatepray aluevay isway\n"
+"Ausescay ethay ocesspray otay aitway untilway edicatepray eturnsray Uetray, "
+"orway ethay\n"
+"  umbernay ofway econdssay ecifiedspay ybay imeouttay ashay elapsedway. "
+"Ethay imeouttay aymay\n"
+"  ebay away ixnumfay orway away oatflay inway econdssay.  Ethay inglesay "
+"Uetray edicatepray aluevay isway\n"
 "  eturnedray, orway NIL ifway ethay imeouttay asway eachedray."
 
 #: src/code/multi-proc.lisp
@@ -199,10 +235,14 @@ msgid ""
 "  currently necessary before a purify and is performed before a save-lisp.\n"
 "  Multi-processing can be restarted by calling init-multi-processing."
 msgstr ""
-"Ytray otay acefullygray estroyday allway ethay ocessespray ivinggay emthay omesay\n"
-"  ancechay otay unwindingway, eforebay uttingshay ownday ultimay-ocessingpray. Isthay isway\n"
-"  urrentlycay ecessarynay eforebay away urifypay andway isway erformedpay eforebay away avesay-isplay.\n"
-"  Ultimay-ocessingpray ancay ebay estartedray ybay allingcay initway-ultimay-ocessingpray."
+"Ytray otay acefullygray estroyday allway ethay ocessespray ivinggay emthay "
+"omesay\n"
+"  ancechay otay unwindingway, eforebay uttingshay ownday ultimay-"
+"ocessingpray. Isthay isway\n"
+"  urrentlycay ecessarynay eforebay away urifypay andway isway erformedpay "
+"eforebay away avesay-isplay.\n"
+"  Ultimay-ocessingpray ancay ebay estartedray ybay allingcay initway-ultimay-"
+"ocessingpray."
 
 #: src/code/multi-proc.lisp
 msgid "Destroyed ~d process; remaining ~d~%"
@@ -222,14 +262,22 @@ msgid ""
 "  exit gracefully destroying all the processes and giving them a chance\n"
 "  to unwind."
 msgstr ""
-"Anway idleway ooplay otay ebay unray ybay ethay initialway ocesspray. Ethay electsay asedbay eventway\n"
-"  erversay isway alledcay ithway away imeouttay alculatedcay omfray ethay inimummay ofway ethay\n"
-"  *idle-loop-timeout* andway ethay imetay otay ethay extnay ocesspray aitway imeouttay.\n"
-"  Otay avoidway isthay elayday enwhay erethay areway unnableray ocessespray ethay *idle-process*\n"
-"  ouldshay ebay etupsay otay ethay *initial-process*. Ifway oneway ofway ethay ocessespray itsquay\n"
-"  ybay rowingthay otay %endway-ofway-ethay-orldway enthay *quitting-lisp* illway avehay eenbay\n"
-"  etsay otay ethay exitway aluevay ichwhay isway otednay ybay ethay idleway ooplay ichwhay iestray otay\n"
-"  exitway acefullygray estroyingday allway ethay ocessespray andway ivinggay emthay away ancechay\n"
+"Anway idleway ooplay otay ebay unray ybay ethay initialway ocesspray. Ethay "
+"electsay asedbay eventway\n"
+"  erversay isway alledcay ithway away imeouttay alculatedcay omfray ethay "
+"inimummay ofway ethay\n"
+"  *idle-loop-timeout* andway ethay imetay otay ethay extnay ocesspray aitway "
+"imeouttay.\n"
+"  Otay avoidway isthay elayday enwhay erethay areway unnableray ocessespray "
+"ethay *idle-process*\n"
+"  ouldshay ebay etupsay otay ethay *initial-process*. Ifway oneway ofway "
+"ethay ocessespray itsquay\n"
+"  ybay rowingthay otay %endway-ofway-ethay-orldway enthay *quitting-lisp* "
+"illway avehay eenbay\n"
+"  etsay otay ethay exitway aluevay ichwhay isway otednay ybay ethay idleway "
+"ooplay ichwhay iestray otay\n"
+"  exitway acefullygray estroyingday allway ethay ocessespray andway ivinggay "
+"emthay away ancechay\n"
 "  otay unwindway."
 
 #: src/code/multi-proc.lisp
@@ -241,15 +289,18 @@ msgid ""
 "Return the accrued real time elapsed while the given process was\n"
 "  scheduled. The returned time is a double-float in seconds."
 msgstr ""
-"Eturnray ethay accruedway ealray imetay elapsedway ilewhay ethay ivengay ocesspray asway\n"
-"  eduledschay. Ethay eturnedray imetay isway away oubleday-oatflay inway econdssay."
+"Eturnray ethay accruedway ealray imetay elapsedway ilewhay ethay ivengay "
+"ocesspray asway\n"
+"  eduledschay. Ethay eturnedray imetay isway away oubleday-oatflay inway "
+"econdssay."
 
 #: src/code/multi-proc.lisp
 msgid ""
 "Return the accrued run time elapsed for the given process. The returned\n"
 "  time is a double-float in seconds."
 msgstr ""
-"Eturnray ethay accruedway unray imetay elapsedway orfay ethay ivengay ocesspray. Ethay eturnedray\n"
+"Eturnray ethay accruedway unray imetay elapsedway orfay ethay ivengay "
+"ocesspray. Ethay eturnedray\n"
 "  imetay isway away oubleday-oatflay inway econdssay."
 
 #: src/code/multi-proc.lisp
@@ -257,8 +308,10 @@ msgid ""
 "Return the real time elapsed since the given process was last\n"
 "  descheduled. The returned time is a double-float in seconds."
 msgstr ""
-"Eturnray ethay ealray imetay elapsedway incesay ethay ivengay ocesspray asway astlay\n"
-"  escheduledday. Ethay eturnedray imetay isway away oubleday-oatflay inway econdssay."
+"Eturnray ethay ealray imetay elapsedway incesay ethay ivengay ocesspray "
+"asway astlay\n"
+"  escheduledday. Ethay eturnedray imetay isway away oubleday-oatflay inway "
+"econdssay."
 
 #: src/code/multi-proc.lisp
 msgid ""
@@ -266,9 +319,12 @@ msgid ""
 "  time in seconds and micro seconds may be provided. Note that CMUCL code\n"
 "  base is not too interrupt safe so this may cause problems."
 msgstr ""
-"Tartsay away egularray SIGALRM interruptway ichwhay allscay ocesspray-ieldyay. Anway optionalway\n"
-"  imetay inway econdssay andway icromay econdssay aymay ebay ovidedpray. Otenay atthay CMUCL odecay\n"
-"  asebay isway otnay ootay interruptway afesay osay isthay aymay ausecay oblemspray."
+"Tartsay away egularray SIGALRM interruptway ichwhay allscay ocesspray-"
+"ieldyay. Anway optionalway\n"
+"  imetay inway econdssay andway icromay econdssay aymay ebay ovidedpray. "
+"Otenay atthay CMUCL odecay\n"
+"  asebay isway otnay ootay interruptway afesay osay isthay aymay ausecay "
+"oblemspray."
 
 #: src/code/multi-proc.lisp
 msgid ""
@@ -277,9 +333,10 @@ msgid ""
 "to\n"
 "  wait before giving up and returing NIL."
 msgstr ""
-"Aitway untilway FD isway usableway orfay DIRECTION andway eturnray Uetray. DIRECTION ouldshay ebay\n"
-"  eitherway :INPUT orway :OUTPUT. TIMEOUT, ifway uppliedsay, isway ethay umbernay ofway econdssay "
-"otay\n"
+"Aitway untilway FD isway usableway orfay DIRECTION andway eturnray Uetray. "
+"DIRECTION ouldshay ebay\n"
+"  eitherway :INPUT orway :OUTPUT. TIMEOUT, ifway uppliedsay, isway ethay "
+"umbernay ofway econdssay otay\n"
 "  aitway eforebay ivinggay upway andway eturingray NIL."
 
 #: src/code/multi-proc.lisp
@@ -287,7 +344,8 @@ msgid ""
 "This function causes execution to be suspended for N seconds.  N may\n"
 "  be any non-negative, non-complex number."
 msgstr ""
-"Isthay unctionfay ausescay executionway otay ebay uspendedsay orfay N econdssay.  N aymay\n"
+"Isthay unctionfay ausescay executionway otay ebay uspendedsay orfay N "
+"econdssay.  N aymay\n"
 "  ebay anyway onnay-egativenay, onnay-omplexcay umbernay."
 
 #: src/code/multi-proc.lisp
@@ -296,8 +354,10 @@ msgid ""
 "  the execution takes longer than timeout seconds, abort it and evaluate\n"
 "  timeout-forms, returning the values of last form."
 msgstr ""
-"Executesway odybay andway eturnsray ethay aluesvay ofway ethay astlay ormfay inway odybay. Oweverhay, ifway\n"
-"  ethay executionway akestay ongerlay anthay imeouttay econdssay, abortway itway andway evaluateway\n"
+"Executesway odybay andway eturnsray ethay aluesvay ofway ethay astlay ormfay "
+"inway odybay. Oweverhay, ifway\n"
+"  ethay executionway akestay ongerlay anthay imeouttay econdssay, abortway "
+"itway andway evaluateway\n"
 "  imeouttay-ormsfay, eturningray ethay aluesvay ofway astlay ormfay."
 
 #: src/code/multi-proc.lisp
@@ -306,8 +366,10 @@ msgid ""
 "  verbose argument is true then the run, real, and idle times are also\n"
 "  shown."
 msgstr ""
-"Owshay ethay allway ethay ocessespray, eirthay ostatewhay, andway tatesay. Ifway ethay optionalway\n"
-"  erbosevay argumentway isway uetray enthay ethay unray, ealray, andway idleway imestay areway alsoway\n"
+"Owshay ethay allway ethay ocessespray, eirthay ostatewhay, andway tatesay. "
+"Ifway ethay optionalway\n"
+"  erbosevay argumentway isway uetray enthay ethay unray, ealray, andway "
+"idleway imestay areway alsoway\n"
 "  ownshay."
 
 #: src/code/multi-proc.lisp
@@ -324,12 +386,14 @@ msgid ""
 "the\n"
 "  default when there is better MP debug support etc."
 msgstr ""
-"Enterway ethay idleway ooplay, tartingsay away ewnay ocesspray otay unray ethay optay evellay ooplay.\n"
-"  Ethay awakingway ofway eepingslay ocessespray isway imedtay etterbay ithway ethay idleway ooplay "
-"ocesspray\n"
-"  unningray, andway tartingsay away ewnay ocesspray orfay ethay optay evellay ooplay upportssay away\n"
-"  imultaneoussay interactiveway essionsay. Uchsay anway initialisationway illway ikelylay ebay "
-"ethay\n"
+"Enterway ethay idleway ooplay, tartingsay away ewnay ocesspray otay unray "
+"ethay optay evellay ooplay.\n"
+"  Ethay awakingway ofway eepingslay ocessespray isway imedtay etterbay "
+"ithway ethay idleway ooplay ocesspray\n"
+"  unningray, andway tartingsay away ewnay ocesspray orfay ethay optay "
+"evellay ooplay upportssay away\n"
+"  imultaneoussay interactiveway essionsay. Uchsay anway initialisationway "
+"illway ikelylay ebay ethay\n"
 "  efaultday enwhay erethay isway etterbay MP ebugday upportsay etcway."
 
 #: src/code/multi-proc.lisp
@@ -340,10 +404,14 @@ msgid ""
 "  performed for the first free port starting at the given port which\n"
 "  defaults to 1025."
 msgstr ""
-"Eatecray away Isplay onnectioncay istenerlay, isteninglay onway away TCP ortpay orfay ewnay\n"
-"  onnectionscay andway tartingsay away ewnay optay-evellay ooplay orfay eachway. Ifway away asswordpay\n"
-"  isway otnay ivengay enthay oneway illway ebay eneratedgay andway eportedray.  Away earchsay isway\n"
-"  erformedpay orfay ethay irstfay eefray ortpay tartingsay atway ethay ivengay ortpay ichwhay\n"
+"Eatecray away Isplay onnectioncay istenerlay, isteninglay onway away TCP "
+"ortpay orfay ewnay\n"
+"  onnectionscay andway tartingsay away ewnay optay-evellay ooplay orfay "
+"eachway. Ifway away asswordpay\n"
+"  isway otnay ivengay enthay oneway illway ebay eneratedgay andway "
+"eportedray.  Away earchsay isway\n"
+"  erformedpay orfay ethay irstfay eefray ortpay tartingsay atway ethay "
+"ivengay ortpay ichwhay\n"
 "  efaultsday otay 1025."
 
 #: src/code/multi-proc.lisp
@@ -356,11 +424,17 @@ msgid ""
 "  reached. When the wait key is NIL and the lock is held by another\n"
 "  process then NIL is return immediately without processing the body."
 msgstr ""
-"Executeway ethay odybay ithway ethay ocklay eldhay. Ifway ethay ocklay isway eldhay ybay anotherway\n"
-"  ocesspray enthay ethay urrentcay ocesspray aitsway untilway ethay ocklay isway eleasedray orway\n"
-"  anway optionalway imeouttay isway eachedray. Ethay optionalway aitway imeouttay isway away imetay inway\n"
-"  econdssay acceptableway otay ocesspray-aitway-ithway-imeouttay.  Ethay esultsray ofway ethay\n"
-"  odybay areway eturnray uponway uccesssay andway NIL isway eturnray ifway ethay imeouttay isway\n"
-"  eachedray. Enwhay ethay aitway eykay isway NIL andway ethay ocklay isway eldhay ybay anotherway\n"
-"  ocesspray enthay NIL isway eturnray immediatelyway ithoutway ocessingpray ethay odybay."
-
+"Executeway ethay odybay ithway ethay ocklay eldhay. Ifway ethay ocklay isway "
+"eldhay ybay anotherway\n"
+"  ocesspray enthay ethay urrentcay ocesspray aitsway untilway ethay ocklay "
+"isway eleasedray orway\n"
+"  anway optionalway imeouttay isway eachedray. Ethay optionalway aitway "
+"imeouttay isway away imetay inway\n"
+"  econdssay acceptableway otay ocesspray-aitway-ithway-imeouttay.  Ethay "
+"esultsray ofway ethay\n"
+"  odybay areway eturnray uponway uccesssay andway NIL isway eturnray ifway "
+"ethay imeouttay isway\n"
+"  eachedray. Enwhay ethay aitway eykay isway NIL andway ethay ocklay isway "
+"eldhay ybay anotherway\n"
+"  ocesspray enthay NIL isway eturnray immediatelyway ithoutway ocessingpray "
+"ethay odybay."
diff --git a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sparc-svr4.po b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sparc-svr4.po
index 6bf16794f..cd9aebead 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sparc-svr4.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sparc-svr4.po
@@ -1,10 +1,12 @@
-#@ cmucl-sparc-svr4
+# @ cmucl-sparc-svr4
 # SOME DESCRIPTIVE TITLE
 # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR
 #
 #, fuzzy
 msgid ""
-msgstr "Project-Id-Version: CMUCL 20B\n"
+msgstr ""
+"Project-Id-Version: CMUCL 20B\n"
+"Report-Msgid-Bugs-To: \n"
 "PO-Revision-Date: YEAR-MO-DA HO:MI +ZONE\n"
 "Last-Translator: Automatic translation\n"
 "Language-Team: Pig Latin (auto-translated)\n"
@@ -16,11 +18,15 @@ msgstr "Project-Id-Version: CMUCL 20B\n"
 
 #: src/code/sparc-svr4-vm.lisp
 msgid "Returns a string describing the type of the local machine."
-msgstr "Eturnsray away ingstray escribingday ethay ypetay ofway ethay ocallay achinemay."
+msgstr ""
+"Eturnsray away ingstray escribingday ethay ypetay ofway ethay ocallay "
+"achinemay."
 
 #: src/code/sparc-svr4-vm.lisp
 msgid "Returns a string describing the version of the local machine."
-msgstr "Eturnsray away ingstray escribingday ethay ersionvay ofway ethay ocallay achinemay."
+msgstr ""
+"Eturnsray away ingstray escribingday ethay ersionvay ofway ethay ocallay "
+"achinemay."
 
 #: src/code/sparc-svr4-vm.lisp
 msgid "Unaligned instruction?  offset=#x~X."
@@ -32,7 +38,9 @@ msgstr "Ancay't ealday ithway CALL ixupsfay, etyay."
 
 #: src/code/sparc-svr4-vm.lisp
 msgid "XRS ID invalid but attempting to access double-float register ~d!"
-msgstr "XRS ID invalidway utbay attemptingway otay accessway oubleday-oatflay egisterray ~d!"
+msgstr ""
+"XRS ID invalidway utbay attemptingway otay accessway oubleday-oatflay "
+"egisterray ~d!"
 
 #: src/code/signal.lisp
 msgid "Emt instruction"
@@ -69,4 +77,3 @@ msgstr "Eakpointbray atthay obodynay antsway?"
 #: src/code/debug-int.lisp
 msgid "BREAKPOINT-DO-DISPLACED-INST returned?"
 msgstr "BREAKPOINT-DO-DISPLACED-INST eturnedray?"
-
diff --git a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sparc-vm.po b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sparc-vm.po
index d1f586f7b..c5ad3ffbd 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sparc-vm.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sparc-vm.po
@@ -1,10 +1,12 @@
-#@ cmucl-sparc-vm
+# @ cmucl-sparc-vm
 # SOME DESCRIPTIVE TITLE
 # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR
 #
 #, fuzzy
 msgid ""
-msgstr "Project-Id-Version: CMUCL 20B\n"
+msgstr ""
+"Project-Id-Version: CMUCL 20B\n"
+"Report-Msgid-Bugs-To: \n"
 "PO-Revision-Date: YEAR-MO-DA HO:MI +ZONE\n"
 "Last-Translator: Automatic translation\n"
 "Language-Team: Pig Latin (auto-translated)\n"
@@ -16,13 +18,16 @@ msgstr "Project-Id-Version: CMUCL 20B\n"
 
 #: src/compiler/sparc/parms.lisp
 msgid "Number of bits per word where a word holds one lisp descriptor."
-msgstr "Umbernay ofway itsbay erpay ordway erewhay away ordway oldshay oneway isplay escriptorday."
+msgstr ""
+"Umbernay ofway itsbay erpay ordway erewhay away ordway oldshay oneway isplay "
+"escriptorday."
 
 #: src/compiler/sparc/parms.lisp
 msgid ""
 "Number of bits per byte where a byte is the smallest addressable object."
 msgstr ""
-"Umbernay ofway itsbay erpay ytebay erewhay away ytebay isway ethay mallestsay addressableway objectway."
+"Umbernay ofway itsbay erpay ytebay erewhay away ytebay isway ethay "
+"mallestsay addressableway objectway."
 
 #: src/compiler/sparc/parms.lisp
 msgid "Number of bits needed to represent a character"
@@ -34,7 +39,9 @@ msgstr "Umbernay ofway ytesbay eedednay otay epresentray away aracterchay"
 
 #: src/compiler/sparc/parms.lisp
 msgid "Number of bits to shift between word addresses and byte addresses."
-msgstr "Umbernay ofway itsbay otay iftshay etweenbay ordway addressesway andway ytebay addressesway."
+msgstr ""
+"Umbernay ofway itsbay otay iftshay etweenbay ordway addressesway andway "
+"ytebay addressesway."
 
 #: src/compiler/sparc/parms.lisp
 msgid "Number of bytes in a word."
@@ -42,7 +49,9 @@ msgstr "Umbernay ofway ytesbay inway away ordway."
 
 #: src/compiler/sparc/parms.lisp
 msgid "Number of bits at the low end of a pointer used for type information."
-msgstr "Umbernay ofway itsbay atway ethay owlay endway ofway away ointerpay usedway orfay ypetay informationway."
+msgstr ""
+"Umbernay ofway itsbay atway ethay owlay endway ofway away ointerpay usedway "
+"orfay ypetay informationway."
 
 #: src/compiler/sparc/parms.lisp
 msgid "Mask to extract the low tag bits from a pointer."
@@ -53,7 +62,8 @@ msgid ""
 "Exclusive upper bound on the value of the low tag bits from a\n"
 "  pointer."
 msgstr ""
-"Exclusiveway upperway oundbay onway ethay aluevay ofway ethay owlay agtay itsbay omfray away\n"
+"Exclusiveway upperway oundbay onway ethay aluevay ofway ethay owlay agtay "
+"itsbay omfray away\n"
 "  ointerpay."
 
 #: src/compiler/sparc/parms.lisp
@@ -81,7 +91,8 @@ msgid ""
 "If non-NIL, print registers using the Lisp register names.\n"
 "Otherwise, use the Sparc register names"
 msgstr ""
-"Ifway onnay-NIL, intpray egistersray usingway ethay Isplay egisterray amesnay.\n"
+"Ifway onnay-NIL, intpray egistersray usingway ethay Isplay egisterray "
+"amesnay.\n"
 "Otherwiseway, useway ethay Arcspay egisterray amesnay"
 
 #: src/compiler/sparc/array.lisp src/compiler/sparc/call.lisp
@@ -108,8 +119,10 @@ msgid ""
 "value used in a SETHI instruction.  This is used to make annotations\n"
 "about function addresses and register values."
 msgstr ""
-"Anway alistway orfay ethay isassemblerday indicatingway ethay argettay egisterray andway\n"
-"aluevay usedway inway away SETHI instructionway.  Isthay isway usedway otay akemay annotationsway\n"
+"Anway alistway orfay ethay isassemblerday indicatingway ethay argettay "
+"egisterray andway\n"
+"aluevay usedway inway away SETHI instructionway.  Isthay isway usedway otay "
+"akemay annotationsway\n"
 "aboutway unctionfay addressesway andway egisterray aluesvay."
 
 #: src/compiler/sparc/insts.lisp
@@ -185,7 +198,8 @@ msgid ""
 "Immediate trap number ~A specified, but only trap numbers\n"
 "   16 to 31 are available to the application"
 msgstr ""
-"Immediateway aptray umbernay ~Away ecifiedspay, utbay onlyway aptray umbersnay\n"
+"Immediateway aptray umbernay ~Away ecifiedspay, utbay onlyway aptray "
+"umbersnay\n"
 "   16 otay 31 areway availableway otay ethay applicationway"
 
 #: src/compiler/sparc/macros.lisp
@@ -197,12 +211,15 @@ msgid ""
 "Loads the type bits of a pointer into target independent of\n"
 "  byte-ordering issues."
 msgstr ""
-"Oadslay ethay ypetay itsbay ofway away ointerpay intoway argettay independentway ofway\n"
+"Oadslay ethay ypetay itsbay ofway away ointerpay intoway argettay "
+"independentway ofway\n"
 "  ytebay-orderingway issuesway."
 
 #: src/compiler/sparc/macros.lisp
 msgid "Jump to the lisp function FUNCTION.  LIP is an interior-reg temporary."
-msgstr "Umpjay otay ethay isplay unctionfay FUNCTION.  LIP isway anway interiorway-egray emporarytay."
+msgstr ""
+"Umpjay otay ethay isplay unctionfay FUNCTION.  LIP isway anway interiorway-"
+"egray emporarytay."
 
 #: src/compiler/sparc/macros.lisp
 msgid "Return to RETURN-PC."
@@ -210,15 +227,16 @@ msgstr "Eturnray otay RETURN-PC."
 
 #: src/compiler/sparc/macros.lisp
 msgid ""
-"Emit a return-pc header word.  LABEL is the label to use for this "
-"return-pc."
+"Emit a return-pc header word.  LABEL is the label to use for this return-pc."
 msgstr ""
-"Emitway away eturnray-cpay eaderhay ordway.  LABEL isway ethay abellay otay useway orfay isthay "
-"eturnray-cpay."
+"Emitway away eturnray-cpay eaderhay ordway.  LABEL isway ethay abellay otay "
+"useway orfay isthay eturnray-cpay."
 
 #: src/compiler/sparc/macros.lisp
 msgid "Move the TN Reg-Or-Stack into Reg if it isn't already there."
-msgstr "Ovemay ethay TN Egray-Orway-Tacksay intoway Egray ifway itway isnway't alreadyway erethay."
+msgstr ""
+"Ovemay ethay TN Egray-Orway-Tacksay intoway Egray ifway itway isnway't "
+"alreadyway erethay."
 
 #: src/compiler/sparc/macros.lisp
 msgid ""
@@ -226,16 +244,18 @@ msgid ""
 "  word header having the specified Type-Code.  The result is placed in\n"
 "  Result-TN, and Temp-TN is a non-descriptor temp (which may be randomly "
 "used\n"
-"  by the body.)  The body is placed inside the PSEUDO-ATOMIC, and presumably"
-"\n"
+"  by the body.)  The body is placed inside the PSEUDO-ATOMIC, and "
+"presumably\n"
 "  initializes the object."
 msgstr ""
-"Oday tuffsay otay allocateway anway otherway-ointerpay objectway ofway ixedfay Izesay ithway away inglesay\n"
-"  ordway eaderhay avinghay ethay ecifiedspay Ypetay-Odecay.  Ethay esultray isway acedplay inway\n"
-"  Esultray-TN, andway Emptay-TN isway away onnay-escriptorday emptay (ichwhay aymay ebay andomlyray "
-"usedway\n"
-"  ybay ethay odybay.)  Ethay odybay isway acedplay insideway ethay PSEUDO-ATOMIC, andway esumablypray"
-"\n"
+"Oday tuffsay otay allocateway anway otherway-ointerpay objectway ofway "
+"ixedfay Izesay ithway away inglesay\n"
+"  ordway eaderhay avinghay ethay ecifiedspay Ypetay-Odecay.  Ethay esultray "
+"isway acedplay inway\n"
+"  Esultray-TN, andway Emptay-TN isway away onnay-escriptorday emptay "
+"(ichwhay aymay ebay andomlyray usedway\n"
+"  ybay ethay odybay.)  Ethay odybay isway acedplay insideway ethay PSEUDO-"
+"ATOMIC, andway esumablypray\n"
 "  initializesway ethay objectway."
 
 #: src/compiler/sparc/macros.lisp
@@ -251,10 +271,12 @@ msgid "~S isn't an even multiple of ~S from ~S"
 msgstr "~S isnway't anway evenway ultiplemay ofway ~S omfray ~S"
 
 #: src/compiler/sparc/macros.lisp
-msgid "The values ~S cover the entire range from ~\n"
-"			 ~S to ~S [step ~S]."
-msgstr "Ethay aluesvay ~S overcay ethay entireway angeray omfray ~\n"
-"			 ~S otay ~S [tepsay ~S]."
+msgid ""
+"The values ~S cover the entire range from ~\n"
+"\t\t\t ~S to ~S [step ~S]."
+msgstr ""
+"Ethay aluesvay ~S overcay ethay entireway angeray omfray ~\n"
+"\t\t\t ~S otay ~S [tepsay ~S]."
 
 #: src/compiler/sparc/macros.lisp
 msgid "Must supply at least on type for test-type."
@@ -269,10 +291,12 @@ msgid "OTHER-IMMEDIATE-n-TYPE supersedes the use of ~S"
 msgstr "OTHER-IMMEDIATE-n-TYPE upersedessay ethay useway ofway ~S"
 
 #: src/compiler/sparc/macros.lisp
-msgid "Can't test for mix of function subtypes and normal ~\n"
-"		header types."
-msgstr "Ancay't esttay orfay ixmay ofway unctionfay ubtypessay andway ormalnay ~\n"
-"		eaderhay ypestay."
+msgid ""
+"Can't test for mix of function subtypes and normal ~\n"
+"\t\theader types."
+msgstr ""
+"Ancay't esttay orfay ixmay ofway unctionfay ubtypessay andway ormalnay ~\n"
+"\t\teaderhay ypestay."
 
 #: src/compiler/sparc/macros.lisp
 msgid "Cause an error.  ERROR-CODE is the error to cause."
@@ -283,7 +307,8 @@ msgid ""
 "Cause a continuable error.  If the error is continued, execution resumes at\n"
 "  LABEL."
 msgstr ""
-"Ausecay away ontinuablecay errorway.  Ifway ethay errorway isway ontinuedcay, executionway esumesray atway\n"
+"Ausecay away ontinuablecay errorway.  Ifway ethay errorway isway "
+"ontinuedcay, executionway esumesray atway\n"
 "  LABEL."
 
 #: src/compiler/sparc/macros.lisp
@@ -292,7 +317,8 @@ msgid ""
 "  Emit code for an error with the specified Error-Code and context Values."
 msgstr ""
 "Enerategay-Errorway-Odecay Errorway-odecay Alue*Vay\n"
-"  Emitway odecay orfay anway errorway ithway ethay ecifiedspay Errorway-Odecay andway ontextcay Aluesvay."
+"  Emitway odecay orfay anway errorway ithway ethay ecifiedspay Errorway-"
+"Odecay andway ontextcay Aluesvay."
 
 #: src/compiler/sparc/macros.lisp
 msgid ""
@@ -302,8 +328,10 @@ msgid ""
 "  the GENERATE-CERROR-CODE form."
 msgstr ""
 "Enerategay-Errorcay-Odecay Errorway-odecay Alue*Vay\n"
-"  Emitway odecay orfay away ontinuablecay errorway ithway ethay ecifiedspay Errorway-Odecay andway\n"
-"  ontextcay Aluesvay.  Ifway ethay errorway isway ontinuedcay, executionway esumesray afterway\n"
+"  Emitway odecay orfay away ontinuablecay errorway ithway ethay ecifiedspay "
+"Errorway-Odecay andway\n"
+"  ontextcay Aluesvay.  Ifway ethay errorway isway ontinuedcay, executionway "
+"esumesray afterway\n"
 "  ethay GENERATE-CERROR-CODE ormfay."
 
 #: src/compiler/sparc/move.lisp
@@ -317,10 +345,11 @@ msgstr "onstantcay oadlay"
 #: src/compiler/sparc/move.lisp
 msgid ""
 "Load TN allocated, but no move function?~@\n"
-"	           VM definition inconsistent, recompile and try again."
+"\t           VM definition inconsistent, recompile and try again."
 msgstr ""
 "Oadlay TN allocatedway, utbay onay ovemay unctionfay?~@\n"
-"	           VM efinitionday inconsistentway, ecompileray andway ytray againway."
+"\t           VM efinitionday inconsistentway, ecompileray andway ytray "
+"againway."
 
 #: src/compiler/sparc/move.lisp
 msgid "integer to untagged word coercion"
@@ -608,8 +637,10 @@ msgid ""
 "64-bit counter is returned as two 32-bit unsigned integers.  The low 32-bit\n"
 "result is the first value."
 msgstr ""
-"Eadray ethay instructionway yclecay ountercay availableway onway Ultrasparcsway.  Ethay\n"
-"64-itbay ountercay isway eturnedray asway wotay 32-itbay unsignedway integersway.  Ethay owlay 32-itbay\n"
+"Eadray ethay instructionway yclecay ountercay availableway onway "
+"Ultrasparcsway.  Ethay\n"
+"64-itbay ountercay isway eturnedray asway wotay 32-itbay unsignedway "
+"integersway.  Ethay owlay 32-itbay\n"
 "esultray isway ethay irstfay aluevay."
 
 #: src/compiler/sparc/char.lisp
@@ -634,7 +665,9 @@ msgstr "inlineway omparisoncay"
 
 #: src/compiler/sparc/static-fn.lisp
 msgid "Either too many args (~D) or too many results (~D).  Max = ~D"
-msgstr "Eitherway ootay anymay argsway (~D) orway ootay anymay esultsray (~D).  Axmay = ~D"
+msgstr ""
+"Eitherway ootay anymay argsway (~D) orway ootay anymay esultsray (~D).  "
+"Axmay = ~D"
 
 #: src/compiler/sparc/arith.lisp
 msgid "inline fixnum arithmetic"
@@ -722,8 +755,10 @@ msgid ""
 "  in RESULT-HIGH and RESULT-LOW.  KIND is either :signed or :unsigned.\n"
 "  Note: the lifetimes of MULTIPLICAND and RESULT-HIGH overlap."
 msgstr ""
-"Emitway odecay otay ultiplymay MULTIPLIER ithway MULTIPLICAND, uttingpay ethay esultray\n"
-"  inway RESULT-HIGH andway RESULT-LOW.  KIND isway eitherway :ignedsay orway :unsignedway.\n"
+"Emitway odecay otay ultiplymay MULTIPLIER ithway MULTIPLICAND, uttingpay "
+"ethay esultray\n"
+"  inway RESULT-HIGH andway RESULT-LOW.  KIND isway eitherway :ignedsay "
+"orway :unsignedway.\n"
 "  Otenay: ethay ifetimeslay ofway MULTIPLICAND andway RESULT-HIGH overlapway."
 
 #: src/compiler/sparc/arith.lisp
@@ -763,7 +798,8 @@ msgid ""
 "Cons up a piece of code which calls call-callback with INDEX and a\n"
 "pointer to the arguments."
 msgstr ""
-"Onscay upway away iecepay ofway odecay ichwhay allscay allcay-allbackcay ithway INDEX andway away\n"
+"Onscay upway away iecepay ofway odecay ichwhay allscay allcay-allbackcay "
+"ithway INDEX andway away\n"
 "ointerpay otay ethay argumentsway."
 
 #: src/compiler/sparc/call.lisp
@@ -785,4 +821,3 @@ msgstr "awray-itsbay VOP"
 #: src/compiler/sparc/array.lisp
 msgid "setf raw-bits VOP"
 msgstr "etfsay awray-itsbay VOP"
-
diff --git a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sse2.po b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sse2.po
index 4f168aac3..9208bbc85 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sse2.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sse2.po
@@ -1,10 +1,12 @@
-#@ cmucl-sse2
+# @ cmucl-sse2
 # SOME DESCRIPTIVE TITLE
 # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR
 #
 #, fuzzy
 msgid ""
-msgstr "Project-Id-Version: CMUCL 20B\n"
+msgstr ""
+"Project-Id-Version: CMUCL 20B\n"
+"Report-Msgid-Bugs-To: \n"
 "PO-Revision-Date: YEAR-MO-DA HO:MI +ZONE\n"
 "Last-Translator: Automatic translation\n"
 "Language-Team: Pig Latin (auto-translated)\n"
@@ -34,10 +36,11 @@ msgstr "oatflay otay ointerpay oercioncay"
 #: src/compiler/x86/float-sse2.lisp
 msgid ""
 "Load TN allocated, but no move function?~@\n"
-"	           VM definition inconsistent, recompile and try again."
+"\t           VM definition inconsistent, recompile and try again."
 msgstr ""
 "Oadlay TN allocatedway, utbay onay ovemay unctionfay?~@\n"
-"	           VM efinitionday inconsistentway, ecompileray andway ytray againway."
+"\t           VM efinitionday inconsistentway, ecompileray andway ytray "
+"againway."
 
 #: src/compiler/x86/float-sse2.lisp
 msgid "pointer to float coercion"
@@ -142,4 +145,3 @@ msgstr "inlineway omplexcay oatflay arithmeticway"
 #: src/compiler/x86/float-sse2.lisp
 msgid "inline complex float/float arithmetic"
 msgstr "inlineway omplexcay oatflay/oatflay arithmeticway"
-
diff --git a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sunos-os.po b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sunos-os.po
index efec0abd0..71976300c 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sunos-os.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-sunos-os.po
@@ -1,10 +1,12 @@
-#@ cmucl-sunos-os
+# @ cmucl-sunos-os
 # SOME DESCRIPTIVE TITLE
 # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR
 #
 #, fuzzy
 msgid ""
-msgstr "Project-Id-Version: CMUCL 20B\n"
+msgstr ""
+"Project-Id-Version: CMUCL 20B\n"
+"Report-Msgid-Bugs-To: \n"
 "PO-Revision-Date: YEAR-MO-DA HO:MI +ZONE\n"
 "Last-Translator: Automatic translation\n"
 "Language-Team: Pig Latin (auto-translated)\n"
@@ -20,9 +22,10 @@ msgstr "Ersionvay ingstray orfay upportingsay oftwaresay"
 
 #: src/code/sunos-os.lisp
 msgid "Returns a string describing version of the supporting software."
-msgstr "Eturnsray away ingstray escribingday ersionvay ofway ethay upportingsay oftwaresay."
+msgstr ""
+"Eturnsray away ingstray escribingday ersionvay ofway ethay upportingsay "
+"oftwaresay."
 
 #: src/code/sunos-os.lisp
 msgid "Getpagesize failed: ~A"
 msgstr "Etpagesizegay ailedfay: ~Away"
-
diff --git a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-unix-glibc2.po b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-unix-glibc2.po
index 2ac4fc5a6..58df66eac 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-unix-glibc2.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-unix-glibc2.po
@@ -1,10 +1,12 @@
-#@ cmucl-unix-glibc2
+# @ cmucl-unix-glibc2
 # SOME DESCRIPTIVE TITLE
 # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR
 #
 #, fuzzy
 msgid ""
-msgstr "Project-Id-Version: CMUCL 20B\n"
+msgstr ""
+"Project-Id-Version: CMUCL 20B\n"
+"Report-Msgid-Bugs-To: \n"
 "PO-Revision-Date: YEAR-MO-DA HO:MI +ZONE\n"
 "Last-Translator: Automatic translation\n"
 "Language-Team: Pig Latin (auto-translated)\n"
@@ -23,7 +25,8 @@ msgid ""
 "Returns a string describing the error number which was returned by a\n"
 "  UNIX system call."
 msgstr ""
-"Eturnsray away ingstray escribingday ethay errorway umbernay ichwhay asway eturnedray ybay away\n"
+"Eturnsray away ingstray escribingday ethay errorway umbernay ichwhay asway "
+"eturnedray ybay away\n"
 "  UNIX ystemsay allcay."
 
 #: src/code/unix-glibc2.lisp
@@ -35,8 +38,10 @@ msgid ""
 "Unix-rename renames the file with string name1 to the string\n"
 "   name2.  NIL and an error code is returned if an error occured."
 msgstr ""
-"Unixway-enameray enamesray ethay ilefay ithway ingstray amenay1 otay ethay ingstray\n"
-"   amenay2.  NIL andway anway errorway odecay isway eturnedray ifway anway errorway occuredway."
+"Unixway-enameray enamesray ethay ilefay ithway ingstray amenay1 otay ethay "
+"ingstray\n"
+"   amenay2.  NIL andway anway errorway odecay isway eturnedray ifway anway "
+"errorway occuredway."
 
 #: src/code/unix-glibc2.lisp
 msgid "Test for read permission"
@@ -120,8 +125,10 @@ msgid ""
 "   If the o_creat flag is specified, then the file is created with\n"
 "   a permission of argument MODE if the file doesn't exist."
 msgstr ""
-"Unixway-openway opensway ethay ilefay osewhay athnamepay isway ecifiedspay ybay PATH\n"
-"   orfay eadingray andway/orway itingwray asway ecifiedspay ybay ethay FLAGS argumentway.\n"
+"Unixway-openway opensway ethay ilefay osewhay athnamepay isway ecifiedspay "
+"ybay PATH\n"
+"   orfay eadingray andway/orway itingwray asway ecifiedspay ybay ethay FLAGS "
+"argumentway.\n"
 "   Eturnsray anway integerway ilefay escriptorday.\n"
 "   Ethay agsflay argumentway ancay ebay:\n"
 "\n"
@@ -137,8 +144,10 @@ msgstr ""
 "     o_yncsay          Ynchronoussay Iway/O\n"
 "     o_asyncway         Asynchronousway Iway/O\n"
 "\n"
-"   Ifway ethay o_eatcray agflay isway ecifiedspay, enthay ethay ilefay isway eatedcray ithway\n"
-"   away ermissionpay ofway argumentway MODE ifway ethay ilefay oesnday't existway."
+"   Ifway ethay o_eatcray agflay isway ecifiedspay, enthay ethay ilefay isway "
+"eatedcray ithway\n"
+"   away ermissionpay ofway argumentway MODE ifway ethay ilefay oesnday't "
+"existway."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
@@ -146,8 +155,10 @@ msgid ""
 "   table. (i.e. the maximum number of descriptors that can exist at\n"
 "   one time.)"
 msgstr ""
-"Unixway-etdtablesizegay eturnsray ethay aximummay izesay ofway ethay ilefay escriptorday\n"
-"   abletay. (i.e. ethay aximummay umbernay ofway escriptorsday atthay ancay existway atway\n"
+"Unixway-etdtablesizegay eturnsray ethay aximummay izesay ofway ethay ilefay "
+"escriptorday\n"
+"   abletay. (i.e. ethay aximummay umbernay ofway escriptorsday atthay ancay "
+"existway atway\n"
 "   oneway imetay.)"
 
 #: src/code/unix-glibc2.lisp
@@ -156,8 +167,10 @@ msgid ""
 "   closes the file associated with it.  T is returned upon successful\n"
 "   completion, otherwise NIL and an error number."
 msgstr ""
-"Unixway-oseclay akestay anway integerway ilefay escriptorday asway anway argumentway andway\n"
-"   osesclay ethay ilefay associatedway ithway itway.  T isway eturnedray uponway uccessfulsay\n"
+"Unixway-oseclay akestay anway integerway ilefay escriptorday asway anway "
+"argumentway andway\n"
+"   osesclay ethay ilefay associatedway ithway itway.  T isway eturnedray "
+"uponway uccessfulsay\n"
 "   ompletioncay, otherwiseway NIL andway anway errorway umbernay."
 
 #: src/code/unix-glibc2.lisp
@@ -169,9 +182,12 @@ msgid ""
 "\n"
 "   This interface is made obsolete by UNIX-OPEN."
 msgstr ""
-"Unixway-eatcray acceptsway away ilefay amenay andway away odemay (amesay asway osethay orfay\n"
-"   unixway-modchay) andway eatescray away ilefay ybay atthay amenay ithway ethay ecifiedspay\n"
-"   ermissionpay odemay.  Itway eturnsray away ilefay escriptorday onway uccesssay,\n"
+"Unixway-eatcray acceptsway away ilefay amenay andway away odemay (amesay "
+"asway osethay orfay\n"
+"   unixway-modchay) andway eatescray away ilefay ybay atthay amenay ithway "
+"ethay ecifiedspay\n"
+"   ermissionpay odemay.  Itway eturnsray away ilefay escriptorday onway "
+"uccesssay,\n"
 "   orway NIL andway anway errorway  umbernay otherwiseway.\n"
 "\n"
 "   Isthay interfaceway isway ademay obsoleteway ybay UNIX-OPEN."
@@ -314,7 +330,9 @@ msgstr "Oseclay ethay oupgray-ilefay eamstray."
 
 #: src/code/unix-glibc2.lisp
 msgid "Read an entry from the group-file stream, opening it if necessary."
-msgstr "Eadray anway entryway omfray ethay oupgray-ilefay eamstray, openingway itway ifway ecessarynay."
+msgstr ""
+"Eadray anway entryway omfray ethay oupgray-ilefay eamstray, openingway itway "
+"ifway ecessarynay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Size of control character vector."
@@ -353,17 +371,22 @@ msgid ""
 "Open host data base files and mark them as staying open even after\n"
 "a later search if STAY_OPEN is non-zero."
 msgstr ""
-"Openway osthay ataday asebay ilesfay andway arkmay emthay asway tayingsay openway evenway afterway\n"
+"Openway osthay ataday asebay ilesfay andway arkmay emthay asway tayingsay "
+"openway evenway afterway\n"
 "away aterlay earchsay ifway STAY_OPEN isway onnay-erozay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Close host data base files and clear `stay open' flag."
-msgstr "Oseclay osthay ataday asebay ilesfay andway earclay `taysay openway' agflay."
+msgstr ""
+"Oseclay osthay ataday asebay ilesfay andway earclay `taysay openway' agflay."
 
 #: src/code/unix-glibc2.lisp
-msgid "Get next entry from host data base file.  Open data base if\n"
+msgid ""
+"Get next entry from host data base file.  Open data base if\n"
 "necessary."
-msgstr "Etgay extnay entryway omfray osthay ataday asebay ilefay.  Openway ataday asebay ifway\n"
+msgstr ""
+"Etgay extnay entryway omfray osthay ataday asebay ilefay.  Openway ataday "
+"asebay ifway\n"
 "ecessarynay."
 
 #: src/code/unix-glibc2.lisp
@@ -371,12 +394,14 @@ msgid ""
 "Return entry from host data base which address match ADDR with\n"
 "length LEN and type TYPE."
 msgstr ""
-"Eturnray entryway omfray osthay ataday asebay ichwhay addressway atchmay ADDR ithway\n"
+"Eturnray entryway omfray osthay ataday asebay ichwhay addressway atchmay "
+"ADDR ithway\n"
 "engthlay LEN andway ypetay TYPE."
 
 #: src/code/unix-glibc2.lisp
 msgid "Return entry from host data base for host with NAME."
-msgstr "Eturnray entryway omfray osthay ataday asebay orfay osthay ithway NAME."
+msgstr ""
+"Eturnray entryway omfray osthay ataday asebay orfay osthay ithway NAME."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
@@ -384,8 +409,10 @@ msgid ""
 "   set to the address type which as `AF_INET' for IPv4 or `AF_INET6'\n"
 "   for IPv6."
 msgstr ""
-"Eturnray entryway omfray osthay ataday asebay orfay osthay ithway NAME.  AF ustmay ebay\n"
-"   etsay otay ethay addressway ypetay ichwhay asway `AF_INET' orfay Ipvway4 orway `AF_INET6'\n"
+"Eturnray entryway omfray osthay ataday asebay orfay osthay ithway NAME.  AF "
+"ustmay ebay\n"
+"   etsay otay ethay addressway ypetay ichwhay asway `AF_INET' orfay Ipvway4 "
+"orway `AF_INET6'\n"
 "   orfay Ipvway6."
 
 #: src/code/unix-glibc2.lisp
@@ -393,19 +420,23 @@ msgid ""
 "Open network data base files and mark them as staying open even\n"
 "   after a later search if STAY_OPEN is non-zero."
 msgstr ""
-"Openway etworknay ataday asebay ilesfay andway arkmay emthay asway tayingsay openway evenway\n"
+"Openway etworknay ataday asebay ilesfay andway arkmay emthay asway tayingsay "
+"openway evenway\n"
 "   afterway away aterlay earchsay ifway STAY_OPEN isway onnay-erozay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Close network data base files and clear `stay open' flag."
-msgstr "Oseclay etworknay ataday asebay ilesfay andway earclay `taysay openway' agflay."
+msgstr ""
+"Oseclay etworknay ataday asebay ilesfay andway earclay `taysay openway' "
+"agflay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Get next entry from network data base file.  Open data base if\n"
 "   necessary."
 msgstr ""
-"Etgay extnay entryway omfray etworknay ataday asebay ilefay.  Openway ataday asebay ifway\n"
+"Etgay extnay entryway omfray etworknay ataday asebay ilefay.  Openway ataday "
+"asebay ifway\n"
 "   ecessarynay."
 
 #: src/code/unix-glibc2.lisp
@@ -413,31 +444,37 @@ msgid ""
 "Return entry from network data base which address match NET and\n"
 "   type TYPE."
 msgstr ""
-"Eturnray entryway omfray etworknay ataday asebay ichwhay addressway atchmay NET andway\n"
+"Eturnray entryway omfray etworknay ataday asebay ichwhay addressway atchmay "
+"NET andway\n"
 "   ypetay TYPE."
 
 #: src/code/unix-glibc2.lisp
 msgid "Return entry from network data base for network with NAME."
-msgstr "Eturnray entryway omfray etworknay ataday asebay orfay etworknay ithway NAME."
+msgstr ""
+"Eturnray entryway omfray etworknay ataday asebay orfay etworknay ithway NAME."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Open service data base files and mark them as staying open even\n"
 "   after a later search if STAY_OPEN is non-zero."
 msgstr ""
-"Openway ervicesay ataday asebay ilesfay andway arkmay emthay asway tayingsay openway evenway\n"
+"Openway ervicesay ataday asebay ilesfay andway arkmay emthay asway tayingsay "
+"openway evenway\n"
 "   afterway away aterlay earchsay ifway STAY_OPEN isway onnay-erozay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Close service data base files and clear `stay open' flag."
-msgstr "Oseclay ervicesay ataday asebay ilesfay andway earclay `taysay openway' agflay."
+msgstr ""
+"Oseclay ervicesay ataday asebay ilesfay andway earclay `taysay openway' "
+"agflay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Get next entry from service data base file.  Open data base if\n"
 "   necessary."
 msgstr ""
-"Etgay extnay entryway omfray ervicesay ataday asebay ilefay.  Openway ataday asebay ifway\n"
+"Etgay extnay entryway omfray ervicesay ataday asebay ilefay.  Openway ataday "
+"asebay ifway\n"
 "   ecessarynay."
 
 #: src/code/unix-glibc2.lisp
@@ -445,7 +482,8 @@ msgid ""
 "Return entry from network data base for network with NAME and\n"
 "   protocol PROTO."
 msgstr ""
-"Eturnray entryway omfray etworknay ataday asebay orfay etworknay ithway NAME andway\n"
+"Eturnray entryway omfray etworknay ataday asebay orfay etworknay ithway NAME "
+"andway\n"
 "   otocolpray PROTO."
 
 #: src/code/unix-glibc2.lisp
@@ -453,7 +491,8 @@ msgid ""
 "Return entry from service data base which matches port PORT and\n"
 "   protocol PROTO."
 msgstr ""
-"Eturnray entryway omfray ervicesay ataday asebay ichwhay atchesmay ortpay PORT andway\n"
+"Eturnray entryway omfray ervicesay ataday asebay ichwhay atchesmay ortpay "
+"PORT andway\n"
 "   otocolpray PROTO."
 
 #: src/code/unix-glibc2.lisp
@@ -461,28 +500,36 @@ msgid ""
 "Open protocol data base files and mark them as staying open even\n"
 "   after a later search if STAY_OPEN is non-zero."
 msgstr ""
-"Openway otocolpray ataday asebay ilesfay andway arkmay emthay asway tayingsay openway evenway\n"
+"Openway otocolpray ataday asebay ilesfay andway arkmay emthay asway "
+"tayingsay openway evenway\n"
 "   afterway away aterlay earchsay ifway STAY_OPEN isway onnay-erozay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Close protocol data base files and clear `stay open' flag."
-msgstr "Oseclay otocolpray ataday asebay ilesfay andway earclay `taysay openway' agflay."
+msgstr ""
+"Oseclay otocolpray ataday asebay ilesfay andway earclay `taysay openway' "
+"agflay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Get next entry from protocol data base file.  Open data base if\n"
 "   necessary."
 msgstr ""
-"Etgay extnay entryway omfray otocolpray ataday asebay ilefay.  Openway ataday asebay ifway\n"
+"Etgay extnay entryway omfray otocolpray ataday asebay ilefay.  Openway "
+"ataday asebay ifway\n"
 "   ecessarynay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Return entry from protocol data base for network with NAME."
-msgstr "Eturnray entryway omfray otocolpray ataday asebay orfay etworknay ithway NAME."
+msgstr ""
+"Eturnray entryway omfray otocolpray ataday asebay orfay etworknay ithway "
+"NAME."
 
 #: src/code/unix-glibc2.lisp
 msgid "Return entry from protocol data base which number is PROTO."
-msgstr "Eturnray entryway omfray otocolpray ataday asebay ichwhay umbernay isway PROTO."
+msgstr ""
+"Eturnray entryway omfray otocolpray ataday asebay ichwhay umbernay isway "
+"PROTO."
 
 #: src/code/unix-glibc2.lisp
 msgid "Establish network group NETGROUP for enumeration."
@@ -490,19 +537,23 @@ msgstr "Establishway etworknay oupgray NETGROUP orfay enumerationway."
 
 #: src/code/unix-glibc2.lisp
 msgid "Free all space allocated by previous `setnetgrent' call."
-msgstr "Eefray allway acespay allocatedway ybay eviouspray `etnetgrentsay' allcay."
+msgstr ""
+"Eefray allway acespay allocatedway ybay eviouspray `etnetgrentsay' allcay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Get next member of netgroup established by last `setnetgrent' call\n"
 "   and return pointers to elements in HOSTP, USERP, and DOMAINP."
 msgstr ""
-"Etgay extnay embermay ofway etgroupnay establishedway ybay astlay `etnetgrentsay' allcay\n"
-"   andway eturnray ointerspay otay elementsway inway HOSTP, USERP, andway DOMAINP."
+"Etgay extnay embermay ofway etgroupnay establishedway ybay astlay "
+"`etnetgrentsay' allcay\n"
+"   andway eturnray ointerspay otay elementsway inway HOSTP, USERP, andway "
+"DOMAINP."
 
 #: src/code/unix-glibc2.lisp
 msgid "Test whether NETGROUP contains the triple (HOST,USER,DOMAIN)."
-msgstr "Esttay etherwhay NETGROUP ontainscay ethay ipletray (HOST,USER,DOMAIN)."
+msgstr ""
+"Esttay etherwhay NETGROUP ontainscay ethay ipletray (HOST,USER,DOMAIN)."
 
 #: src/code/unix-glibc2.lisp
 msgid "Socket address is intended for `bind'."
@@ -561,12 +612,14 @@ msgid ""
 "Translate name of a service location and/or a service name to set of\n"
 "   socket addresses."
 msgstr ""
-"Anslatetray amenay ofway away ervicesay ocationlay andway/orway away ervicesay amenay otay etsay ofway\n"
+"Anslatetray amenay ofway away ervicesay ocationlay andway/orway away "
+"ervicesay amenay otay etsay ofway\n"
 "   ocketsay addressesway."
 
 #: src/code/unix-glibc2.lisp
 msgid "Free `addrinfo' structure AI including associated storage."
-msgstr "Eefray `addrinfoway' ucturestray AI includingway associatedway toragesay."
+msgstr ""
+"Eefray `addrinfoway' ucturestray AI includingway associatedway toragesay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
@@ -574,8 +627,10 @@ msgid ""
 "   attributes according to TERMP and WINP and return handles for both\n"
 "   ends in AMASTER and ASLAVE."
 msgstr ""
-"Eatecray seudopay tytay astermay aveslay airpay ithway NAME andway etsay erminaltay\n"
-"   attributesway accordingway otay TERMP andway WINP andway eturnray andleshay orfay othbay\n"
+"Eatecray seudopay tytay astermay aveslay airpay ithway NAME andway etsay "
+"erminaltay\n"
+"   attributesway accordingway otay TERMP andway WINP andway eturnray "
+"andleshay orfay othbay\n"
 "   endsway inway AMASTER andway ASLAVE."
 
 #: src/code/unix-glibc2.lisp
@@ -583,7 +638,8 @@ msgid ""
 "Create child process and establish the slave pseudo terminal as the\n"
 "   child's controlling terminal."
 msgstr ""
-"Eatecray ildchay ocesspray andway establishway ethay aveslay seudopay erminaltay asway ethay\n"
+"Eatecray ildchay ocesspray andway establishway ethay aveslay seudopay "
+"erminaltay asway ethay\n"
 "   ildchay's ontrollingcay erminaltay."
 
 #: src/code/unix-glibc2.lisp
@@ -596,7 +652,9 @@ msgstr "Oseclay ethay asswordpay-ilefay eamstray."
 
 #: src/code/unix-glibc2.lisp
 msgid "Read an entry from the password-file stream, opening it if necessary."
-msgstr "Eadray anway entryway omfray ethay asswordpay-ilefay eamstray, openingway itway ifway ecessarynay."
+msgstr ""
+"Eadray anway entryway omfray ethay asswordpay-ilefay eamstray, openingway "
+"itway ifway ecessarynay."
 
 #: src/code/unix-glibc2.lisp
 msgid "The calling process."
@@ -628,11 +686,14 @@ msgstr "WHO isway away userway ID"
 
 #: src/code/unix-glibc2.lisp
 msgid "Set scheduling algorithm and/or parameters for a process."
-msgstr "Etsay edulingschay algorithmway andway/orway arameterspay orfay away ocesspray."
+msgstr ""
+"Etsay edulingschay algorithmway andway/orway arameterspay orfay away "
+"ocesspray."
 
 #: src/code/unix-glibc2.lisp
 msgid "Retrieve scheduling algorithm for a particular purpose."
-msgstr "Etrieveray edulingschay algorithmway orfay away articularpay urposepay."
+msgstr ""
+"Etrieveray edulingschay algorithmway orfay away articularpay urposepay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Get maximum priority value for a scheduler."
@@ -680,7 +741,9 @@ msgstr "Oseclay atabaseday."
 
 #: src/code/unix-glibc2.lisp
 msgid "Get next entry from database, perhaps after opening the file."
-msgstr "Etgay extnay entryway omfray atabaseday, erhapspay afterway openingway ethay ilefay."
+msgstr ""
+"Etgay extnay entryway omfray atabaseday, erhapspay afterway openingway ethay "
+"ilefay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Get shadow entry matching NAME."
@@ -809,20 +872,20 @@ msgid ""
 "program.\n"
 "   Environment should be an a-list mapping symbols to simple-strings which "
 "this\n"
-"   function bashes together to form the environment for the exec'ed "
-"program."
+"   function bashes together to form the environment for the exec'ed program."
 msgstr ""
-"Executesway ethay Unixway execveway ystemsay allcay.  Ifway ethay ystemsay allcay uceedssay, isplay\n"
-"   illway onay ongerlay ebay unningray inway isthay ocesspray.  Ifway ethay ystemsay allcay ailsfay "
-"isthay\n"
-"   unctionfay eturnsray wotay aluesvay: NIL andway anway errorway odecay.  Argway-istlay ouldshay ebay "
-"away\n"
-"   istlay ofway implesay-ingsstray ichwhay areway assedpay asway argumentsway otay ethay execway'edway "
-"ogrampray.\n"
-"   Environmentway ouldshay ebay anway away-istlay appingmay ymbolssay otay implesay-ingsstray ichwhay "
-"isthay\n"
-"   unctionfay ashesbay ogethertay otay ormfay ethay environmentway orfay ethay execway'edway "
-"ogrampray."
+"Executesway ethay Unixway execveway ystemsay allcay.  Ifway ethay ystemsay "
+"allcay uceedssay, isplay\n"
+"   illway onay ongerlay ebay unningray inway isthay ocesspray.  Ifway ethay "
+"ystemsay allcay ailsfay isthay\n"
+"   unctionfay eturnsray wotay aluesvay: NIL andway anway errorway odecay.  "
+"Argway-istlay ouldshay ebay away\n"
+"   istlay ofway implesay-ingsstray ichwhay areway assedpay asway "
+"argumentsway otay ethay execway'edway ogrampray.\n"
+"   Environmentway ouldshay ebay anway away-istlay appingmay ymbolssay otay "
+"implesay-ingsstray ichwhay isthay\n"
+"   unctionfay ashesbay ogethertay otay ormfay ethay environmentway orfay "
+"ethay execway'edway ogrampray."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
@@ -832,21 +895,24 @@ msgid ""
 "   NIL which determines why the file was not accessible.\n"
 "\n"
 "   The access modes are:\n"
-"	r_ok     Read permission.\n"
-"	w_ok     Write permission.\n"
-"	x_ok     Execute permission.\n"
-"	f_ok     Presence of file."
-msgstr ""
-"Ivengay away ilefay athpay (away ingstray) andway oneway ofway ourfay onstantcay odesmay,\n"
-"   unixway-accessway eturnsray T ifway ethay ilefay isway accessibleway ithway atthay\n"
-"   odemay andway NIL ifway otnay.  Itway alsoway eturnsray anway errnoway aluevay ithway\n"
+"\tr_ok     Read permission.\n"
+"\tw_ok     Write permission.\n"
+"\tx_ok     Execute permission.\n"
+"\tf_ok     Presence of file."
+msgstr ""
+"Ivengay away ilefay athpay (away ingstray) andway oneway ofway ourfay "
+"onstantcay odesmay,\n"
+"   unixway-accessway eturnsray T ifway ethay ilefay isway accessibleway "
+"ithway atthay\n"
+"   odemay andway NIL ifway otnay.  Itway alsoway eturnsray anway errnoway "
+"aluevay ithway\n"
 "   NIL ichwhay eterminesday ywhay ethay ilefay asway otnay accessibleway.\n"
 "\n"
 "   Ethay accessway odesmay areway:\n"
-"	r_okway     Eadray ermissionpay.\n"
-"	w_okway     Itewray ermissionpay.\n"
-"	x_okway     Executeway ermissionpay.\n"
-"	f_okway     Esencepray ofway ilefay."
+"\tr_okway     Eadray ermissionpay.\n"
+"\tw_okway     Itewray ermissionpay.\n"
+"\tx_okway     Executeway ermissionpay.\n"
+"\tf_okway     Esencepray ofway ilefay."
 
 #: src/code/unix-glibc2.lisp
 msgid "set the file pointer"
@@ -870,8 +936,10 @@ msgid ""
 "   l_xtnd       Extend the file size.\n"
 "  "
 msgstr ""
-"UNIX-LSEEK acceptsway away ilefay escriptorday andway ovesmay ethay ilefay ointerpay aheadway\n"
-"   away ertaincay OFFSET orfay atthay ilefay.  WHENCE ancay ebay anyway ofway ethay ollowingfay:\n"
+"UNIX-LSEEK acceptsway away ilefay escriptorday andway ovesmay ethay ilefay "
+"ointerpay aheadway\n"
+"   away ertaincay OFFSET orfay atthay ilefay.  WHENCE ancay ebay anyway "
+"ofway ethay ollowingfay:\n"
 "\n"
 "   l_etsay        Etsay ethay ilefay ointerpay.\n"
 "   l_incrway       Incrementway ethay ilefay ointerpay.\n"
@@ -885,9 +953,12 @@ msgid ""
 "   The number of bytes actually read is returned or NIL and an error\n"
 "   number if an error occured."
 msgstr ""
-"UNIX-READ attemptsway otay eadray omfray ethay ilefay escribedday ybay dfay intoway\n"
-"   ethay ufferbay ufbay untilway itway isway ullfay.  Enlay isway ethay engthlay ofway ethay ufferbay.\n"
-"   Ethay umbernay ofway ytesbay actuallyway eadray isway eturnedray orway NIL andway anway errorway\n"
+"UNIX-READ attemptsway otay eadray omfray ethay ilefay escribedday ybay dfay "
+"intoway\n"
+"   ethay ufferbay ufbay untilway itway isway ullfay.  Enlay isway ethay "
+"engthlay ofway ethay ufferbay.\n"
+"   Ethay umbernay ofway ytesbay actuallyway eadray isway eturnedray orway "
+"NIL andway anway errorway\n"
 "   umbernay ifway anway errorway occuredway."
 
 #: src/code/unix-glibc2.lisp
@@ -896,8 +967,10 @@ msgid ""
 "   len to the file described by the file descriptor fd.  NIL and an\n"
 "   error is returned if the call is unsuccessful."
 msgstr ""
-"Unixway-itewray attemptsway otay itewray away aracterchay ufferbay (ufbay) ofway engthlay\n"
-"   enlay otay ethay ilefay escribedday ybay ethay ilefay escriptorday dfay.  NIL andway anway\n"
+"Unixway-itewray attemptsway otay itewray away aracterchay ufferbay (ufbay) "
+"ofway engthlay\n"
+"   enlay otay ethay ilefay escribedday ybay ethay ilefay escriptorday dfay.  "
+"NIL andway anway\n"
 "   errorway isway eturnedray ifway ethay allcay isway unsuccessfulway."
 
 #: src/code/unix-glibc2.lisp
@@ -909,11 +982,16 @@ msgid ""
 "  an error occurred the first value is NIL and the second\n"
 "  the unix error code."
 msgstr ""
-"Unixway-ipepay etssay upway away unixway-ipingpay echanismmay onsistingcay ofway\n"
-"  anway inputway ipepay andway anway outputway ipepay.  Unixway-Ipepay eturnsray wotay\n"
-"  aluesvay: ifway onay errorway occurredway ethay irstfay aluevay isway ethay ipepay\n"
-"  otay ebay eadray omfray andway ethay econdsay isway ancay ebay ittenwray otay.  Ifway\n"
-"  anway errorway occurredway ethay irstfay aluevay isway NIL andway ethay econdsay\n"
+"Unixway-ipepay etssay upway away unixway-ipingpay echanismmay onsistingcay "
+"ofway\n"
+"  anway inputway ipepay andway anway outputway ipepay.  Unixway-Ipepay "
+"eturnsray wotay\n"
+"  aluesvay: ifway onay errorway occurredway ethay irstfay aluevay isway "
+"ethay ipepay\n"
+"  otay ebay eadray omfray andway ethay econdsay isway ancay ebay ittenwray "
+"otay.  Ifway\n"
+"  anway errorway occurredway ethay irstfay aluevay isway NIL andway ethay "
+"econdsay\n"
 "  ethay unixway errorway odecay."
 
 #: src/code/unix-glibc2.lisp
@@ -924,10 +1002,14 @@ msgid ""
 "   left unchanged by specifying them as -1.  Note: Permission will\n"
 "   fail if the caller is not the superuser."
 msgstr ""
-"Ivengay away ilefay athpay, anway integerway userway-idway, andway anway integerway oupgray-idway,\n"
-"   unixway-ownchay angeschay ethay ownerway ofway ethay ilefay andway ethay oupgray ofway ethay\n"
-"   ilefay otay osethay ecifiedspay.  Eitherway ethay ownerway orway ethay oupgray aymay ebay\n"
-"   eftlay unchangedway ybay ecifyingspay emthay asway -1.  Otenay: Ermissionpay illway\n"
+"Ivengay away ilefay athpay, anway integerway userway-idway, andway anway "
+"integerway oupgray-idway,\n"
+"   unixway-ownchay angeschay ethay ownerway ofway ethay ilefay andway ethay "
+"oupgray ofway ethay\n"
+"   ilefay otay osethay ecifiedspay.  Eitherway ethay ownerway orway ethay "
+"oupgray aymay ebay\n"
+"   eftlay unchangedway ybay ecifyingspay emthay asway -1.  Otenay: "
+"Ermissionpay illway\n"
 "   ailfay ifway ethay allercay isway otnay ethay uperusersay."
 
 #: src/code/unix-glibc2.lisp
@@ -935,7 +1017,8 @@ msgid ""
 "Unix-fchown is like unix-chown, except that it accepts an integer\n"
 "   file descriptor instead of a file path name."
 msgstr ""
-"Unixway-chownfay isway ikelay unixway-ownchay, exceptway atthay itway acceptsway anway integerway\n"
+"Unixway-chownfay isway ikelay unixway-ownchay, exceptway atthay itway "
+"acceptsway anway integerway\n"
 "   ilefay escriptorday insteadway ofway away ilefay athpay amenay."
 
 #: src/code/unix-glibc2.lisp
@@ -943,7 +1026,8 @@ msgid ""
 "Given a file path string, unix-chdir changes the current working \n"
 "   directory to the one specified."
 msgstr ""
-"Ivengay away ilefay athpay ingstray, unixway-dirchay angeschay ethay urrentcay orkingway \n"
+"Ivengay away ilefay athpay ingstray, unixway-dirchay angeschay ethay "
+"urrentcay orkingway \n"
 "   irectoryday otay ethay oneway ecifiedspay."
 
 #: src/code/unix-glibc2.lisp
@@ -952,9 +1036,12 @@ msgid ""
 "   If successful, return BUF.  If not, put an error message in\n"
 "   BUF and return NULL.  BUF should be at least PATH_MAX bytes long."
 msgstr ""
-"Utpay ethay absoluteway athnamepay ofway ethay urrentcay orkingway irectoryday inway BUF.\n"
-"   Ifway uccessfulsay, eturnray BUF.  Ifway otnay, utpay anway errorway essagemay inway\n"
-"   BUF andway eturnray NULL.  BUF ouldshay ebay atway eastlay PATH_MAX ytesbay onglay."
+"Utpay ethay absoluteway athnamepay ofway ethay urrentcay orkingway "
+"irectoryday inway BUF.\n"
+"   Ifway uccessfulsay, eturnray BUF.  Ifway otnay, utpay anway errorway "
+"essagemay inway\n"
+"   BUF andway eturnray NULL.  BUF ouldshay ebay atway eastlay PATH_MAX "
+"ytesbay onglay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
@@ -962,8 +1049,10 @@ msgid ""
 "   argument) and return it.  If FD is not a valid file descriptor, NIL\n"
 "   and an error number are returned."
 msgstr ""
-"Unixway-upday uplicatesday anway existingway ilefay escriptorday (ivengay asway ethay\n"
-"   argumentway) andway eturnray itway.  Ifway FD isway otnay away alidvay ilefay escriptorday, NIL\n"
+"Unixway-upday uplicatesday anway existingway ilefay escriptorday (ivengay "
+"asway ethay\n"
+"   argumentway) andway eturnray itway.  Ifway FD isway otnay away alidvay "
+"ilefay escriptorday, NIL\n"
 "   andway anway errorway umbernay areway eturnedray."
 
 #: src/code/unix-glibc2.lisp
@@ -974,10 +1063,14 @@ msgid ""
 "   requested descriptor number, it will be closed and the number\n"
 "   assigned to the duplicate."
 msgstr ""
-"Unixway-upday2 uplicatesday anway existingway ilefay escriptorday ustjay asway unixway-upday\n"
-"   oesday onlyway ethay ewnay aluevay ofway ethay uplicateday escriptorday aymay ebay equestedray\n"
-"   roughthay ethay econdsay argumentway.  Ifway away ilefay alreadyway existsway ithway ethay\n"
-"   equestedray escriptorday umbernay, itway illway ebay osedclay andway ethay umbernay\n"
+"Unixway-upday2 uplicatesday anway existingway ilefay escriptorday ustjay "
+"asway unixway-upday\n"
+"   oesday onlyway ethay ewnay aluevay ofway ethay uplicateday escriptorday "
+"aymay ebay equestedray\n"
+"   roughthay ethay econdsay argumentway.  Ifway away ilefay alreadyway "
+"existsway ithway ethay\n"
+"   equestedray escriptorday umbernay, itway illway ebay osedclay andway "
+"ethay umbernay\n"
 "   assignedway otay ethay uplicateday."
 
 #: src/code/unix-glibc2.lisp
@@ -986,9 +1079,12 @@ msgid ""
 "   error code.  If successful, the call doesn't return.  If\n"
 "   unsuccessful, the call returns NIL and an error number."
 msgstr ""
-"Unixway-exitway erminatestay ethay urrentcay ocesspray ithway anway optionalway\n"
-"   errorway odecay.  Ifway uccessfulsay, ethay allcay oesnday't eturnray.  Ifway\n"
-"   unsuccessfulway, ethay allcay eturnsray NIL andway anway errorway umbernay."
+"Unixway-exitway erminatestay ethay urrentcay ocesspray ithway anway "
+"optionalway\n"
+"   errorway odecay.  Ifway uccessfulsay, ethay allcay oesnday't eturnray.  "
+"Ifway\n"
+"   unsuccessfulway, ethay allcay eturnsray NIL andway anway errorway "
+"umbernay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Get file-specific configuration information about PATH."
@@ -1000,29 +1096,37 @@ msgstr "Etgay ethay aluevay ofway ethay ystemsay ariablevay NAME."
 
 #: src/code/unix-glibc2.lisp
 msgid "Get the value of the string-valued system variable NAME."
-msgstr "Etgay ethay aluevay ofway ethay ingstray-aluedvay ystemsay ariablevay NAME."
+msgstr ""
+"Etgay ethay aluevay ofway ethay ingstray-aluedvay ystemsay ariablevay NAME."
 
 #: src/code/unix-glibc2.lisp
 msgid "Unix-getpid returns the process-id of the current process."
-msgstr "Unixway-etpidgay eturnsray ethay ocesspray-idway ofway ethay urrentcay ocesspray."
+msgstr ""
+"Unixway-etpidgay eturnsray ethay ocesspray-idway ofway ethay urrentcay "
+"ocesspray."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Unix-getppid returns the process-id of the parent of the current process."
 msgstr ""
-"Unixway-etppidgay eturnsray ethay ocesspray-idway ofway ethay arentpay ofway ethay urrentcay ocesspray."
+"Unixway-etppidgay eturnsray ethay ocesspray-idway ofway ethay arentpay ofway "
+"ethay urrentcay ocesspray."
 
 #: src/code/unix-glibc2.lisp
 msgid "Unix-getpgrp returns the group-id of the calling process."
-msgstr "Unixway-etpgrpgay eturnsray ethay oupgray-idway ofway ethay allingcay ocesspray."
+msgstr ""
+"Unixway-etpgrpgay eturnsray ethay oupgray-idway ofway ethay allingcay "
+"ocesspray."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Unix-setpgrp sets the process group on the process pid to\n"
 "   pgrp.  NIL and an error number are returned upon failure."
 msgstr ""
-"Unixway-etpgrpsay etssay ethay ocesspray oupgray onway ethay ocesspray idpay otay\n"
-"   grppay.  NIL andway anway errorway umbernay areway eturnedray uponway ailurefay."
+"Unixway-etpgrpsay etssay ethay ocesspray oupgray onway ethay ocesspray idpay "
+"otay\n"
+"   grppay.  NIL andway anway errorway umbernay areway eturnedray uponway "
+"ailurefay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
@@ -1030,9 +1134,12 @@ msgid ""
 "   pgrp. If pgid is equal to pid, the process becomes a process\n"
 "   group leader. NIL and an error number are returned upon failure."
 msgstr ""
-"Unixway-etpgidsay etssay ethay ocesspray oupgray ofway ethay ocesspray idpay otay\n"
-"   grppay. Ifway gidpay isway equalway otay idpay, ethay ocesspray ecomesbay away ocesspray\n"
-"   oupgray eaderlay. NIL andway anway errorway umbernay areway eturnedray uponway ailurefay."
+"Unixway-etpgidsay etssay ethay ocesspray oupgray ofway ethay ocesspray idpay "
+"otay\n"
+"   grppay. Ifway gidpay isway equalway otay idpay, ethay ocesspray ecomesbay "
+"away ocesspray\n"
+"   oupgray eaderlay. NIL andway anway errorway umbernay areway eturnedray "
+"uponway ailurefay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
@@ -1040,9 +1147,12 @@ msgid ""
 "   The process group IDs of the session and the calling process\n"
 "   are set to the process ID of the calling process, which is returned."
 msgstr ""
-"Eatecray away ewnay essionsay ithway ethay allingcay ocesspray asway itsway eaderlay.\n"
-"   Ethay ocesspray oupgray Idsway ofway ethay essionsay andway ethay allingcay ocesspray\n"
-"   areway etsay otay ethay ocesspray ID ofway ethay allingcay ocesspray, ichwhay isway eturnedray."
+"Eatecray away ewnay essionsay ithway ethay allingcay ocesspray asway itsway "
+"eaderlay.\n"
+"   Ethay ocesspray oupgray Idsway ofway ethay essionsay andway ethay "
+"allingcay ocesspray\n"
+"   areway etsay otay ethay ocesspray ID ofway ethay allingcay ocesspray, "
+"ichwhay isway eturnedray."
 
 #: src/code/unix-glibc2.lisp
 msgid "Return the session ID of the given process."
@@ -1053,7 +1163,8 @@ msgid ""
 "Unix-getuid returns the real user-id associated with the\n"
 "   current process."
 msgstr ""
-"Unixway-etuidgay eturnsray ethay ealray userway-idway associatedway ithway ethay\n"
+"Unixway-etuidgay eturnsray ethay ealray userway-idway associatedway ithway "
+"ethay\n"
 "   urrentcay ocesspray."
 
 #: src/code/unix-glibc2.lisp
@@ -1062,15 +1173,20 @@ msgstr "Etgay ethay effectiveway userway ID ofway ethay allingcay ocesspray."
 
 #: src/code/unix-glibc2.lisp
 msgid "Unix-getgid returns the real group-id of the current process."
-msgstr "Unixway-etgidgay eturnsray ethay ealray oupgray-idway ofway ethay urrentcay ocesspray."
+msgstr ""
+"Unixway-etgidgay eturnsray ethay ealray oupgray-idway ofway ethay urrentcay "
+"ocesspray."
 
 #: src/code/unix-glibc2.lisp
 msgid "Unix-getegid returns the effective group-id of the current process."
-msgstr "Unixway-etegidgay eturnsray ethay effectiveway oupgray-idway ofway ethay urrentcay ocesspray."
+msgstr ""
+"Unixway-etegidgay eturnsray ethay effectiveway oupgray-idway ofway ethay "
+"urrentcay ocesspray."
 
 #: src/code/unix-glibc2.lisp
 msgid "Return nonzero iff the calling process is in group GID."
-msgstr "Eturnray onzeronay iffway ethay allingcay ocesspray isway inway oupgray GID."
+msgstr ""
+"Eturnray onzeronay iffway ethay allingcay ocesspray isway inway oupgray GID."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
@@ -1080,8 +1196,10 @@ msgid ""
 "   if not, the effective user ID is set to UID."
 msgstr ""
 "Etsay ethay userway ID ofway ethay allingcay ocesspray otay UID.\n"
-"   Ifway ethay allingcay ocesspray isway ethay upersay-userway, etsay ethay ealray\n"
-"   andway effectiveway userway Idsway, andway ethay avedsay etsay-userway-ID otay UID;\n"
+"   Ifway ethay allingcay ocesspray isway ethay upersay-userway, etsay ethay "
+"ealray\n"
+"   andway effectiveway userway Idsway, andway ethay avedsay etsay-userway-ID "
+"otay UID;\n"
 "   ifway otnay, ethay effectiveway userway ID isway etsay otay UID."
 
 #: src/code/unix-glibc2.lisp
@@ -1090,8 +1208,10 @@ msgid ""
 "   process to the specified ones.  NIL and an error number is returned\n"
 "   if the call fails."
 msgstr ""
-"Unixway-etreuidsay etssay ethay ealray andway effectiveway userway-idway's ofway ethay urrentcay\n"
-"   ocesspray otay ethay ecifiedspay onesway.  NIL andway anway errorway umbernay isway eturnedray\n"
+"Unixway-etreuidsay etssay ethay ealray andway effectiveway userway-idway's "
+"ofway ethay urrentcay\n"
+"   ocesspray otay ethay ecifiedspay onesway.  NIL andway anway errorway "
+"umbernay isway eturnedray\n"
 "   ifway ethay allcay ailsfay."
 
 #: src/code/unix-glibc2.lisp
@@ -1102,8 +1222,10 @@ msgid ""
 "   if not, the effective group ID is set to GID."
 msgstr ""
 "Etsay ethay oupgray ID ofway ethay allingcay ocesspray otay GID.\n"
-"   Ifway ethay allingcay ocesspray isway ethay upersay-userway, etsay ethay ealray\n"
-"   andway effectiveway oupgray Idsway, andway ethay avedsay etsay-oupgray-ID otay GID;\n"
+"   Ifway ethay allingcay ocesspray isway ethay upersay-userway, etsay ethay "
+"ealray\n"
+"   andway effectiveway oupgray Idsway, andway ethay avedsay etsay-oupgray-ID "
+"otay GID;\n"
 "   ifway otnay, ethay effectiveway oupgray ID isway etsay otay GID."
 
 #: src/code/unix-glibc2.lisp
@@ -1112,8 +1234,10 @@ msgid ""
 "   process process to the specified ones.  NIL and an error number is\n"
 "   returned if the call fails."
 msgstr ""
-"Unixway-etregidsay etssay ethay ealray andway effectiveway oupgray-idway's ofway ethay urrentcay\n"
-"   ocesspray ocesspray otay ethay ecifiedspay onesway.  NIL andway anway errorway umbernay isway\n"
+"Unixway-etregidsay etssay ethay ealray andway effectiveway oupgray-idway's "
+"ofway ethay urrentcay\n"
+"   ocesspray ocesspray otay ethay ecifiedspay onesway.  NIL andway anway "
+"errorway umbernay isway\n"
 "   eturnedray ifway ethay allcay ailsfay."
 
 #: src/code/unix-glibc2.lisp
@@ -1122,8 +1246,10 @@ msgid ""
 "   of the child in the parent if it works, or NIL and an error number if it\n"
 "   doesn't work."
 msgstr ""
-"Executesway ethay unixway orkfay ystemsay allcay.  Eturnsray 0 inway ethay ildchay andway ethay idpay\n"
-"   ofway ethay ildchay inway ethay arentpay ifway itway orksway, orway NIL andway anway errorway umbernay ifway itway\n"
+"Executesway ethay unixway orkfay ystemsay allcay.  Eturnsray 0 inway ethay "
+"ildchay andway ethay idpay\n"
+"   ofway ethay ildchay inway ethay arentpay ifway itway orksway, orway NIL "
+"andway anway errorway umbernay ifway itway\n"
 "   oesnday't orkway."
 
 #: src/code/unix-glibc2.lisp
@@ -1131,7 +1257,8 @@ msgid ""
 "Get the value of the environment variable named Name.  If no such\n"
 "  variable exists, Nil is returned."
 msgstr ""
-"Etgay ethay aluevay ofway ethay environmentway ariablevay amednay Amenay.  Ifway onay uchsay\n"
+"Etgay ethay aluevay ofway ethay environmentway ariablevay amednay Amenay.  "
+"Ifway onay uchsay\n"
 "  ariablevay existsway, Ilnay isway eturnedray."
 
 #: src/code/unix-glibc2.lisp
@@ -1141,9 +1268,12 @@ msgid ""
 "  the value is changed to Value if Overwrite is non-zero.  Otherwise,\n"
 "  the value is not changed."
 msgstr ""
-"Addsway ethay environmentway ariablevay amednay Amenay otay ethay environmentway ithway\n"
-"  ethay ivengay Aluevay ifway Amenay oesday otnay alreadyway existway. Ifway Amenay oesday existway,\n"
-"  ethay aluevay isway angedchay otay Aluevay ifway Overwriteway isway onnay-erozay.  Otherwiseway,\n"
+"Addsway ethay environmentway ariablevay amednay Amenay otay ethay "
+"environmentway ithway\n"
+"  ethay ivengay Aluevay ifway Amenay oesday otnay alreadyway existway. Ifway "
+"Amenay oesday existway,\n"
+"  ethay aluevay isway angedchay otay Aluevay ifway Overwriteway isway onnay-"
+"erozay.  Otherwiseway,\n"
 "  ethay aluevay isway otnay angedchay."
 
 #: src/code/unix-glibc2.lisp
@@ -1152,9 +1282,12 @@ msgid ""
 "  the form \"name=value\".  If the name does not exist, it is added.\n"
 "  If name does exist, the value is updated to the given value."
 msgstr ""
-"Addsway orway angeschay ethay environmentway.  Amenay-aluevay ustmay ebay away ingstray ofway\n"
-"  ethay ormfay \"amenay=aluevay\".  Ifway ethay amenay oesday otnay existway, itway isway addedway.\n"
-"  Ifway amenay oesday existway, ethay aluevay isway updatedway otay ethay ivengay aluevay."
+"Addsway orway angeschay ethay environmentway.  Amenay-aluevay ustmay ebay "
+"away ingstray ofway\n"
+"  ethay ormfay \"amenay=aluevay\".  Ifway ethay amenay oesday otnay "
+"existway, itway isway addedway.\n"
+"  Ifway amenay oesday existway, ethay aluevay isway updatedway otay ethay "
+"ivengay aluevay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Removes the variable Name from the environment"
@@ -1165,7 +1298,8 @@ msgid ""
 "Accepts a Unix file descriptor and returns T if the device\n"
 "  associated with it is a terminal."
 msgstr ""
-"Acceptsway away Unixway ilefay escriptorday andway eturnsray T ifway ethay eviceday\n"
+"Acceptsway away Unixway ilefay escriptorday andway eturnsray T ifway ethay "
+"eviceday\n"
 "  associatedway ithway itway isway away erminaltay."
 
 #: src/code/unix-glibc2.lisp
@@ -1173,7 +1307,8 @@ msgid ""
 "Unix-link creates a hard link from the file with name1 to the\n"
 "   file with name2."
 msgstr ""
-"Unixway-inklay eatescray away ardhay inklay omfray ethay ilefay ithway amenay1 otay ethay\n"
+"Unixway-inklay eatescray away ardhay inklay omfray ethay ilefay ithway "
+"amenay1 otay ethay\n"
 "   ilefay ithway amenay2."
 
 #: src/code/unix-glibc2.lisp
@@ -1182,8 +1317,10 @@ msgid ""
 "   named name1.  NIL and an error number is returned if the call\n"
 "   is unsuccessful."
 msgstr ""
-"Unixway-ymlinksay eatescray away ymbolicsay inklay amednay amenay2 otay ethay ilefay\n"
-"   amednay amenay1.  NIL andway anway errorway umbernay isway eturnedray ifway ethay allcay\n"
+"Unixway-ymlinksay eatescray away ymbolicsay inklay amednay amenay2 otay "
+"ethay ilefay\n"
+"   amednay amenay1.  NIL andway anway errorway umbernay isway eturnedray "
+"ifway ethay allcay\n"
 "   isway unsuccessfulway."
 
 #: src/code/unix-glibc2.lisp
@@ -1193,9 +1330,12 @@ msgid ""
 "  the contents of the symbolic link if the call is successful, or\n"
 "  NIL and the Unix error number."
 msgstr ""
-"Unixway-eadlinkray invokesway ethay eadlinkray ystemsay allcay onway ethay ilefay amenay\n"
-"  ecifiedspay ybay ethay implesay ingstray athpay.  Itway eturnsray upway otay wotay aluesvay:\n"
-"  ethay ontentscay ofway ethay ymbolicsay inklay ifway ethay allcay isway uccessfulsay, orway\n"
+"Unixway-eadlinkray invokesway ethay eadlinkray ystemsay allcay onway ethay "
+"ilefay amenay\n"
+"  ecifiedspay ybay ethay implesay ingstray athpay.  Itway eturnsray upway "
+"otay wotay aluesvay:\n"
+"  ethay ontentscay ofway ethay ymbolicsay inklay ifway ethay allcay isway "
+"uccessfulsay, orway\n"
 "  NIL andway ethay Unixway errorway umbernay."
 
 #: src/code/unix-glibc2.lisp
@@ -1203,41 +1343,49 @@ msgid ""
 "Unix-unlink removes the directory entry for the named file.\n"
 "   NIL and an error code is returned if the call fails."
 msgstr ""
-"Unixway-unlinkway emovesray ethay irectoryday entryway orfay ethay amednay ilefay.\n"
-"   NIL andway anway errorway odecay isway eturnedray ifway ethay allcay ailsfay."
+"Unixway-unlinkway emovesray ethay irectoryday entryway orfay ethay amednay "
+"ilefay.\n"
+"   NIL andway anway errorway odecay isway eturnedray ifway ethay allcay "
+"ailsfay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Unix-rmdir attempts to remove the directory name.  NIL and\n"
 "   an error number is returned if an error occured."
 msgstr ""
-"Unixway-mdirray attemptsway otay emoveray ethay irectoryday amenay.  NIL andway\n"
+"Unixway-mdirray attemptsway otay emoveray ethay irectoryday amenay.  NIL "
+"andway\n"
 "   anway errorway umbernay isway eturnedray ifway anway errorway occuredway."
 
 #: src/code/unix-glibc2.lisp
 msgid "Get the tty-process-group for the unix file-descriptor FD."
-msgstr "Etgay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday FD."
+msgstr ""
+"Etgay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday "
+"FD."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
-"Get the tty-process-group for the unix file-descriptor FD.  If not supplied,"
-"\n"
+"Get the tty-process-group for the unix file-descriptor FD.  If not "
+"supplied,\n"
 "  FD defaults to /dev/tty."
 msgstr ""
-"Etgay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday FD.  Ifway otnay uppliedsay,"
-"\n"
+"Etgay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday "
+"FD.  Ifway otnay uppliedsay,\n"
 "  FD efaultsday otay /evday/tytay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Set the tty-process-group for the unix file-descriptor FD to PGRP."
-msgstr "Etsay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday FD otay PGRP."
+msgstr ""
+"Etsay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday "
+"FD otay PGRP."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Set the tty-process-group for the unix file-descriptor FD to PGRP.  If not\n"
 "  supplied, FD defaults to /dev/tty."
 msgstr ""
-"Etsay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday FD otay PGRP.  Ifway otnay\n"
+"Etsay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday "
+"FD otay PGRP.  Ifway otnay\n"
 "  uppliedsay, FD efaultsday otay /evday/tytay."
 
 #: src/code/unix-glibc2.lisp
@@ -1250,9 +1398,12 @@ msgid ""
 "  values returned upon success are: sysname, nodename, release, version,\n"
 "  machine, and domainname. Upon failure, 'nil and the 'errno are returned."
 msgstr ""
-"Unixway-unameway eturnsray ethay amenay andway informationway aboutway ethay urrentcay ernelkay. Ethay\n"
-"  aluesvay eturnedray uponway uccesssay areway: ysnamesay, odenamenay, eleaseray, ersionvay,\n"
-"  achinemay, andway omainnameday. Uponway ailurefay, 'ilnay andway ethay 'errnoway areway eturnedray."
+"Unixway-unameway eturnsray ethay amenay andway informationway aboutway ethay "
+"urrentcay ernelkay. Ethay\n"
+"  aluesvay eturnedray uponway uccesssay areway: ysnamesay, odenamenay, "
+"eleaseray, ersionvay,\n"
+"  achinemay, andway omainnameday. Uponway ailurefay, 'ilnay andway ethay "
+"'errnoway areway eturnedray."
 
 #: src/code/unix-glibc2.lisp
 msgid "Syscall ~A failed: ~A"
@@ -1260,14 +1411,17 @@ msgstr "Yscallsay ~Away ailedfay: ~Away"
 
 #: src/code/unix-glibc2.lisp
 msgid "Unix-gethostname returns the name of the host machine as a string."
-msgstr "Unixway-ethostnamegay eturnsray ethay amenay ofway ethay osthay achinemay asway away ingstray."
+msgstr ""
+"Unixway-ethostnamegay eturnsray ethay amenay ofway ethay osthay achinemay "
+"asway away ingstray."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Unix-fsync writes the core image of the file described by\n"
 "   fd to disk."
 msgstr ""
-"Unixway-syncfay iteswray ethay orecay imageway ofway ethay ilefay escribedday ybay\n"
+"Unixway-syncfay iteswray ethay orecay imageway ofway ethay ilefay "
+"escribedday ybay\n"
 "   dfay otay iskday."
 
 #: src/code/unix-glibc2.lisp
@@ -1276,20 +1430,25 @@ msgid ""
 "  with the control terminal, and then send a SIGHUP signal to the process\n"
 "  group of the control terminal."
 msgstr ""
-"Evokeray accessway ermissionspay otay allway ocessespray urrentlycay ommunicatingcay\n"
-"  ithway ethay ontrolcay erminaltay, andway enthay endsay away SIGHUP ignalsay otay ethay ocesspray\n"
+"Evokeray accessway ermissionspay otay allway ocessespray urrentlycay "
+"ommunicatingcay\n"
+"  ithway ethay ontrolcay erminaltay, andway enthay endsay away SIGHUP "
+"ignalsay otay ethay ocesspray\n"
 "  oupgray ofway ethay ontrolcay erminaltay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Revoke the access of all descriptors currently open on FILE."
-msgstr "Evokeray ethay accessway ofway allway escriptorsday urrentlycay openway onway FILE."
+msgstr ""
+"Evokeray ethay accessway ofway allway escriptorsday urrentlycay openway "
+"onway FILE."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Make PATH be the root directory (the starting point for absolute paths).\n"
 "   This call is restricted to the super-user."
 msgstr ""
-"Akemay PATH ebay ethay ootray irectoryday (ethay tartingsay ointpay orfay absoluteway athspay).\n"
+"Akemay PATH ebay ethay ootray irectoryday (ethay tartingsay ointpay orfay "
+"absoluteway athspay).\n"
 "   Isthay allcay isway estrictedray otay ethay upersay-userway."
 
 #: src/code/unix-glibc2.lisp
@@ -1297,7 +1456,8 @@ msgid ""
 "Unix-gethostid returns a 32-bit integer which provides unique\n"
 "   identification for the host machine."
 msgstr ""
-"Unixway-ethostidgay eturnsray away 32-itbay integerway ichwhay ovidespray uniqueway\n"
+"Unixway-ethostidgay eturnsray away 32-itbay integerway ichwhay ovidespray "
+"uniqueway\n"
 "   identificationway orfay ethay osthay achinemay."
 
 #: src/code/unix-glibc2.lisp
@@ -1306,13 +1466,17 @@ msgid ""
 "   modified to disk.  It returns NIL and an error code if an error\n"
 "   occured."
 msgstr ""
-"Unixway-yncsay iteswray allway informationway inway orecay emorymay ichwhay ashay eenbay\n"
-"   odifiedmay otay iskday.  Itway eturnsray NIL andway anway errorway odecay ifway anway errorway\n"
+"Unixway-yncsay iteswray allway informationway inway orecay emorymay ichwhay "
+"ashay eenbay\n"
+"   odifiedmay otay iskday.  Itway eturnsray NIL andway anway errorway odecay "
+"ifway anway errorway\n"
 "   occuredway."
 
 #: src/code/unix-glibc2.lisp
 msgid "Unix-getpagesize returns the number of bytes in a system page."
-msgstr "Unixway-etpagesizegay eturnsray ethay umbernay ofway ytesbay inway away ystemsay agepay."
+msgstr ""
+"Unixway-etpagesizegay eturnsray ethay umbernay ofway ytesbay inway away "
+"ystemsay agepay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
@@ -1320,8 +1484,10 @@ msgid ""
 "   bytes) specified by LENGTH.  NIL and an error number is returned\n"
 "   if the call is unsuccessful."
 msgstr ""
-"Unixway-uncatetray uncatestray ethay amednay ilefay otay ethay engthlay (inway\n"
-"   ytesbay) ecifiedspay ybay LENGTH.  NIL andway anway errorway umbernay isway eturnedray\n"
+"Unixway-uncatetray uncatestray ethay amednay ilefay otay ethay engthlay "
+"(inway\n"
+"   ytesbay) ecifiedspay ybay LENGTH.  NIL andway anway errorway umbernay "
+"isway eturnedray\n"
 "   ifway ethay allcay isway unsuccessfulway."
 
 #: src/code/unix-glibc2.lisp
@@ -1329,8 +1495,10 @@ msgid ""
 "Unix-ftruncate is similar to unix-truncate except that the first\n"
 "   argument is a file descriptor rather than a file name."
 msgstr ""
-"Unixway-truncatefay isway imilarsay otay unixway-uncatetray exceptway atthay ethay irstfay\n"
-"   argumentway isway away ilefay escriptorday atherray anthay away ilefay amenay."
+"Unixway-truncatefay isway imilarsay otay unixway-uncatetray exceptway atthay "
+"ethay irstfay\n"
+"   argumentway isway away ilefay escriptorday atherray anthay away ilefay "
+"amenay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
@@ -1372,7 +1540,8 @@ msgid ""
 "   This is a simpler version of the interface provided by unix-fcntl.\n"
 "   "
 msgstr ""
-"Unixway-ockslay ancay ocklay, unlockway andway esttay ilesfay accordingway otay ethay mdcay\n"
+"Unixway-ockslay ancay ocklay, unlockway andway esttay ilesfay accordingway "
+"otay ethay mdcay\n"
 "   ichwhay ancay ebay oneway ofway ethay ollowingfay:\n"
 "\n"
 "   f_ulockway  Unlockway away ockedlay egionray\n"
@@ -1380,10 +1549,12 @@ msgstr ""
 "   f_locktay  Esttay andway ocklay away egionray orfay exclusiveway useway\n"
 "   f_esttay   Esttay away egionray orfay othwerway ocessespray ockslay\n"
 "\n"
-"   Ethay ocklay isway orfay away egionray omfray ethay urrentcay ocationlay orfay away engthlay\n"
+"   Ethay ocklay isway orfay away egionray omfray ethay urrentcay ocationlay "
+"orfay away engthlay\n"
 "   ofway engthlay.\n"
 "\n"
-"   Isthay isway away implersay ersionvay ofway ethay interfaceway ovidedpray ybay unixway-cntlfay.\n"
+"   Isthay isway away implersay ersionvay ofway ethay interfaceway ovidedpray "
+"ybay unixway-cntlfay.\n"
 "   "
 
 #: src/code/unix-glibc2.lisp
@@ -1392,8 +1563,10 @@ msgid ""
 "   times on a specified file.  NIL and an error number is\n"
 "   returned if the call is unsuccessful."
 msgstr ""
-"Unixway-utimesway etssay ethay 'astlay-accessedway' andway 'astlay-updatedway'\n"
-"   imestay onway away ecifiedspay ilefay.  NIL andway anway errorway umbernay isway\n"
+"Unixway-utimesway etssay ethay 'astlay-accessedway' andway 'astlay-"
+"updatedway'\n"
+"   imestay onway away ecifiedspay ilefay.  NIL andway anway errorway "
+"umbernay isway\n"
 "   eturnedray ifway ethay allcay isway unsuccessfulway."
 
 #: src/code/unix-glibc2.lisp
@@ -1414,7 +1587,8 @@ msgid ""
 "   descriptors.  See the UNIX Programmer's Manual for more\n"
 "   information."
 msgstr ""
-"Unixway-ioctlway erformspay away arietyvay ofway operationsway onway openway i/o\n"
+"Unixway-ioctlway erformspay away arietyvay ofway operationsway onway openway "
+"i/o\n"
 "   escriptorsday.  Eesay ethay UNIX Ogrammerpray's Anualmay orfay oremay\n"
 "   informationway."
 
@@ -1423,16 +1597,20 @@ msgid ""
 "Change uid used for file access control to UID, without affecting\n"
 "   other priveledges (such as who can send signals at the process)."
 msgstr ""
-"Angechay uidway usedway orfay ilefay accessway ontrolcay otay UID, ithoutway affectingway\n"
-"   otherway iveledgespray (uchsay asway owhay ancay endsay ignalssay atway ethay ocesspray)."
+"Angechay uidway usedway orfay ilefay accessway ontrolcay otay UID, ithoutway "
+"affectingway\n"
+"   otherway iveledgespray (uchsay asway owhay ancay endsay ignalssay atway "
+"ethay ocesspray)."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Change gid used for file access control to GID, without affecting\n"
 "   other priveledges (such as who can send signals at the process)."
 msgstr ""
-"Angechay idgay usedway orfay ilefay accessway ontrolcay otay GID, ithoutway affectingway\n"
-"   otherway iveledgespray (uchsay asway owhay ancay endsay ignalssay atway ethay ocesspray)."
+"Angechay idgay usedway orfay ilefay accessway ontrolcay otay GID, ithoutway "
+"affectingway\n"
+"   otherway iveledgespray (uchsay asway owhay ancay endsay ignalssay atway "
+"ethay ocesspray)."
 
 #: src/code/unix-glibc2.lisp
 msgid "There is data to read."
@@ -1459,9 +1637,11 @@ msgid "Invalid polling request."
 msgstr "Invalidway ollingpay equestray."
 
 #: src/code/unix-glibc2.lisp
-msgid "Canonical number of polling requests to read\n"
+msgid ""
+"Canonical number of polling requests to read\n"
 "in at a time in poll."
-msgstr "Anonicalcay umbernay ofway ollingpay equestsray otay eadray\n"
+msgstr ""
+"Anonicalcay umbernay ofway ollingpay equestsray otay eadray\n"
 "inway atway away imetay inway ollpay."
 
 #: src/code/unix-glibc2.lisp
@@ -1472,10 +1652,14 @@ msgid ""
 "   Returns the number of file descriptors with events, zero if timed out,\n"
 "   or -1 for errors."
 msgstr ""
-" Ollpay ethay ilefay escriptorsday escribedday ybay ethay NFDS ucturesstray tartingsay atway\n"
-"   FDS.  Ifway TIMEOUT isway onzeronay andway otnay -1, allowway TIMEOUT illisecondsmay orfay\n"
-"   anway eventway otay occurway; ifway TIMEOUT isway -1, ockblay untilway anway eventway occursway.\n"
-"   Eturnsray ethay umbernay ofway ilefay escriptorsday ithway eventsway, erozay ifway imedtay outway,\n"
+" Ollpay ethay ilefay escriptorsday escribedday ybay ethay NFDS ucturesstray "
+"tartingsay atway\n"
+"   FDS.  Ifway TIMEOUT isway onzeronay andway otnay -1, allowway TIMEOUT "
+"illisecondsmay orfay\n"
+"   anway eventway otay occurway; ifway TIMEOUT isway -1, ockblay untilway "
+"anway eventway occursway.\n"
+"   Eturnsray ethay umbernay ofway ilefay escriptorsday ithway eventsway, "
+"erozay ifway imedtay outway,\n"
 "   orway -1 orfay errorsway."
 
 #: src/code/unix-glibc2.lisp
@@ -1487,7 +1671,8 @@ msgid ""
 "Set the current soft and hard maximum limits for RESOURCE.\n"
 "   Only the super-user can increase hard limits."
 msgstr ""
-"Etsay ethay urrentcay oftsay andway ardhay aximummay imitslay orfay RESOURCE.\n"
+"Etsay ethay urrentcay oftsay andway ardhay aximummay imitslay orfay "
+"RESOURCE.\n"
 "   Onlyway ethay upersay-userway ancay increaseway ardhay imitslay."
 
 #: src/code/unix-glibc2.lisp
@@ -1495,7 +1680,8 @@ msgid ""
 "Like call getrusage, but return only the system and user time, and returns\n"
 "   the seconds and microseconds as separate values."
 msgstr ""
-"Ikelay allcay etrusagegay, utbay eturnray onlyway ethay ystemsay andway userway imetay, andway eturnsray\n"
+"Ikelay allcay etrusagegay, utbay eturnray onlyway ethay ystemsay andway "
+"userway imetay, andway eturnsray\n"
 "   ethay econdssay andway icrosecondsmay asway eparatesay aluesvay."
 
 #: src/code/unix-glibc2.lisp
@@ -1506,10 +1692,14 @@ msgid ""
 "   child processes (rusage_children).  NIL and an error number\n"
 "   is returned if the call fails."
 msgstr ""
-"Unixway-etrusagegay eturnsray informationway aboutway ethay esourceray usageway\n"
-"   ofway ethay ocesspray ecifiedspay ybay owhay.  Owhay ancay ebay eitherway ethay\n"
-"   urrentcay ocesspray (usageray_elfsay) orway allway ofway ethay erminatedtay\n"
-"   ildchay ocessespray (usageray_ildrenchay).  NIL andway anway errorway umbernay\n"
+"Unixway-etrusagegay eturnsray informationway aboutway ethay esourceray "
+"usageway\n"
+"   ofway ethay ocesspray ecifiedspay ybay owhay.  Owhay ancay ebay eitherway "
+"ethay\n"
+"   urrentcay ocesspray (usageray_elfsay) orway allway ofway ethay "
+"erminatedtay\n"
+"   ildchay ocessespray (usageray_ildrenchay).  NIL andway anway errorway "
+"umbernay\n"
 "   isway eturnedray ifway ethay allcay ailsfay."
 
 #: src/code/unix-glibc2.lisp
@@ -1523,11 +1713,15 @@ msgid ""
 "  Returns -1 on errors."
 msgstr ""
 "Unctionfay ependsday onway CMD:\n"
-"  1 = Eturnray ethay imitlay onway ethay izesay ofway away ilefay, inway unitsway ofway 512 ytesbay.\n"
-"  2 = Etsay ethay imitlay onway ethay izesay ofway away ilefay otay NEWLIMIT.  Onlyway ethay\n"
+"  1 = Eturnray ethay imitlay onway ethay izesay ofway away ilefay, inway "
+"unitsway ofway 512 ytesbay.\n"
+"  2 = Etsay ethay imitlay onway ethay izesay ofway away ilefay otay "
+"NEWLIMIT.  Onlyway ethay\n"
 "      upersay-userway ancay increaseway ethay imitlay.\n"
-"  3 = Eturnray ethay aximummay ossiblepay addressway ofway ethay ataday egmentsay.\n"
-"  4 = Eturnray ethay aximummay umbernay ofway ilesfay atthay ethay allingcay ocesspray ancay openway.\n"
+"  3 = Eturnray ethay aximummay ossiblepay addressway ofway ethay ataday "
+"egmentsay.\n"
+"  4 = Eturnray ethay aximummay umbernay ofway ilesfay atthay ethay allingcay "
+"ocesspray ancay openway.\n"
 "  Eturnsray -1 onway errorsway."
 
 #: src/code/unix-glibc2.lisp
@@ -1537,17 +1731,22 @@ msgid ""
 "   (as specified by WHO) is used.  A lower priority number means higher\n"
 "   priority.  Priorities range from PRIO_MIN to PRIO_MAX (above)."
 msgstr ""
-"Eturnray ethay ighesthay ioritypray ofway anyway ocesspray ecifiedspay ybay WHICH andway WHO\n"
-"   (eesay aboveway); ifway WHO isway erozay, ethay urrentcay ocesspray, ocesspray oupgray, orway userway\n"
-"   (asway ecifiedspay ybay WHO) isway usedway.  Away owerlay ioritypray umbernay eansmay igherhay\n"
-"   ioritypray.  Ioritiespray angeray omfray PRIO_MIN otay PRIO_MAX (aboveway)."
+"Eturnray ethay ighesthay ioritypray ofway anyway ocesspray ecifiedspay ybay "
+"WHICH andway WHO\n"
+"   (eesay aboveway); ifway WHO isway erozay, ethay urrentcay ocesspray, "
+"ocesspray oupgray, orway userway\n"
+"   (asway ecifiedspay ybay WHO) isway usedway.  Away owerlay ioritypray "
+"umbernay eansmay igherhay\n"
+"   ioritypray.  Ioritiespray angeray omfray PRIO_MIN otay PRIO_MAX "
+"(aboveway)."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Set the priority of all processes specified by WHICH and WHO (see above)\n"
 "   to PRIO.  Returns 0 on success, -1 on errors."
 msgstr ""
-"Etsay ethay ioritypray ofway allway ocessespray ecifiedspay ybay WHICH andway WHO (eesay aboveway)\n"
+"Etsay ethay ioritypray ofway allway ocessespray ecifiedspay ybay WHICH "
+"andway WHO (eesay aboveway)\n"
 "   otay PRIO.  Eturnsray 0 onway uccesssay, -1 onway errorsway."
 
 #: src/code/unix-glibc2.lisp
@@ -1560,8 +1759,10 @@ msgid ""
 "   to see if they are ready for reading and writing.  See the UNIX\n"
 "   Programmers Manual for more information."
 msgstr ""
-"Unixway-electsay examinesway ethay etssay ofway escriptorsday assedpay asway argumentsway\n"
-"   otay eesay ifway eythay areway eadyray orfay eadingray andway itingwray.  Eesay ethay UNIX\n"
+"Unixway-electsay examinesway ethay etssay ofway escriptorsday assedpay asway "
+"argumentsway\n"
+"   otay eesay ifway eythay areway eadyray orfay eadingray andway itingwray.  "
+"Eesay ethay UNIX\n"
 "   Ogrammerspray Anualmay orfay oremay informationway."
 
 #: src/code/unix-glibc2.lisp
@@ -1583,7 +1784,8 @@ msgid ""
 "UNIX-FSTAT is similar to UNIX-STAT except the file is specified\n"
 "   by the file descriptor FD."
 msgstr ""
-"UNIX-FSTAT isway imilarsay otay UNIX-STAT exceptway ethay ilefay isway ecifiedspay\n"
+"UNIX-FSTAT isway imilarsay otay UNIX-STAT exceptway ethay ilefay isway "
+"ecifiedspay\n"
 "   ybay ethay ilefay escriptorday FD."
 
 #: src/code/unix-glibc2.lisp
@@ -1619,8 +1821,10 @@ msgid ""
 "  It returns T on successfully completion; NIL and an error number\n"
 "  otherwise."
 msgstr ""
-"Ivengay away ilefay athpay ingstray andway away onstantcay odemay, unixway-modchay angeschay ethay\n"
-"   ermissionpay odemay orfay atthay ilefay otay ethay oneway ecifiedspay. Ethay ewnay odemay\n"
+"Ivengay away ilefay athpay ingstray andway away onstantcay odemay, unixway-"
+"modchay angeschay ethay\n"
+"   ermissionpay odemay orfay atthay ilefay otay ethay oneway ecifiedspay. "
+"Ethay ewnay odemay\n"
 "   ancay ebay eatedcray ybay ogicallylay OR'ingway ethay ollowingfay:\n"
 "\n"
 "      etuidexecsay        Etsay userway ID onway executionway.\n"
@@ -1634,12 +1838,16 @@ msgstr ""
 "      execgrpway           Executeway (earchsay irectoryday) ybay oupgray.\n"
 "      eadothray           Eadray ybay othersway.\n"
 "      iteothwray          Itewray ybay othersway.\n"
-"      execothway           Executeway (earchsay irectoryday) ybay othersway.\n"
+"      execothway           Executeway (earchsay irectoryday) ybay "
+"othersway.\n"
 "\n"
-"  Usthay #o444 andway (ogiorlay unixway:eadownray unixway:eadgrpray unixway:eadothray)\n"
-"  areway equivalentway orfay 'odemay.  Ethay octalway-asebay isway amilarfay otay Unixway usersway.\n"
+"  Usthay #o444 andway (ogiorlay unixway:eadownray unixway:eadgrpray unixway:"
+"eadothray)\n"
+"  areway equivalentway orfay 'odemay.  Ethay octalway-asebay isway amilarfay "
+"otay Unixway usersway.\n"
 "  \n"
-"  Itway eturnsray T onway uccessfullysay ompletioncay; NIL andway anway errorway umbernay\n"
+"  Itway eturnsray T onway uccessfullysay ompletioncay; NIL andway anway "
+"errorway umbernay\n"
 "  otherwiseway."
 
 #: src/code/unix-glibc2.lisp
@@ -1649,9 +1857,12 @@ msgid ""
 "   for that file to the one specified. T is returned if the call\n"
 "   was successful."
 msgstr ""
-"Ivengay anway integerway ilefay escriptorday andway away odemay (ethay amesay asway osethay\n"
-"   usedway orfay unixway-modchay), unixway-chmodfay angeschay ethay ermissionpay odemay\n"
-"   orfay atthay ilefay otay ethay oneway ecifiedspay. T isway eturnedray ifway ethay allcay\n"
+"Ivengay anway integerway ilefay escriptorday andway away odemay (ethay "
+"amesay asway osethay\n"
+"   usedway orfay unixway-modchay), unixway-chmodfay angeschay ethay "
+"ermissionpay odemay\n"
+"   orfay atthay ilefay otay ethay oneway ecifiedspay. T isway eturnedray "
+"ifway ethay allcay\n"
 "   asway uccessfulsay."
 
 #: src/code/unix-glibc2.lisp
@@ -1659,7 +1870,8 @@ msgid ""
 "Set the file creation mask of the current process to MASK,\n"
 "   and return the old creation mask."
 msgstr ""
-"Etsay ethay ilefay eationcray askmay ofway ethay urrentcay ocesspray otay MASK,\n"
+"Etsay ethay ilefay eationcray askmay ofway ethay urrentcay ocesspray otay "
+"MASK,\n"
 "   andway eturnray ethay oldway eationcray askmay."
 
 #: src/code/unix-glibc2.lisp
@@ -1668,8 +1880,10 @@ msgid ""
 "   (Same as those for unix-chmod.)  It returns T upon success, otherwise\n"
 "   NIL and an error number."
 msgstr ""
-"Unixway-kdirmay eatescray away ewnay irectoryday ithway ethay ecifiedspay amenay andway odemay.\n"
-"   (Amesay asway osethay orfay unixway-modchay.)  Itway eturnsray T uponway uccesssay, otherwiseway\n"
+"Unixway-kdirmay eatescray away ewnay irectoryday ithway ethay ecifiedspay "
+"amenay andway odemay.\n"
+"   (Amesay asway osethay orfay unixway-modchay.)  Itway eturnsray T uponway "
+"uccesssay, otherwiseway\n"
 "   NIL andway anway errorway umbernay."
 
 #: src/code/unix-glibc2.lisp
@@ -1678,24 +1892,30 @@ msgid ""
 "  and device number DEV (which can be constructed from major and minor\n"
 "  device numbers with the `makedev' macro above)."
 msgstr ""
-"Eatecray away eviceday ilefay amednay PATH, ithway ermissionpay andway ecialspay itsbay MODE\n"
-"  andway eviceday umbernay DEV (ichwhay ancay ebay onstructedcay omfray ajormay andway inormay\n"
+"Eatecray away eviceday ilefay amednay PATH, ithway ermissionpay andway "
+"ecialspay itsbay MODE\n"
+"  andway eviceday umbernay DEV (ichwhay ancay ebay onstructedcay omfray "
+"ajormay andway inormay\n"
 "  eviceday umbersnay ithway ethay `akedevmay' acromay aboveway)."
 
 #: src/code/unix-glibc2.lisp
 msgid "Create a new FIFO named PATH, with permission bits MODE."
-msgstr "Eatecray away ewnay FIFO amednay PATH, ithway ermissionpay itsbay MODE."
+msgstr ""
+"Eatecray away ewnay FIFO amednay PATH, ithway ermissionpay itsbay MODE."
 
 #: src/code/unix-glibc2.lisp
 msgid "Return information about the filesystem on which FILE resides."
-msgstr "Eturnray informationway aboutway ethay ilesystemfay onway ichwhay FILE esidesray."
+msgstr ""
+"Eturnray informationway aboutway ethay ilesystemfay onway ichwhay FILE "
+"esidesray."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Make the block special device PATH available to the system for swapping.\n"
 "  This call is restricted to the super-user."
 msgstr ""
-"Akemay ethay ockblay ecialspay eviceday PATH availableway otay ethay ystemsay orfay wappingsay.\n"
+"Akemay ethay ockblay ecialspay eviceday PATH availableway otay ethay "
+"ystemsay orfay wappingsay.\n"
 "  Isthay allcay isway estrictedray otay ethay upersay-userway."
 
 #: src/code/unix-glibc2.lisp
@@ -1703,7 +1923,8 @@ msgid ""
 "Make the block special device PATH unavailable to the system for swapping.\n"
 "  This call is restricted to the super-user."
 msgstr ""
-"Akemay ethay ockblay ecialspay eviceday PATH unavailableway otay ethay ystemsay orfay wappingsay.\n"
+"Akemay ethay ockblay ecialspay eviceday PATH unavailableway otay ethay "
+"ystemsay orfay wappingsay.\n"
 "  Isthay allcay isway estrictedray otay ethay upersay-userway."
 
 #: src/code/unix-glibc2.lisp
@@ -1715,12 +1936,15 @@ msgid ""
 "Time used by the program so far (user time + system time).\n"
 "   The result / CLOCKS_PER_SECOND is program time in seconds."
 msgstr ""
-"Imetay usedway ybay ethay ogrampray osay arfay (userway imetay + ystemsay imetay).\n"
+"Imetay usedway ybay ethay ogrampray osay arfay (userway imetay + ystemsay "
+"imetay).\n"
 "   Ethay esultray / CLOCKS_PER_SECOND isway ogrampray imetay inway econdssay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Return the current time and put it in *TIMER if TIMER is not NULL."
-msgstr "Eturnray ethay urrentcay imetay andway utpay itway inway timer*ay ifway TIMER isway otnay NULL."
+msgstr ""
+"Eturnray ethay urrentcay imetay andway utpay itway inway timer*ay ifway "
+"TIMER isway otnay NULL."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
@@ -1729,9 +1953,12 @@ msgid ""
 "   of Greenwich), and a daylight-savings flag.  If it doesn't work, it\n"
 "   returns NIL and the errno."
 msgstr ""
-"Ifway itway orksway, unixway-ettimeofdaygay eturnsray 5 aluesvay: T, ethay econdssay andway\n"
-"   icrosecondsmay ofway ethay urrentcay imetay ofway ayday, ethay imezonetay (inway inutesmay estway\n"
-"   ofway Eenwichgray), andway away aylightday-avingssay agflay.  Ifway itway oesnday't orkway, itway\n"
+"Ifway itway orksway, unixway-ettimeofdaygay eturnsray 5 aluesvay: T, ethay "
+"econdssay andway\n"
+"   icrosecondsmay ofway ethay urrentcay imetay ofway ayday, ethay imezonetay "
+"(inway inutesmay estway\n"
+"   ofway Eenwichgray), andway away aylightday-avingssay agflay.  Ifway itway "
+"oesnday't orkway, itway\n"
 "   eturnsray NIL andway ethay errnoway."
 
 #: src/code/unix-glibc2.lisp
@@ -1741,10 +1968,13 @@ msgid ""
 "   unix-getitimer returns 5 values,\n"
 "   T, it-interval-secs, it-interval-usec, it-value-secs, it-value-usec."
 msgstr ""
-"Unixway-etitimergay eturnsray ethay INTERVAL andway VALUE otsslay ofway oneway ofway\n"
-"   reethay ystemsay imerstay (:ealray :irtualvay orway :ofilepray). Onway uccesssay,\n"
+"Unixway-etitimergay eturnsray ethay INTERVAL andway VALUE otsslay ofway "
+"oneway ofway\n"
+"   reethay ystemsay imerstay (:ealray :irtualvay orway :ofilepray). Onway "
+"uccesssay,\n"
 "   unixway-etitimergay eturnsray 5 aluesvay,\n"
-"   T, itway-intervalway-ecssay, itway-intervalway-usecway, itway-aluevay-ecssay, itway-aluevay-usecway."
+"   T, itway-intervalway-ecssay, itway-intervalway-usecway, itway-aluevay-"
+"ecssay, itway-aluevay-usecway."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
@@ -1757,18 +1987,26 @@ msgid ""
 "   unix-setitimer returns the old contents of the INTERVAL and VALUE\n"
 "   slots as in unix-getitimer."
 msgstr ""
-" Unixway-etitimersay etssay ethay INTERVAL andway VALUE otsslay ofway oneway ofway\n"
-"   reethay ystemsay imerstay (:ealray :irtualvay orway :ofilepray). Away SIGALRM ignalsay\n"
-"   illway ebay eliveredday VALUE <econdssay+icrosecondsmay> omfray ownay. INTERVAL,\n"
-"   enwhay onnay-erozay, isway <econdssay+icrosecondsmay> otay ebay oadedlay eachway imetay\n"
-"   ethay imertay expiresway. Ettingsay INTERVAL andway VALUE otay erozay isablesday\n"
-"   ethay imertay. Eesay ethay Unixway anmay agepay orfay oremay etailsday. Onway uccesssay,\n"
-"   unixway-etitimersay eturnsray ethay oldway ontentscay ofway ethay INTERVAL andway VALUE\n"
+" Unixway-etitimersay etssay ethay INTERVAL andway VALUE otsslay ofway oneway "
+"ofway\n"
+"   reethay ystemsay imerstay (:ealray :irtualvay orway :ofilepray). Away "
+"SIGALRM ignalsay\n"
+"   illway ebay eliveredday VALUE <econdssay+icrosecondsmay> omfray ownay. "
+"INTERVAL,\n"
+"   enwhay onnay-erozay, isway <econdssay+icrosecondsmay> otay ebay oadedlay "
+"eachway imetay\n"
+"   ethay imertay expiresway. Ettingsay INTERVAL andway VALUE otay erozay "
+"isablesday\n"
+"   ethay imertay. Eesay ethay Unixway anmay agepay orfay oremay etailsday. "
+"Onway uccesssay,\n"
+"   unixway-etitimersay eturnsray ethay oldway ontentscay ofway ethay "
+"INTERVAL andway VALUE\n"
 "   otsslay asway inway unixway-etitimergay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Fill in TIMEBUF with information about the current time."
-msgstr "Illfay inway TIMEBUF ithway informationway aboutway ethay urrentcay imetay."
+msgstr ""
+"Illfay inway TIMEBUF ithway informationway aboutway ethay urrentcay imetay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
@@ -1779,7 +2017,8 @@ msgid ""
 msgstr ""
 "Toresay ethay CPU imetay usedway ybay isthay ocesspray andway allway itsway\n"
 "   eadday ildrenchay (andway eirthay eadday ildrenchay) inway BUFFER.\n"
-"   Eturnray ethay elapsedway ealray imetay, orway (ockclay_t) -1 orfay errorsway.\n"
+"   Eturnray ethay elapsedway ealray imetay, orway (ockclay_t) -1 orfay "
+"errorsway.\n"
 "   Allway imestay areway inway CLK_Ckthstay ofway away econdsay."
 
 #: src/code/unix-glibc2.lisp
@@ -1787,8 +2026,10 @@ msgid ""
 "Wait for a child to die.  When one does, put its status in *STAT_LOC\n"
 "   and return its process ID.  For errors, return (pid_t) -1."
 msgstr ""
-"Aitway orfay away ildchay otay ieday.  Enwhay oneway oesday, utpay itsway tatussay inway stat*ay_LOC\n"
-"   andway eturnray itsway ocesspray ID.  Orfay errorsway, eturnray (idpay_t) -1."
+"Aitway orfay away ildchay otay ieday.  Enwhay oneway oesday, utpay itsway "
+"tatussay inway stat*ay_LOC\n"
+"   andway eturnray itsway ocesspray ID.  Orfay errorsway, eturnray (idpay_t) "
+"-1."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
@@ -1806,17 +2047,23 @@ msgid ""
 "   set in OPTIONS, return status for stopped children; otherwise don't."
 msgstr ""
 "Aitway orfay away ildchay atchingmay PID otay ieday.\n"
-"   Ifway PID isway eatergray anthay 0, atchmay anyway ocesspray osewhay ocesspray ID isway PID.\n"
+"   Ifway PID isway eatergray anthay 0, atchmay anyway ocesspray osewhay "
+"ocesspray ID isway PID.\n"
 "   Ifway PID isway (idpay_t) -1, atchmay anyway ocesspray.\n"
 "   Ifway PID isway (idpay_t) 0, atchmay anyway ocesspray ithway ethay\n"
 "   amesay ocesspray oupgray asway ethay urrentcay ocesspray.\n"
 "   Ifway PID isway esslay anthay -1, atchmay anyway ocesspray osewhay\n"
 "   ocesspray oupgray isway ethay absoluteway aluevay ofway PID.\n"
-"   Ifway ethay WNOHANG itbay isway etsay inway OPTIONS, andway atthay ildchay\n"
-"   isway otnay alreadyway eadday, eturnray (idpay_t) 0.  Ifway uccessfulsay,\n"
-"   eturnray PID andway toresay ethay eadday ildchay's tatussay inway STAT_LOC.\n"
-"   Eturnray (idpay_t) -1 orfay errorsway.  Ifway ethay WUNTRACED itbay isway\n"
-"   etsay inway OPTIONS, eturnray tatussay orfay toppedsay ildrenchay; otherwiseway onday't."
+"   Ifway ethay WNOHANG itbay isway etsay inway OPTIONS, andway atthay "
+"ildchay\n"
+"   isway otnay alreadyway eadday, eturnray (idpay_t) 0.  Ifway "
+"uccessfulsay,\n"
+"   eturnray PID andway toresay ethay eadday ildchay's tatussay inway "
+"STAT_LOC.\n"
+"   Eturnray (idpay_t) -1 orfay errorsway.  Ifway ethay WUNTRACED itbay "
+"isway\n"
+"   etsay inway OPTIONS, eturnray tatussay orfay toppedsay ildrenchay; "
+"otherwiseway onday't."
 
 #: src/code/unix-glibc2.lisp
 msgid "Successful"
@@ -2317,14 +2564,20 @@ msgid ""
 "  by _IO, _IOR, _IOW, or _IOWR. If DEV is a character then the ioctl type\n"
 "  is the characters code, else DEV may be an integer giving the type."
 msgstr ""
-"Efineday anway ioctlway ommandcay. Ifway ethay optionalway ARG andway PARM-TYPE areway ivengay\n"
-"  enthay ioctlway argumentway izesay andway irectionday areway includedway asway orfay ioctlsway efinedday\n"
-"  ybay _IO, _IOR, _IOW, orway _IOWR. Ifway DEV isway away aracterchay enthay ethay ioctlway ypetay\n"
-"  isway ethay aracterschay odecay, elseway DEV aymay ebay anway integerway ivinggay ethay ypetay."
+"Efineday anway ioctlway ommandcay. Ifway ethay optionalway ARG andway PARM-"
+"TYPE areway ivengay\n"
+"  enthay ioctlway argumentway izesay andway irectionday areway includedway "
+"asway orfay ioctlsway efinedday\n"
+"  ybay _IO, _IOR, _IOW, orway _IOWR. Ifway DEV isway away aracterchay enthay "
+"ethay ioctlway ypetay\n"
+"  isway ethay aracterschay odecay, elseway DEV aymay ebay anway integerway "
+"ivinggay ethay ypetay."
 
 #: src/code/unix-glibc2.lisp
 msgid "Set the socket process-group for the unix file-descriptor FD to PGRP."
-msgstr "Etsay ethay ocketsay ocesspray-oupgray orfay ethay unixway ilefay-escriptorday FD otay PGRP."
+msgstr ""
+"Etsay ethay ocketsay ocesspray-oupgray orfay ethay unixway ilefay-"
+"escriptorday FD otay PGRP."
 
 #: src/code/unix-glibc2.lisp
 msgid "Set user ID on execution"
@@ -2372,11 +2625,13 @@ msgstr "Executeway (earchsay irectoryday) ybay othersway"
 
 #: src/code/unix-glibc2.lisp
 msgid "Returns either :file, :directory, :link, :special, or NIL."
-msgstr "Eturnsray eitherway :ilefay, :irectoryday, :inklay, :ecialspay, orway NIL."
+msgstr ""
+"Eturnsray eitherway :ilefay, :irectoryday, :inklay, :ecialspay, orway NIL."
 
 #: src/code/unix-glibc2.lisp
 msgid "Returns the pathname with all symbolic links resolved."
-msgstr "Eturnsray ethay athnamepay ithway allway ymbolicsay inkslay esolvedray."
+msgstr ""
+"Eturnsray ethay athnamepay ithway allway ymbolicsay inkslay esolvedray."
 
 #: src/code/unix-glibc2.lisp
 msgid "Error reading link ~S: ~S"
@@ -2384,33 +2639,32 @@ msgstr "Errorway eadingray inklay ~S: ~S"
 
 #: src/code/unix-glibc2.lisp
 msgid ""
-"Return a USER-INFO structure for the user identified by LOGIN, or NIL if "
-"not found."
+"Return a USER-INFO structure for the user identified by LOGIN, or NIL if not "
+"found."
 msgstr ""
-"Eturnray away USER-INFO ucturestray orfay ethay userway identifiedway ybay LOGIN, orway NIL ifway "
-"otnay oundfay."
+"Eturnray away USER-INFO ucturestray orfay ethay userway identifiedway ybay "
+"LOGIN, orway NIL ifway otnay oundfay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Return a USER-INFO structure for the user identified by UID, or NIL if not "
 "found."
 msgstr ""
-"Eturnray away USER-INFO ucturestray orfay ethay userway identifiedway ybay UID, orway NIL ifway otnay "
-"oundfay."
+"Eturnray away USER-INFO ucturestray orfay ethay userway identifiedway ybay "
+"UID, orway NIL ifway otnay oundfay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
 "Return a GROUP-INFO structure for the group identified by NAME, or NIL if "
 "not found."
 msgstr ""
-"Eturnray away GROUP-INFO ucturestray orfay ethay oupgray identifiedway ybay NAME, orway NIL ifway "
-"otnay oundfay."
+"Eturnray away GROUP-INFO ucturestray orfay ethay oupgray identifiedway ybay "
+"NAME, orway NIL ifway otnay oundfay."
 
 #: src/code/unix-glibc2.lisp
 msgid ""
-"Return a GROUP-INFO structure for the group identified by GID, or NIL if "
-"not found."
+"Return a GROUP-INFO structure for the group identified by GID, or NIL if not "
+"found."
 msgstr ""
-"Eturnray away GROUP-INFO ucturestray orfay ethay oupgray identifiedway ybay GID, orway NIL ifway "
-"otnay oundfay."
-
+"Eturnray away GROUP-INFO ucturestray orfay ethay oupgray identifiedway ybay "
+"GID, orway NIL ifway otnay oundfay."
diff --git a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-unix.po b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-unix.po
index 45fb4bdce..a2e6a1229 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-unix.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-unix.po
@@ -1,10 +1,12 @@
-#@ cmucl-unix
+# @ cmucl-unix
 # SOME DESCRIPTIVE TITLE
 # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR
 #
 #, fuzzy
 msgid ""
-msgstr "Project-Id-Version: CMUCL 20B\n"
+msgstr ""
+"Project-Id-Version: CMUCL 20B\n"
+"Report-Msgid-Bugs-To: \n"
 "PO-Revision-Date: YEAR-MO-DA HO:MI +ZONE\n"
 "Last-Translator: Automatic translation\n"
 "Language-Team: Pig Latin (auto-translated)\n"
@@ -504,7 +506,9 @@ msgstr ".iblay ectionsay inway away.outway orruptedcay"
 
 #: src/code/unix.lisp
 msgid "Attempting to link in more shared libraries than system limit"
-msgstr "Attemptingway otay inklay inway oremay aredshay ibrarieslay anthay ystemsay imitlay"
+msgstr ""
+"Attemptingway otay inklay inway oremay aredshay ibrarieslay anthay ystemsay "
+"imitlay"
 
 #: src/code/unix.lisp
 msgid "Can not exec a shared library directly"
@@ -523,8 +527,8 @@ msgid ""
 "Number of symbolic links encountered during path name traversal exceeds "
 "MAXSYMLINKS"
 msgstr ""
-"Umbernay ofway ymbolicsay inkslay encounteredway uringday athpay amenay aversaltray exceedsway "
-"MAXSYMLINKS"
+"Umbernay ofway ymbolicsay inkslay encounteredway uringday athpay amenay "
+"aversaltray exceedsway MAXSYMLINKS"
 
 #: src/code/unix.lisp
 msgid "Error 91"
@@ -675,7 +679,8 @@ msgid ""
 "Returns a string describing the error number which was returned by a\n"
 "  UNIX system call."
 msgstr ""
-"Eturnsray away ingstray escribingday ethay errorway umbernay ichwhay asway eturnedray ybay away\n"
+"Eturnsray away ingstray escribingday ethay errorway umbernay ichwhay asway "
+"eturnedray ybay away\n"
 "  UNIX ystemsay allcay."
 
 #: src/code/unix.lisp
@@ -698,8 +703,10 @@ msgid ""
 "   if not, the effective user ID is set to UID."
 msgstr ""
 "Etsay ethay userway ID ofway ethay allingcay ocesspray otay UID.\n"
-"   Ifway ethay allingcay ocesspray isway ethay upersay-userway, etsay ethay ealray\n"
-"   andway effectiveway userway Idsway, andway ethay avedsay etsay-userway-ID otay UID;\n"
+"   Ifway ethay allingcay ocesspray isway ethay upersay-userway, etsay ethay "
+"ealray\n"
+"   andway effectiveway userway Idsway, andway ethay avedsay etsay-userway-ID "
+"otay UID;\n"
 "   ifway otnay, ethay effectiveway userway ID isway etsay otay UID."
 
 #: src/code/unix.lisp
@@ -710,8 +717,10 @@ msgid ""
 "   if not, the effective group ID is set to GID."
 msgstr ""
 "Etsay ethay oupgray ID ofway ethay allingcay ocesspray otay GID.\n"
-"   Ifway ethay allingcay ocesspray isway ethay upersay-userway, etsay ethay ealray\n"
-"   andway effectiveway oupgray Idsway, andway ethay avedsay etsay-oupgray-ID otay GID;\n"
+"   Ifway ethay allingcay ocesspray isway ethay upersay-userway, etsay ethay "
+"ealray\n"
+"   andway effectiveway oupgray Idsway, andway ethay avedsay etsay-oupgray-ID "
+"otay GID;\n"
 "   ifway otnay, ethay effectiveway oupgray ID isway etsay otay GID."
 
 #: src/code/unix.lisp
@@ -738,28 +747,32 @@ msgid ""
 "   NIL which determines why the file was not accessible.\n"
 "\n"
 "   The access modes are:\n"
-"	r_ok     Read permission.\n"
-"	w_ok     Write permission.\n"
-"	x_ok     Execute permission.\n"
-"	f_ok     Presence of file."
-msgstr ""
-"Ivengay away ilefay athpay (away ingstray) andway oneway ofway ourfay onstantcay odesmay,\n"
-"   unixway-accessway eturnsray T ifway ethay ilefay isway accessibleway ithway atthay\n"
-"   odemay andway NIL ifway otnay.  Itway alsoway eturnsray anway errnoway aluevay ithway\n"
+"\tr_ok     Read permission.\n"
+"\tw_ok     Write permission.\n"
+"\tx_ok     Execute permission.\n"
+"\tf_ok     Presence of file."
+msgstr ""
+"Ivengay away ilefay athpay (away ingstray) andway oneway ofway ourfay "
+"onstantcay odesmay,\n"
+"   unixway-accessway eturnsray T ifway ethay ilefay isway accessibleway "
+"ithway atthay\n"
+"   odemay andway NIL ifway otnay.  Itway alsoway eturnsray anway errnoway "
+"aluevay ithway\n"
 "   NIL ichwhay eterminesday ywhay ethay ilefay asway otnay accessibleway.\n"
 "\n"
 "   Ethay accessway odesmay areway:\n"
-"	r_okway     Eadray ermissionpay.\n"
-"	w_okway     Itewray ermissionpay.\n"
-"	x_okway     Executeway ermissionpay.\n"
-"	f_okway     Esencepray ofway ilefay."
+"\tr_okway     Eadray ermissionpay.\n"
+"\tw_okway     Itewray ermissionpay.\n"
+"\tx_okway     Executeway ermissionpay.\n"
+"\tf_okway     Esencepray ofway ilefay."
 
 #: src/code/unix.lisp
 msgid ""
 "Given a file path string, unix-chdir changes the current working \n"
 "   directory to the one specified."
 msgstr ""
-"Ivengay away ilefay athpay ingstray, unixway-dirchay angeschay ethay urrentcay orkingway \n"
+"Ivengay away ilefay athpay ingstray, unixway-dirchay angeschay ethay "
+"urrentcay orkingway \n"
 "   irectoryday otay ethay oneway ecifiedspay."
 
 #: src/code/unix.lisp
@@ -835,8 +848,10 @@ msgid ""
 "  It returns T on successfully completion; NIL and an error number\n"
 "  otherwise."
 msgstr ""
-"Ivengay away ilefay athpay ingstray andway away onstantcay odemay, unixway-modchay angeschay ethay\n"
-"   ermissionpay odemay orfay atthay ilefay otay ethay oneway ecifiedspay. Ethay ewnay odemay\n"
+"Ivengay away ilefay athpay ingstray andway away onstantcay odemay, unixway-"
+"modchay angeschay ethay\n"
+"   ermissionpay odemay orfay atthay ilefay otay ethay oneway ecifiedspay. "
+"Ethay ewnay odemay\n"
 "   ancay ebay eatedcray ybay ogicallylay OR'ingway ethay ollowingfay:\n"
 "\n"
 "      etuidexecsay        Etsay userway ID onway executionway.\n"
@@ -850,12 +865,16 @@ msgstr ""
 "      execgrpway           Executeway (earchsay irectoryday) ybay oupgray.\n"
 "      eadothray           Eadray ybay othersway.\n"
 "      iteothwray          Itewray ybay othersway.\n"
-"      execothway           Executeway (earchsay irectoryday) ybay othersway.\n"
+"      execothway           Executeway (earchsay irectoryday) ybay "
+"othersway.\n"
 "  \n"
-"  Usthay #o444 andway (ogiorlay unixway:eadownray unixway:eadgrpray unixway:eadothray)\n"
-"  areway equivalentway orfay 'odemay.  Ethay octalway-asebay isway amilarfay otay Unixway usersway.\n"
+"  Usthay #o444 andway (ogiorlay unixway:eadownray unixway:eadgrpray unixway:"
+"eadothray)\n"
+"  areway equivalentway orfay 'odemay.  Ethay octalway-asebay isway amilarfay "
+"otay Unixway usersway.\n"
 "\n"
-"  Itway eturnsray T onway uccessfullysay ompletioncay; NIL andway anway errorway umbernay\n"
+"  Itway eturnsray T onway uccessfullysay ompletioncay; NIL andway anway "
+"errorway umbernay\n"
 "  otherwiseway."
 
 #: src/code/unix.lisp
@@ -865,9 +884,12 @@ msgid ""
 "   for that file to the one specified. T is returned if the call\n"
 "   was successful."
 msgstr ""
-"Ivengay anway integerway ilefay escriptorday andway away odemay (ethay amesay asway osethay\n"
-"   usedway orfay unixway-modchay), unixway-chmodfay angeschay ethay ermissionpay odemay\n"
-"   orfay atthay ilefay otay ethay oneway ecifiedspay. T isway eturnedray ifway ethay allcay\n"
+"Ivengay anway integerway ilefay escriptorday andway away odemay (ethay "
+"amesay asway osethay\n"
+"   usedway orfay unixway-modchay), unixway-chmodfay angeschay ethay "
+"ermissionpay odemay\n"
+"   orfay atthay ilefay otay ethay oneway ecifiedspay. T isway eturnedray "
+"ifway ethay allcay\n"
 "   asway uccessfulsay."
 
 #: src/code/unix.lisp
@@ -878,10 +900,14 @@ msgid ""
 "   left unchanged by specifying them as -1.  Note: Permission will\n"
 "   fail if the caller is not the superuser."
 msgstr ""
-"Ivengay away ilefay athpay, anway integerway userway-idway, andway anway integerway oupgray-idway,\n"
-"   unixway-ownchay angeschay ethay ownerway ofway ethay ilefay andway ethay oupgray ofway ethay\n"
-"   ilefay otay osethay ecifiedspay.  Eitherway ethay ownerway orway ethay oupgray aymay ebay\n"
-"   eftlay unchangedway ybay ecifyingspay emthay asway -1.  Otenay: Ermissionpay illway\n"
+"Ivengay away ilefay athpay, anway integerway userway-idway, andway anway "
+"integerway oupgray-idway,\n"
+"   unixway-ownchay angeschay ethay ownerway ofway ethay ilefay andway ethay "
+"oupgray ofway ethay\n"
+"   ilefay otay osethay ecifiedspay.  Eitherway ethay ownerway orway ethay "
+"oupgray aymay ebay\n"
+"   eftlay unchangedway ybay ecifyingspay emthay asway -1.  Otenay: "
+"Ermissionpay illway\n"
 "   ailfay ifway ethay allercay isway otnay ethay uperusersay."
 
 #: src/code/unix.lisp
@@ -889,7 +915,8 @@ msgid ""
 "Unix-fchown is like unix-chown, except that it accepts an integer\n"
 "   file descriptor instead of a file path name."
 msgstr ""
-"Unixway-chownfay isway ikelay unixway-ownchay, exceptway atthay itway acceptsway anway integerway\n"
+"Unixway-chownfay isway ikelay unixway-ownchay, exceptway atthay itway "
+"acceptsway anway integerway\n"
 "   ilefay escriptorday insteadway ofway away ilefay athpay amenay."
 
 #: src/code/unix.lisp
@@ -898,8 +925,10 @@ msgid ""
 "   table. (i.e. the maximum number of descriptors that can exist at\n"
 "   one time.)"
 msgstr ""
-"Unixway-etdtablesizegay eturnsray ethay aximummay izesay ofway ethay ilefay escriptorday\n"
-"   abletay. (i.e. ethay aximummay umbernay ofway escriptorsday atthay ancay existway atway\n"
+"Unixway-etdtablesizegay eturnsray ethay aximummay izesay ofway ethay ilefay "
+"escriptorday\n"
+"   abletay. (i.e. ethay aximummay umbernay ofway escriptorsday atthay ancay "
+"existway atway\n"
 "   oneway imetay.)"
 
 #: src/code/unix.lisp
@@ -908,8 +937,10 @@ msgid ""
 "   closes the file associated with it.  T is returned upon successful\n"
 "   completion, otherwise NIL and an error number."
 msgstr ""
-"Unixway-oseclay akestay anway integerway ilefay escriptorday asway anway argumentway andway\n"
-"   osesclay ethay ilefay associatedway ithway itway.  T isway eturnedray uponway uccessfulsay\n"
+"Unixway-oseclay akestay anway integerway ilefay escriptorday asway anway "
+"argumentway andway\n"
+"   osesclay ethay ilefay associatedway ithway itway.  T isway eturnedray "
+"uponway uccessfulsay\n"
 "   ompletioncay, otherwiseway NIL andway anway errorway umbernay."
 
 #: src/code/unix.lisp
@@ -921,9 +952,12 @@ msgid ""
 "\n"
 "   This interface is made obsolete by UNIX-OPEN."
 msgstr ""
-"Unixway-eatcray acceptsway away ilefay amenay andway away odemay (amesay asway osethay orfay\n"
-"   unixway-modchay) andway eatescray away ilefay ybay atthay amenay ithway ethay ecifiedspay\n"
-"   ermissionpay odemay.  Itway eturnsray away ilefay escriptorday onway uccesssay,\n"
+"Unixway-eatcray acceptsway away ilefay amenay andway away odemay (amesay "
+"asway osethay orfay\n"
+"   unixway-modchay) andway eatescray away ilefay ybay atthay amenay ithway "
+"ethay ecifiedspay\n"
+"   ermissionpay odemay.  Itway eturnsray away ilefay escriptorday onway "
+"uccesssay,\n"
 "   orway NIL andway anway errorway  umbernay otherwiseway.\n"
 "\n"
 "   Isthay interfaceway isway ademay obsoleteway ybay UNIX-OPEN."
@@ -934,8 +968,10 @@ msgid ""
 "   argument) and return it.  If FD is not a valid file descriptor, NIL\n"
 "   and an error number are returned."
 msgstr ""
-"Unixway-upday uplicatesday anway existingway ilefay escriptorday (ivengay asway ethay\n"
-"   argumentway) andway eturnray itway.  Ifway FD isway otnay away alidvay ilefay escriptorday, NIL\n"
+"Unixway-upday uplicatesday anway existingway ilefay escriptorday (ivengay "
+"asway ethay\n"
+"   argumentway) andway eturnray itway.  Ifway FD isway otnay away alidvay "
+"ilefay escriptorday, NIL\n"
 "   andway anway errorway umbernay areway eturnedray."
 
 #: src/code/unix.lisp
@@ -946,10 +982,14 @@ msgid ""
 "   requested descriptor number, it will be closed and the number\n"
 "   assigned to the duplicate."
 msgstr ""
-"Unixway-upday2 uplicatesday anway existingway ilefay escriptorday ustjay asway unixway-upday\n"
-"   oesday onlyway ethay ewnay aluevay ofway ethay uplicateday escriptorday aymay ebay equestedray\n"
-"   roughthay ethay econdsay argumentway.  Ifway away ilefay alreadyway existsway ithway ethay\n"
-"   equestedray escriptorday umbernay, itway illway ebay osedclay andway ethay umbernay\n"
+"Unixway-upday2 uplicatesday anway existingway ilefay escriptorday ustjay "
+"asway unixway-upday\n"
+"   oesday onlyway ethay ewnay aluevay ofway ethay uplicateday escriptorday "
+"aymay ebay equestedray\n"
+"   roughthay ethay econdsay argumentway.  Ifway away ilefay alreadyway "
+"existsway ithway ethay\n"
+"   equestedray escriptorday umbernay, itway illway ebay osedclay andway "
+"ethay umbernay\n"
 "   assignedway otay ethay uplicateday."
 
 #: src/code/unix.lisp
@@ -1065,7 +1105,8 @@ msgid ""
 "Unix-link creates a hard link from the file with name1 to the\n"
 "   file with name2."
 msgstr ""
-"Unixway-inklay eatescray away ardhay inklay omfray ethay ilefay ithway amenay1 otay ethay\n"
+"Unixway-inklay eatescray away ardhay inklay omfray ethay ilefay ithway "
+"amenay1 otay ethay\n"
 "   ilefay ithway amenay2."
 
 #: src/code/unix.lisp
@@ -1090,8 +1131,10 @@ msgid ""
 "   l_xtnd       Extend the file size.\n"
 "  _N"
 msgstr ""
-"Unixway-seeklay acceptsway away ilefay escriptorday andway ovesmay ethay ilefay ointerpay aheadway\n"
-"   away ertaincay offsetway orfay atthay ilefay.  Encewhay ancay ebay anyway ofway ethay ollowingfay:\n"
+"Unixway-seeklay acceptsway away ilefay escriptorday andway ovesmay ethay "
+"ilefay ointerpay aheadway\n"
+"   away ertaincay offsetway orfay atthay ilefay.  Encewhay ancay ebay anyway "
+"ofway ethay ollowingfay:\n"
 "\n"
 "   l_etsay        Etsay ethay ilefay ointerpay.\n"
 "   l_incrway       Incrementway ethay ilefay ointerpay.\n"
@@ -1104,8 +1147,10 @@ msgid ""
 "   (Same as those for unix-chmod.)  It returns T upon success, otherwise\n"
 "   NIL and an error number."
 msgstr ""
-"Unixway-kdirmay eatescray away ewnay irectoryday ithway ethay ecifiedspay amenay andway odemay.\n"
-"   (Amesay asway osethay orfay unixway-modchay.)  Itway eturnsray T uponway uccesssay, otherwiseway\n"
+"Unixway-kdirmay eatescray away ewnay irectoryday ithway ethay ecifiedspay "
+"amenay andway odemay.\n"
+"   (Amesay asway osethay orfay unixway-modchay.)  Itway eturnsray T uponway "
+"uccesssay, otherwiseway\n"
 "   NIL andway anway errorway umbernay."
 
 #: src/code/unix.lisp
@@ -1169,8 +1214,10 @@ msgid ""
 "   a permission of argument mode if the file doesn't exist.  An\n"
 "   integer file descriptor is returned by unix-open."
 msgstr ""
-"Unixway-openway opensway ethay ilefay osewhay athnamepay isway ecifiedspay ybay athpay\n"
-"   orfay eadingray andway/orway itingwray asway ecifiedspay ybay ethay agsflay argumentway.\n"
+"Unixway-openway opensway ethay ilefay osewhay athnamepay isway ecifiedspay "
+"ybay athpay\n"
+"   orfay eadingray andway/orway itingwray asway ecifiedspay ybay ethay "
+"agsflay argumentway.\n"
 "   Ethay agsflay argumentway ancay ebay:\n"
 "\n"
 "     o_donlyray        Eadray-onlyway agflay.\n"
@@ -1180,8 +1227,10 @@ msgstr ""
 "     o_eatcray         Eatecray-ifway-onexistantnay agflay.\n"
 "     o_unctray         Uncatetray-otay-izesay-0 agflay.\n"
 "\n"
-"   Ifway ethay o_eatcray agflay isway ecifiedspay, enthay ethay ilefay isway eatedcray ithway\n"
-"   away ermissionpay ofway argumentway odemay ifway ethay ilefay oesnday't existway.  Anway\n"
+"   Ifway ethay o_eatcray agflay isway ecifiedspay, enthay ethay ilefay isway "
+"eatedcray ithway\n"
+"   away ermissionpay ofway argumentway odemay ifway ethay ilefay oesnday't "
+"existway.  Anway\n"
 "   integerway ilefay escriptorday isway eturnedray ybay unixway-openway."
 
 #: src/code/unix.lisp
@@ -1193,11 +1242,16 @@ msgid ""
 "  an error occurred the first value is NIL and the second\n"
 "  the unix error code."
 msgstr ""
-"Unixway-ipepay etssay upway away unixway-ipingpay echanismmay onsistingcay ofway\n"
-"  anway inputway ipepay andway anway outputway ipepay.  Unixway-Ipepay eturnsray wotay\n"
-"  aluesvay: ifway onay errorway occurredway ethay irstfay aluevay isway ethay ipepay\n"
-"  otay ebay eadray omfray andway ethay econdsay isway ancay ebay ittenwray otay.  Ifway\n"
-"  anway errorway occurredway ethay irstfay aluevay isway NIL andway ethay econdsay\n"
+"Unixway-ipepay etssay upway away unixway-ipingpay echanismmay onsistingcay "
+"ofway\n"
+"  anway inputway ipepay andway anway outputway ipepay.  Unixway-Ipepay "
+"eturnsray wotay\n"
+"  aluesvay: ifway onay errorway occurredway ethay irstfay aluevay isway "
+"ethay ipepay\n"
+"  otay ebay eadray omfray andway ethay econdsay isway ancay ebay ittenwray "
+"otay.  Ifway\n"
+"  anway errorway occurredway ethay irstfay aluevay isway NIL andway ethay "
+"econdsay\n"
 "  ethay unixway errorway odecay."
 
 #: src/code/unix.lisp
@@ -1207,9 +1261,12 @@ msgid ""
 "   The number of bytes actually read is returned or NIL and an error\n"
 "   number if an error occured."
 msgstr ""
-"Unixway-eadray attemptsway otay eadray omfray ethay ilefay escribedday ybay dfay intoway\n"
-"   ethay ufferbay ufbay untilway itway isway ullfay.  Enlay isway ethay engthlay ofway ethay ufferbay.\n"
-"   Ethay umbernay ofway ytesbay actuallyway eadray isway eturnedray orway NIL andway anway errorway\n"
+"Unixway-eadray attemptsway otay eadray omfray ethay ilefay escribedday ybay "
+"dfay intoway\n"
+"   ethay ufferbay ufbay untilway itway isway ullfay.  Enlay isway ethay "
+"engthlay ofway ethay ufferbay.\n"
+"   Ethay umbernay ofway ytesbay actuallyway eadray isway eturnedray orway "
+"NIL andway anway errorway\n"
 "   umbernay ifway anway errorway occuredway."
 
 #: src/code/unix.lisp
@@ -1219,9 +1276,12 @@ msgid ""
 "  the contents of the symbolic link if the call is successful, or\n"
 "  NIL and the Unix error number."
 msgstr ""
-"Unixway-eadlinkray invokesway ethay eadlinkray ystemsay allcay onway ethay ilefay amenay\n"
-"  ecifiedspay ybay ethay implesay ingstray athpay.  Itway eturnsray upway otay wotay aluesvay:\n"
-"  ethay ontentscay ofway ethay ymbolicsay inklay ifway ethay allcay isway uccessfulsay, orway\n"
+"Unixway-eadlinkray invokesway ethay eadlinkray ystemsay allcay onway ethay "
+"ilefay amenay\n"
+"  ecifiedspay ybay ethay implesay ingstray athpay.  Itway eturnsray upway "
+"otay wotay aluesvay:\n"
+"  ethay ontentscay ofway ethay ymbolicsay inklay ifway ethay allcay isway "
+"uccessfulsay, orway\n"
 "  NIL andway ethay Unixway errorway umbernay."
 
 #: src/code/unix.lisp
@@ -1229,34 +1289,37 @@ msgid ""
 "Unix-rename renames the file with string name1 to the string\n"
 "   name2.  NIL and an error code is returned if an error occured."
 msgstr ""
-"Unixway-enameray enamesray ethay ilefay ithway ingstray amenay1 otay ethay ingstray\n"
-"   amenay2.  NIL andway anway errorway odecay isway eturnedray ifway anway errorway occuredway."
+"Unixway-enameray enamesray ethay ilefay ithway ingstray amenay1 otay ethay "
+"ingstray\n"
+"   amenay2.  NIL andway anway errorway odecay isway eturnedray ifway anway "
+"errorway occuredway."
 
 #: src/code/unix.lisp
 msgid ""
 "Unix-rmdir attempts to remove the directory name.  NIL and\n"
 "   an error number is returned if an error occured."
 msgstr ""
-"Unixway-mdirray attemptsway otay emoveray ethay irectoryday amenay.  NIL andway\n"
+"Unixway-mdirray attemptsway otay emoveray ethay irectoryday amenay.  NIL "
+"andway\n"
 "   anway errorway umbernay isway eturnedray ifway anway errorway occuredway."
 
 #: src/code/unix.lisp
 msgid ""
 "Perform the UNIX select(2) system call.\n"
 "  (declare (type (integer 0 #.FD-SETSIZE) num-descriptors)\n"
-"	   (type (or (alien (* (struct fd-set))) null)\n"
-"		 read-fds write-fds exception-fds)\n"
-"	   (type (or null (unsigned-byte 31)) timeout-secs)\n"
-"	   (type (unsigned-byte 31) timeout-usecs)\n"
-"	   (optimize (speed 3) (safety 0) (inhibit-warnings 3)))"
+"\t   (type (or (alien (* (struct fd-set))) null)\n"
+"\t\t read-fds write-fds exception-fds)\n"
+"\t   (type (or null (unsigned-byte 31)) timeout-secs)\n"
+"\t   (type (unsigned-byte 31) timeout-usecs)\n"
+"\t   (optimize (speed 3) (safety 0) (inhibit-warnings 3)))"
 msgstr ""
 "Erformpay ethay UNIX electsay(2) ystemsay allcay.\n"
 "  (eclareday (ypetay (integerway 0 #.FD-SETSIZE) umnay-escriptorsday)\n"
-"	   (ypetay (orway (alienway (* (uctstray dfay-etsay))) ullnay)\n"
-"		 eadray-dsfay itewray-dsfay exceptionway-dsfay)\n"
-"	   (ypetay (orway ullnay (unsignedway-ytebay 31)) imeouttay-ecssay)\n"
-"	   (ypetay (unsignedway-ytebay 31) imeouttay-usecsway)\n"
-"	   (optimizeway (eedspay 3) (afetysay 0) (inhibitway-arningsway 3)))"
+"\t   (ypetay (orway (alienway (* (uctstray dfay-etsay))) ullnay)\n"
+"\t\t eadray-dsfay itewray-dsfay exceptionway-dsfay)\n"
+"\t   (ypetay (orway ullnay (unsignedway-ytebay 31)) imeouttay-ecssay)\n"
+"\t   (ypetay (unsignedway-ytebay 31) imeouttay-usecsway)\n"
+"\t   (optimizeway (eedspay 3) (afetysay 0) (inhibitway-arningsway 3)))"
 
 #: src/code/unix.lisp
 msgid ""
@@ -1264,8 +1327,10 @@ msgid ""
 "   to see if they are ready for reading and writing.  See the UNIX\n"
 "   Programmers Manual for more information."
 msgstr ""
-"Unixway-electsay examinesway ethay etssay ofway escriptorsday assedpay asway argumentsway\n"
-"   otay eesay ifway eythay areway eadyray orfay eadingray andway itingwray.  Eesay ethay UNIX\n"
+"Unixway-electsay examinesway ethay etssay ofway escriptorsday assedpay asway "
+"argumentsway\n"
+"   otay eesay ifway eythay areway eadyray orfay eadingray andway itingwray.  "
+"Eesay ethay UNIX\n"
 "   Ogrammerspray Anualmay orfay oremay informationway."
 
 #: src/code/unix.lisp
@@ -1274,8 +1339,10 @@ msgid ""
 "   modified to disk.  It returns NIL and an error code if an error\n"
 "   occured."
 msgstr ""
-"Unixway-yncsay iteswray allway informationway inway orecay emorymay ichwhay ashay eenbay\n"
-"   odifiedmay otay iskday.  Itway eturnsray NIL andway anway errorway odecay ifway anway errorway\n"
+"Unixway-yncsay iteswray allway informationway inway orecay emorymay ichwhay "
+"ashay eenbay\n"
+"   odifiedmay otay iskday.  Itway eturnsray NIL andway anway errorway odecay "
+"ifway anway errorway\n"
 "   occuredway."
 
 #: src/code/unix.lisp
@@ -1283,7 +1350,8 @@ msgid ""
 "Unix-fsync writes the core image of the file described by\n"
 "   fd to disk."
 msgstr ""
-"Unixway-syncfay iteswray ethay orecay imageway ofway ethay ilefay escribedday ybay\n"
+"Unixway-syncfay iteswray ethay orecay imageway ofway ethay ilefay "
+"escribedday ybay\n"
 "   dfay otay iskday."
 
 #: src/code/unix.lisp
@@ -1292,8 +1360,10 @@ msgid ""
 "   bytes) specified by len.  NIL and an error number is returned\n"
 "   if the call is unsuccessful."
 msgstr ""
-"Unixway-uncatetray uncatestray ethay amednay ilefay otay ethay engthlay (inway\n"
-"   ytesbay) ecifiedspay ybay enlay.  NIL andway anway errorway umbernay isway eturnedray\n"
+"Unixway-uncatetray uncatestray ethay amednay ilefay otay ethay engthlay "
+"(inway\n"
+"   ytesbay) ecifiedspay ybay enlay.  NIL andway anway errorway umbernay "
+"isway eturnedray\n"
 "   ifway ethay allcay isway unsuccessfulway."
 
 #: src/code/unix.lisp
@@ -1301,8 +1371,10 @@ msgid ""
 "Unix-ftruncate is similar to unix-truncate except that the first\n"
 "   argument is a file descriptor rather than a file name."
 msgstr ""
-"Unixway-truncatefay isway imilarsay otay unixway-uncatetray exceptway atthay ethay irstfay\n"
-"   argumentway isway away ilefay escriptorday atherray anthay away ilefay amenay."
+"Unixway-truncatefay isway imilarsay otay unixway-uncatetray exceptway atthay "
+"ethay irstfay\n"
+"   argumentway isway away ilefay escriptorday atherray anthay away ilefay "
+"amenay."
 
 #: src/code/unix.lisp
 msgid ""
@@ -1310,8 +1382,10 @@ msgid ""
 "   named name1.  NIL and an error number is returned if the call\n"
 "   is unsuccessful."
 msgstr ""
-"Unixway-ymlinksay eatescray away ymbolicsay inklay amednay amenay2 otay ethay ilefay\n"
-"   amednay amenay1.  NIL andway anway errorway umbernay isway eturnedray ifway ethay allcay\n"
+"Unixway-ymlinksay eatescray away ymbolicsay inklay amednay amenay2 otay "
+"ethay ilefay\n"
+"   amednay amenay1.  NIL andway anway errorway umbernay isway eturnedray "
+"ifway ethay allcay\n"
 "   isway unsuccessfulway."
 
 #: src/code/unix.lisp
@@ -1319,8 +1393,10 @@ msgid ""
 "Unix-unlink removes the directory entry for the named file.\n"
 "   NIL and an error code is returned if the call fails."
 msgstr ""
-"Unixway-unlinkway emovesray ethay irectoryday entryway orfay ethay amednay ilefay.\n"
-"   NIL andway anway errorway odecay isway eturnedray ifway ethay allcay ailsfay."
+"Unixway-unlinkway emovesray ethay irectoryday entryway orfay ethay amednay "
+"ilefay.\n"
+"   NIL andway anway errorway odecay isway eturnedray ifway ethay allcay "
+"ailsfay."
 
 #: src/code/unix.lisp
 msgid ""
@@ -1328,8 +1404,10 @@ msgid ""
 "   len to the file described by the file descriptor fd.  NIL and an\n"
 "   error is returned if the call is unsuccessful."
 msgstr ""
-"Unixway-itewray attemptsway otay itewray away aracterchay ufferbay (ufbay) ofway engthlay\n"
-"   enlay otay ethay ilefay escribedday ybay ethay ilefay escriptorday dfay.  NIL andway anway\n"
+"Unixway-itewray attemptsway otay itewray away aracterchay ufferbay (ufbay) "
+"ofway engthlay\n"
+"   enlay otay ethay ilefay escribedday ybay ethay ilefay escriptorday dfay.  "
+"NIL andway anway\n"
 "   errorway isway eturnedray ifway ethay allcay isway unsuccessfulway."
 
 #: src/code/unix.lisp
@@ -1338,7 +1416,8 @@ msgid ""
 "   descriptors.  See the UNIX Programmer's Manual for more\n"
 "   information."
 msgstr ""
-"Unixway-ioctlway erformspay away arietyvay ofway operationsway onway openway i/o\n"
+"Unixway-ioctlway erformspay away arietyvay ofway operationsway onway openway "
+"i/o\n"
 "   escriptorsday.  Eesay ethay UNIX Ogrammerpray's Anualmay orfay oremay\n"
 "   informationway."
 
@@ -1388,20 +1467,24 @@ msgstr "Owflay ontrolcay"
 
 #: src/code/unix.lisp
 msgid "Set the tty-process-group for the unix file-descriptor FD to PGRP."
-msgstr "Etsay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday FD otay PGRP."
+msgstr ""
+"Etsay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday "
+"FD otay PGRP."
 
 #: src/code/unix.lisp
 msgid "Get the tty-process-group for the unix file-descriptor FD."
-msgstr "Etgay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday FD."
+msgstr ""
+"Etgay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday "
+"FD."
 
 #: src/code/unix.lisp
 msgid ""
-"Get the tty-process-group for the unix file-descriptor FD.  If not supplied,"
-"\n"
+"Get the tty-process-group for the unix file-descriptor FD.  If not "
+"supplied,\n"
 "  FD defaults to /dev/tty."
 msgstr ""
-"Etgay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday FD.  Ifway otnay uppliedsay,"
-"\n"
+"Etgay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday "
+"FD.  Ifway otnay uppliedsay,\n"
 "  FD efaultsday otay /evday/tytay."
 
 #: src/code/unix.lisp
@@ -1409,12 +1492,15 @@ msgid ""
 "Set the tty-process-group for the unix file-descriptor FD to PGRP.  If not\n"
 "  supplied, FD defaults to /dev/tty."
 msgstr ""
-"Etsay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday FD otay PGRP.  Ifway otnay\n"
+"Etsay ethay tytay-ocesspray-oupgray orfay ethay unixway ilefay-escriptorday "
+"FD otay PGRP.  Ifway otnay\n"
 "  uppliedsay, FD efaultsday otay /evday/tytay."
 
 #: src/code/unix.lisp
 msgid "Set the socket process-group for the unix file-descriptor FD to PGRP."
-msgstr "Etsay ethay ocketsay ocesspray-oupgray orfay ethay unixway ilefay-escriptorday FD otay PGRP."
+msgstr ""
+"Etsay ethay ocketsay ocesspray-oupgray orfay ethay unixway ilefay-"
+"escriptorday FD otay PGRP."
 
 #: src/code/unix.lisp
 msgid ""
@@ -1422,9 +1508,12 @@ msgid ""
 "   error code.  If successful, the call doesn't return.  If\n"
 "   unsuccessful, the call returns NIL and an error number."
 msgstr ""
-"Unixway-exitway erminatestay ethay urrentcay ocesspray ithway anway optionalway\n"
-"   errorway odecay.  Ifway uccessfulsay, ethay allcay oesnday't eturnray.  Ifway\n"
-"   unsuccessfulway, ethay allcay eturnsray NIL andway anway errorway umbernay."
+"Unixway-exitway erminatestay ethay urrentcay ocesspray ithway anway "
+"optionalway\n"
+"   errorway odecay.  Ifway uccessfulsay, ethay allcay oesnday't eturnray.  "
+"Ifway\n"
+"   unsuccessfulway, ethay allcay eturnsray NIL andway anway errorway "
+"umbernay."
 
 #: src/code/unix.lisp
 msgid ""
@@ -1445,7 +1534,8 @@ msgid ""
 "Unix-lstat is similar to unix-stat except the specified\n"
 "   file must be a symbolic link."
 msgstr ""
-"Unixway-statlay isway imilarsay otay unixway-tatsay exceptway ethay ecifiedspay\n"
+"Unixway-statlay isway imilarsay otay unixway-tatsay exceptway ethay "
+"ecifiedspay\n"
 "   ilefay ustmay ebay away ymbolicsay inklay."
 
 #: src/code/unix.lisp
@@ -1453,7 +1543,8 @@ msgid ""
 "Unix-fstat is similar to unix-stat except the file is specified\n"
 "   by the file descriptor fd."
 msgstr ""
-"Unixway-statfay isway imilarsay otay unixway-tatsay exceptway ethay ilefay isway ecifiedspay\n"
+"Unixway-statfay isway imilarsay otay unixway-tatsay exceptway ethay ilefay "
+"isway ecifiedspay\n"
 "   ybay ethay ilefay escriptorday dfay."
 
 #: src/code/unix.lisp
@@ -1469,7 +1560,8 @@ msgid ""
 "Like call getrusage, but return only the system and user time, and returns\n"
 "   the seconds and microseconds as separate values."
 msgstr ""
-"Ikelay allcay etrusagegay, utbay eturnray onlyway ethay ystemsay andway userway imetay, andway eturnsray\n"
+"Ikelay allcay etrusagegay, utbay eturnray onlyway ethay ystemsay andway "
+"userway imetay, andway eturnsray\n"
 "   ethay econdssay andway icrosecondsmay asway eparatesay aluesvay."
 
 #: src/code/unix.lisp
@@ -1480,10 +1572,14 @@ msgid ""
 "   child processes (rusage_children).  NIL and an error number\n"
 "   is returned if the call fails."
 msgstr ""
-"Unixway-etrusagegay eturnsray informationway aboutway ethay esourceray usageway\n"
-"   ofway ethay ocesspray ecifiedspay ybay owhay.  Owhay ancay ebay eitherway ethay\n"
-"   urrentcay ocesspray (usageray_elfsay) orway allway ofway ethay erminatedtay\n"
-"   ildchay ocessespray (usageray_ildrenchay).  NIL andway anway errorway umbernay\n"
+"Unixway-etrusagegay eturnsray informationway aboutway ethay esourceray "
+"usageway\n"
+"   ofway ethay ocesspray ecifiedspay ybay owhay.  Owhay ancay ebay eitherway "
+"ethay\n"
+"   urrentcay ocesspray (usageray_elfsay) orway allway ofway ethay "
+"erminatedtay\n"
+"   ildchay ocessespray (usageray_ildrenchay).  NIL andway anway errorway "
+"umbernay\n"
 "   isway eturnedray ifway ethay allcay ailsfay."
 
 #: src/code/unix.lisp
@@ -1491,7 +1587,8 @@ msgid ""
 "Unix-times returns information about the cpu time usage of the process\n"
 "   and its children."
 msgstr ""
-"Unixway-imestay eturnsray informationway aboutway ethay pucay imetay usageway ofway ethay ocesspray\n"
+"Unixway-imestay eturnsray informationway aboutway ethay pucay imetay "
+"usageway ofway ethay ocesspray\n"
 "   andway itsway ildrenchay."
 
 #: src/code/unix.lisp
@@ -1501,9 +1598,12 @@ msgid ""
 "   of Greenwich), and a daylight-savings flag.  If it doesn't work, it\n"
 "   returns NIL and the errno."
 msgstr ""
-"Ifway itway orksway, unixway-ettimeofdaygay eturnsray 5 aluesvay: T, ethay econdssay andway\n"
-"   icrosecondsmay ofway ethay urrentcay imetay ofway ayday, ethay imezonetay (inway inutesmay estway\n"
-"   ofway Eenwichgray), andway away aylightday-avingssay agflay.  Ifway itway oesnday't orkway, itway\n"
+"Ifway itway orksway, unixway-ettimeofdaygay eturnsray 5 aluesvay: T, ethay "
+"econdssay andway\n"
+"   icrosecondsmay ofway ethay urrentcay imetay ofway ayday, ethay imezonetay "
+"(inway inutesmay estway\n"
+"   ofway Eenwichgray), andway away aylightday-avingssay agflay.  Ifway itway "
+"oesnday't orkway, itway\n"
 "   eturnsray NIL andway ethay errnoway."
 
 #: src/code/unix.lisp
@@ -1512,8 +1612,10 @@ msgid ""
 "   times on a specified file.  NIL and an error number is\n"
 "   returned if the call is unsuccessful."
 msgstr ""
-"Unixway-utimesway etssay ethay 'astlay-accessedway' andway 'astlay-updatedway'\n"
-"   imestay onway away ecifiedspay ilefay.  NIL andway anway errorway umbernay isway\n"
+"Unixway-utimesway etssay ethay 'astlay-accessedway' andway 'astlay-"
+"updatedway'\n"
+"   imestay onway away ecifiedspay ilefay.  NIL andway anway errorway "
+"umbernay isway\n"
 "   eturnedray ifway ethay allcay isway unsuccessfulway."
 
 #: src/code/unix.lisp
@@ -1522,8 +1624,10 @@ msgid ""
 "   process to the specified ones.  NIL and an error number is returned\n"
 "   if the call fails."
 msgstr ""
-"Unixway-etreuidsay etssay ethay ealray andway effectiveway userway-idway's ofway ethay urrentcay\n"
-"   ocesspray otay ethay ecifiedspay onesway.  NIL andway anway errorway umbernay isway eturnedray\n"
+"Unixway-etreuidsay etssay ethay ealray andway effectiveway userway-idway's "
+"ofway ethay urrentcay\n"
+"   ocesspray otay ethay ecifiedspay onesway.  NIL andway anway errorway "
+"umbernay isway eturnedray\n"
 "   ifway ethay allcay ailsfay."
 
 #: src/code/unix.lisp
@@ -1532,39 +1636,52 @@ msgid ""
 "   process process to the specified ones.  NIL and an error number is\n"
 "   returned if the call fails."
 msgstr ""
-"Unixway-etregidsay etssay ethay ealray andway effectiveway oupgray-idway's ofway ethay urrentcay\n"
-"   ocesspray ocesspray otay ethay ecifiedspay onesway.  NIL andway anway errorway umbernay isway\n"
+"Unixway-etregidsay etssay ethay ealray andway effectiveway oupgray-idway's "
+"ofway ethay urrentcay\n"
+"   ocesspray ocesspray otay ethay ecifiedspay onesway.  NIL andway anway "
+"errorway umbernay isway\n"
 "   eturnedray ifway ethay allcay ailsfay."
 
 #: src/code/unix.lisp
 msgid "Unix-getpid returns the process-id of the current process."
-msgstr "Unixway-etpidgay eturnsray ethay ocesspray-idway ofway ethay urrentcay ocesspray."
+msgstr ""
+"Unixway-etpidgay eturnsray ethay ocesspray-idway ofway ethay urrentcay "
+"ocesspray."
 
 #: src/code/unix.lisp
 msgid ""
 "Unix-getppid returns the process-id of the parent of the current process."
 msgstr ""
-"Unixway-etppidgay eturnsray ethay ocesspray-idway ofway ethay arentpay ofway ethay urrentcay ocesspray."
+"Unixway-etppidgay eturnsray ethay ocesspray-idway ofway ethay arentpay ofway "
+"ethay urrentcay ocesspray."
 
 #: src/code/unix.lisp
 msgid "Unix-getgid returns the real group-id of the current process."
-msgstr "Unixway-etgidgay eturnsray ethay ealray oupgray-idway ofway ethay urrentcay ocesspray."
+msgstr ""
+"Unixway-etgidgay eturnsray ethay ealray oupgray-idway ofway ethay urrentcay "
+"ocesspray."
 
 #: src/code/unix.lisp
 msgid "Unix-getegid returns the effective group-id of the current process."
-msgstr "Unixway-etegidgay eturnsray ethay effectiveway oupgray-idway ofway ethay urrentcay ocesspray."
+msgstr ""
+"Unixway-etegidgay eturnsray ethay effectiveway oupgray-idway ofway ethay "
+"urrentcay ocesspray."
 
 #: src/code/unix.lisp
 msgid "Unix-getpgrp returns the group-id of the calling process."
-msgstr "Unixway-etpgrpgay eturnsray ethay oupgray-idway ofway ethay allingcay ocesspray."
+msgstr ""
+"Unixway-etpgrpgay eturnsray ethay oupgray-idway ofway ethay allingcay "
+"ocesspray."
 
 #: src/code/unix.lisp
 msgid ""
 "Unix-setpgrp sets the process group on the process pid to\n"
 "   pgrp.  NIL and an error number are returned upon failure."
 msgstr ""
-"Unixway-etpgrpsay etssay ethay ocesspray oupgray onway ethay ocesspray idpay otay\n"
-"   grppay.  NIL andway anway errorway umbernay areway eturnedray uponway ailurefay."
+"Unixway-etpgrpsay etssay ethay ocesspray oupgray onway ethay ocesspray idpay "
+"otay\n"
+"   grppay.  NIL andway anway errorway umbernay areway eturnedray uponway "
+"ailurefay."
 
 #: src/code/unix.lisp
 msgid ""
@@ -1572,32 +1689,41 @@ msgid ""
 "   pgrp. If pgid is equal to pid, the process becomes a process\n"
 "   group leader. NIL and an error number are returned upon failure."
 msgstr ""
-"Unixway-etpgidsay etssay ethay ocesspray oupgray ofway ethay ocesspray idpay otay\n"
-"   grppay. Ifway gidpay isway equalway otay idpay, ethay ocesspray ecomesbay away ocesspray\n"
-"   oupgray eaderlay. NIL andway anway errorway umbernay areway eturnedray uponway ailurefay."
+"Unixway-etpgidsay etssay ethay ocesspray oupgray ofway ethay ocesspray idpay "
+"otay\n"
+"   grppay. Ifway gidpay isway equalway otay idpay, ethay ocesspray ecomesbay "
+"away ocesspray\n"
+"   oupgray eaderlay. NIL andway anway errorway umbernay areway eturnedray "
+"uponway ailurefay."
 
 #: src/code/unix.lisp
 msgid ""
 "Unix-getuid returns the real user-id associated with the\n"
 "   current process."
 msgstr ""
-"Unixway-etuidgay eturnsray ethay ealray userway-idway associatedway ithway ethay\n"
+"Unixway-etuidgay eturnsray ethay ealray userway-idway associatedway ithway "
+"ethay\n"
 "   urrentcay ocesspray."
 
 #: src/code/unix.lisp
 msgid "Unix-getpagesize returns the number of bytes in a system page."
-msgstr "Unixway-etpagesizegay eturnsray ethay umbernay ofway ytesbay inway away ystemsay agepay."
+msgstr ""
+"Unixway-etpagesizegay eturnsray ethay umbernay ofway ytesbay inway away "
+"ystemsay agepay."
 
 #: src/code/unix.lisp
 msgid "Unix-gethostname returns the name of the host machine as a string."
-msgstr "Unixway-ethostnamegay eturnsray ethay amenay ofway ethay osthay achinemay asway away ingstray."
+msgstr ""
+"Unixway-ethostnamegay eturnsray ethay amenay ofway ethay osthay achinemay "
+"asway away ingstray."
 
 #: src/code/unix.lisp
 msgid ""
 "Unix-gethostid returns a 32-bit integer which provides unique\n"
 "   identification for the host machine."
 msgstr ""
-"Unixway-ethostidgay eturnsray away 32-itbay integerway ichwhay ovidespray uniqueway\n"
+"Unixway-ethostidgay eturnsray away 32-itbay integerway ichwhay ovidespray "
+"uniqueway\n"
 "   identificationway orfay ethay osthay achinemay."
 
 #: src/code/unix.lisp
@@ -1606,8 +1732,10 @@ msgid ""
 "   of the child in the parent if it works, or NIL and an error number if it\n"
 "   doesn't work."
 msgstr ""
-"Executesway ethay unixway orkfay ystemsay allcay.  Eturnsray 0 inway ethay ildchay andway ethay idpay\n"
-"   ofway ethay ildchay inway ethay arentpay ifway itway orksway, orway NIL andway anway errorway umbernay ifway itway\n"
+"Executesway ethay unixway orkfay ystemsay allcay.  Eturnsray 0 inway ethay "
+"ildchay andway ethay idpay\n"
+"   ofway ethay ildchay inway ethay arentpay ifway itway orksway, orway NIL "
+"andway anway errorway umbernay ifway itway\n"
 "   oesnday't orkway."
 
 #: src/code/unix.lisp
@@ -1615,7 +1743,8 @@ msgid ""
 "Get the value of the environment variable named Name.  If no such\n"
 "  variable exists, Nil is returned."
 msgstr ""
-"Etgay ethay aluevay ofway ethay environmentway ariablevay amednay Amenay.  Ifway onay uchsay\n"
+"Etgay ethay aluevay ofway ethay environmentway ariablevay amednay Amenay.  "
+"Ifway onay uchsay\n"
 "  ariablevay existsway, Ilnay isway eturnedray."
 
 #: src/code/unix.lisp
@@ -1625,9 +1754,12 @@ msgid ""
 "  the value is changed to Value if Overwrite is non-zero.  Otherwise,\n"
 "  the value is not changed."
 msgstr ""
-"Addsway ethay environmentway ariablevay amednay Amenay otay ethay environmentway ithway\n"
-"  ethay ivengay Aluevay ifway Amenay oesday otnay alreadyway existway. Ifway Amenay oesday existway,\n"
-"  ethay aluevay isway angedchay otay Aluevay ifway Overwriteway isway onnay-erozay.  Otherwiseway,\n"
+"Addsway ethay environmentway ariablevay amednay Amenay otay ethay "
+"environmentway ithway\n"
+"  ethay ivengay Aluevay ifway Amenay oesday otnay alreadyway existway. Ifway "
+"Amenay oesday existway,\n"
+"  ethay aluevay isway angedchay otay Aluevay ifway Overwriteway isway onnay-"
+"erozay.  Otherwiseway,\n"
 "  ethay aluevay isway otnay angedchay."
 
 #: src/code/unix.lisp
@@ -1636,9 +1768,12 @@ msgid ""
 "  the form \"name=value\".  If the name does not exist, it is added.\n"
 "  If name does exist, the value is updated to the given value."
 msgstr ""
-"Addsway orway angeschay ethay environmentway.  Amenay-aluevay ustmay ebay away ingstray ofway\n"
-"  ethay ormfay \"amenay=aluevay\".  Ifway ethay amenay oesday otnay existway, itway isway addedway.\n"
-"  Ifway amenay oesday existway, ethay aluevay isway updatedway otay ethay ivengay aluevay."
+"Addsway orway angeschay ethay environmentway.  Amenay-aluevay ustmay ebay "
+"away ingstray ofway\n"
+"  ethay ormfay \"amenay=aluevay\".  Ifway ethay amenay oesday otnay "
+"existway, itway isway addedway.\n"
+"  Ifway amenay oesday existway, ethay aluevay isway updatedway otay ethay "
+"ivengay aluevay."
 
 #: src/code/unix.lisp
 msgid "Removes the variable Name from the environment"
@@ -1646,11 +1781,13 @@ msgstr "Emovesray ethay ariablevay Amenay omfray ethay environmentway"
 
 #: src/code/unix.lisp
 msgid "Returns either :file, :directory, :link, :special, or NIL."
-msgstr "Eturnsray eitherway :ilefay, :irectoryday, :inklay, :ecialspay, orway NIL."
+msgstr ""
+"Eturnsray eitherway :ilefay, :irectoryday, :inklay, :ecialspay, orway NIL."
 
 #: src/code/unix.lisp
 msgid "Returns the pathname with all symbolic links resolved."
-msgstr "Eturnsray ethay athnamepay ithway allway ymbolicsay inkslay esolvedray."
+msgstr ""
+"Eturnsray ethay athnamepay ithway allway ymbolicsay inkslay esolvedray."
 
 #: src/code/unix.lisp
 msgid "Error reading link ~S: ~S"
@@ -1661,7 +1798,8 @@ msgid ""
 "Accepts a Unix file descriptor and returns T if the device\n"
 "  associated with it is a terminal."
 msgstr ""
-"Acceptsway away Unixway ilefay escriptorday andway eturnsray T ifway ethay eviceday\n"
+"Acceptsway away Unixway ilefay escriptorday andway eturnsray T ifway ethay "
+"eviceday\n"
 "  associatedway ithway itway isway away erminaltay."
 
 #: src/code/unix.lisp
@@ -1675,20 +1813,20 @@ msgid ""
 "program.\n"
 "   Environment should be an a-list mapping symbols to simple-strings which "
 "this\n"
-"   function bashes together to form the environment for the exec'ed "
-"program."
+"   function bashes together to form the environment for the exec'ed program."
 msgstr ""
-"Executesway ethay Unixway execveway ystemsay allcay.  Ifway ethay ystemsay allcay uceedssay, isplay\n"
-"   illway onay ongerlay ebay unningray inway isthay ocesspray.  Ifway ethay ystemsay allcay ailsfay "
-"isthay\n"
-"   unctionfay eturnsray wotay aluesvay: NIL andway anway errorway odecay.  Argway-istlay ouldshay ebay "
-"away\n"
-"   istlay ofway implesay-ingsstray ichwhay areway assedpay asway argumentsway otay ethay execway'edway "
-"ogrampray.\n"
-"   Environmentway ouldshay ebay anway away-istlay appingmay ymbolssay otay implesay-ingsstray ichwhay "
-"isthay\n"
-"   unctionfay ashesbay ogethertay otay ormfay ethay environmentway orfay ethay execway'edway "
-"ogrampray."
+"Executesway ethay Unixway execveway ystemsay allcay.  Ifway ethay ystemsay "
+"allcay uceedssay, isplay\n"
+"   illway onay ongerlay ebay unningray inway isthay ocesspray.  Ifway ethay "
+"ystemsay allcay ailsfay isthay\n"
+"   unctionfay eturnsray wotay aluesvay: NIL andway anway errorway odecay.  "
+"Argway-istlay ouldshay ebay away\n"
+"   istlay ofway implesay-ingsstray ichwhay areway assedpay asway "
+"argumentsway otay ethay execway'edway ogrampray.\n"
+"   Environmentway ouldshay ebay anway away-istlay appingmay ymbolssay otay "
+"implesay-ingsstray ichwhay isthay\n"
+"   unctionfay ashesbay ogethertay otay ormfay ethay environmentway orfay "
+"ethay execway'edway ogrampray."
 
 #: src/code/unix.lisp
 msgid ""
@@ -1697,10 +1835,13 @@ msgid ""
 "   unix-getitimer returns 5 values,\n"
 "   T, it-interval-secs, it-interval-usec, it-value-secs, it-value-usec."
 msgstr ""
-"Unixway-etitimergay eturnsray ethay INTERVAL andway VALUE otsslay ofway oneway ofway\n"
-"   reethay ystemsay imerstay (:ealray :irtualvay orway :ofilepray). Onway uccesssay,\n"
+"Unixway-etitimergay eturnsray ethay INTERVAL andway VALUE otsslay ofway "
+"oneway ofway\n"
+"   reethay ystemsay imerstay (:ealray :irtualvay orway :ofilepray). Onway "
+"uccesssay,\n"
 "   unixway-etitimergay eturnsray 5 aluesvay,\n"
-"   T, itway-intervalway-ecssay, itway-intervalway-usecway, itway-aluevay-ecssay, itway-aluevay-usecway."
+"   T, itway-intervalway-ecssay, itway-intervalway-usecway, itway-aluevay-"
+"ecssay, itway-aluevay-usecway."
 
 #: src/code/unix.lisp
 msgid ""
@@ -1713,30 +1854,37 @@ msgid ""
 "   unix-setitimer returns the old contents of the INTERVAL and VALUE\n"
 "   slots as in unix-getitimer."
 msgstr ""
-" Unixway-etitimersay etssay ethay INTERVAL andway VALUE otsslay ofway oneway ofway\n"
-"   reethay ystemsay imerstay (:ealray :irtualvay orway :ofilepray). Away SIGALRM ignalsay\n"
-"   illway ebay eliveredday VALUE <econdssay+icrosecondsmay> omfray ownay. INTERVAL,\n"
-"   enwhay onnay-erozay, isway <econdssay+icrosecondsmay> otay ebay oadedlay eachway imetay\n"
-"   ethay imertay expiresway. Ettingsay INTERVAL andway VALUE otay erozay isablesday\n"
-"   ethay imertay. Eesay ethay Unixway anmay agepay orfay oremay etailsday. Onway uccesssay,\n"
-"   unixway-etitimersay eturnsray ethay oldway ontentscay ofway ethay INTERVAL andway VALUE\n"
+" Unixway-etitimersay etssay ethay INTERVAL andway VALUE otsslay ofway oneway "
+"ofway\n"
+"   reethay ystemsay imerstay (:ealray :irtualvay orway :ofilepray). Away "
+"SIGALRM ignalsay\n"
+"   illway ebay eliveredday VALUE <econdssay+icrosecondsmay> omfray ownay. "
+"INTERVAL,\n"
+"   enwhay onnay-erozay, isway <econdssay+icrosecondsmay> otay ebay oadedlay "
+"eachway imetay\n"
+"   ethay imertay expiresway. Ettingsay INTERVAL andway VALUE otay erozay "
+"isablesday\n"
+"   ethay imertay. Eesay ethay Unixway anmay agepay orfay oremay etailsday. "
+"Onway uccesssay,\n"
+"   unixway-etitimersay eturnsray ethay oldway ontentscay ofway ethay "
+"INTERVAL andway VALUE\n"
 "   otsslay asway inway unixway-etitimergay."
 
 #: src/code/unix.lisp
 msgid ""
-"Return a USER-INFO structure for the user identified by LOGIN, or NIL if "
-"not found."
+"Return a USER-INFO structure for the user identified by LOGIN, or NIL if not "
+"found."
 msgstr ""
-"Eturnray away USER-INFO ucturestray orfay ethay userway identifiedway ybay LOGIN, orway NIL ifway "
-"otnay oundfay."
+"Eturnray away USER-INFO ucturestray orfay ethay userway identifiedway ybay "
+"LOGIN, orway NIL ifway otnay oundfay."
 
 #: src/code/unix.lisp
 msgid ""
 "Return a USER-INFO structure for the user identified by UID, or NIL if not "
 "found."
 msgstr ""
-"Eturnray away USER-INFO ucturestray orfay ethay userway identifiedway ybay UID, orway NIL ifway otnay "
-"oundfay."
+"Eturnray away USER-INFO ucturestray orfay ethay userway identifiedway ybay "
+"UID, orway NIL ifway otnay oundfay."
 
 #: src/code/unix.lisp
 msgid "The maximum size of the group entry buffer"
@@ -1747,16 +1895,16 @@ msgid ""
 "Return a GROUP-INFO structure for the group identified by NAME, or NIL if "
 "not found."
 msgstr ""
-"Eturnray away GROUP-INFO ucturestray orfay ethay oupgray identifiedway ybay NAME, orway NIL ifway "
-"otnay oundfay."
+"Eturnray away GROUP-INFO ucturestray orfay ethay oupgray identifiedway ybay "
+"NAME, orway NIL ifway otnay oundfay."
 
 #: src/code/unix.lisp
 msgid ""
-"Return a GROUP-INFO structure for the group identified by GID, or NIL if "
-"not found."
+"Return a GROUP-INFO structure for the group identified by GID, or NIL if not "
+"found."
 msgstr ""
-"Eturnray away GROUP-INFO ucturestray orfay ethay oupgray identifiedway ybay GID, orway NIL ifway "
-"otnay oundfay."
+"Eturnray away GROUP-INFO ucturestray orfay ethay oupgray identifiedway ybay "
+"GID, orway NIL ifway otnay oundfay."
 
 #: src/code/unix.lisp
 msgid "CPU time per process (in milliseconds)"
@@ -1812,7 +1960,8 @@ msgid ""
 "  Resource.  If successful, return three values: T, the current (soft)\n"
 "  limit, and the maximum (hard) limit."
 msgstr ""
-"Etgay ethay imitslay onway ethay onsumptioncay ofway ystemsay esouceray ecifiedspay ybay\n"
-"  Esourceray.  Ifway uccessfulsay, eturnray reethay aluesvay: T, ethay urrentcay (oftsay)\n"
+"Etgay ethay imitslay onway ethay onsumptioncay ofway ystemsay esouceray "
+"ecifiedspay ybay\n"
+"  Esourceray.  Ifway uccessfulsay, eturnray reethay aluesvay: T, ethay "
+"urrentcay (oftsay)\n"
 "  imitlay, andway ethay aximummay (ardhay) imitlay."
-
diff --git a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-x86-vm.po b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-x86-vm.po
index 6b12b0860..c7e270c6c 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-x86-vm.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-x86-vm.po
@@ -1,10 +1,12 @@
-#@ cmucl-x86-vm
+# @ cmucl-x86-vm
 # SOME DESCRIPTIVE TITLE
 # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR
 #
 #, fuzzy
 msgid ""
-msgstr "Project-Id-Version: CMUCL 20B\n"
+msgstr ""
+"Project-Id-Version: CMUCL 20B\n"
+"Report-Msgid-Bugs-To: \n"
 "PO-Revision-Date: YEAR-MO-DA HO:MI +ZONE\n"
 "Last-Translator: Automatic translation\n"
 "Language-Team: Pig Latin (auto-translated)\n"
@@ -16,11 +18,15 @@ msgstr "Project-Id-Version: CMUCL 20B\n"
 
 #: src/code/x86-vm.lisp
 msgid "Returns a string describing the type of the local machine."
-msgstr "Eturnsray away ingstray escribingday ethay ypetay ofway ethay ocallay achinemay."
+msgstr ""
+"Eturnsray away ingstray escribingday ethay ypetay ofway ethay ocallay "
+"achinemay."
 
 #: src/code/x86-vm.lisp
 msgid "Returns a string describing the version of the local machine."
-msgstr "Eturnsray away ingstray escribingday ethay ersionvay ofway ethay ocallay achinemay."
+msgstr ""
+"Eturnsray away ingstray escribingday ethay ersionvay ofway ethay ocallay "
+"achinemay."
 
 #: src/code/x86-vm.lisp
 msgid "Unknown code-object-fixup kind ~s."
@@ -31,23 +37,28 @@ msgid ""
 "Atomically compare object's slot value to test-value and if EQ store\n"
 "   new-value in the slot. The original value of the slot is returned."
 msgstr ""
-"Atomicallyway omparecay objectway's otslay aluevay otay esttay-aluevay andway ifway EQ toresay\n"
-"   ewnay-aluevay inway ethay otslay. Ethay originalway aluevay ofway ethay otslay isway eturnedray."
+"Atomicallyway omparecay objectway's otslay aluevay otay esttay-aluevay "
+"andway ifway EQ toresay\n"
+"   ewnay-aluevay inway ethay otslay. Ethay originalway aluevay ofway ethay "
+"otslay isway eturnedray."
 
 #: src/code/x86-vm.lisp
 msgid ""
 "Atomically compare symbol's value to test-value and if EQ store\n"
 "  new-value in symbol's value slot and return the original value."
 msgstr ""
-"Atomicallyway omparecay ymbolsay's aluevay otay esttay-aluevay andway ifway EQ toresay\n"
-"  ewnay-aluevay inway ymbolsay's aluevay otslay andway eturnray ethay originalway aluevay."
+"Atomicallyway omparecay ymbolsay's aluevay otay esttay-aluevay andway ifway "
+"EQ toresay\n"
+"  ewnay-aluevay inway ymbolsay's aluevay otslay andway eturnray ethay "
+"originalway aluevay."
 
 #: src/code/x86-vm.lisp
 msgid ""
 "Atomically compare the car of CONS to test-value and if EQ store\n"
 "  new-value its car and return the original value."
 msgstr ""
-"Atomicallyway omparecay ethay arcay ofway CONS otay esttay-aluevay andway ifway EQ toresay\n"
+"Atomicallyway omparecay ethay arcay ofway CONS otay esttay-aluevay andway "
+"ifway EQ toresay\n"
 "  ewnay-aluevay itsway arcay andway eturnray ethay originalway aluevay."
 
 #: src/code/x86-vm.lisp
@@ -55,7 +66,8 @@ msgid ""
 "Atomically compare the cdr of CONS to test-value and if EQ store\n"
 "  new-value its cdr and return the original value."
 msgstr ""
-"Atomicallyway omparecay ethay drcay ofway CONS otay esttay-aluevay andway ifway EQ toresay\n"
+"Atomicallyway omparecay ethay drcay ofway CONS otay esttay-aluevay andway "
+"ifway EQ toresay\n"
 "  ewnay-aluevay itsway drcay andway eturnray ethay originalway aluevay."
 
 #: src/code/x86-vm.lisp
@@ -63,28 +75,39 @@ msgid ""
 "Atomically compare an element of vector to test-value and if EQ store\n"
 "  new-value the element and return the original value."
 msgstr ""
-"Atomicallyway omparecay anway elementway ofway ectorvay otay esttay-aluevay andway ifway EQ toresay\n"
+"Atomicallyway omparecay anway elementway ofway ectorvay otay esttay-aluevay "
+"andway ifway EQ toresay\n"
 "  ewnay-aluevay ethay elementway andway eturnray ethay originalway aluevay."
 
 #: src/code/x86-vm.lisp
 msgid "Thread safe push of val onto the list in the symbol global value."
-msgstr "Readthay afesay ushpay ofway alvay ontoway ethay istlay inway ethay ymbolsay obalglay aluevay."
+msgstr ""
+"Readthay afesay ushpay ofway alvay ontoway ethay istlay inway ethay ymbolsay "
+"obalglay aluevay."
 
 #: src/code/x86-vm.lisp
 msgid "Thread safe pop from the list in the symbol global value."
-msgstr "Readthay afesay oppay omfray ethay istlay inway ethay ymbolsay obalglay aluevay."
+msgstr ""
+"Readthay afesay oppay omfray ethay istlay inway ethay ymbolsay obalglay "
+"aluevay."
 
 #: src/code/x86-vm.lisp
 msgid "Thread safe push of val onto the list in the car of cons."
-msgstr "Readthay afesay ushpay ofway alvay ontoway ethay istlay inway ethay arcay ofway onscay."
+msgstr ""
+"Readthay afesay ushpay ofway alvay ontoway ethay istlay inway ethay arcay "
+"ofway onscay."
 
 #: src/code/x86-vm.lisp
 msgid "Thread safe push of val onto the list in the cdr of cons."
-msgstr "Readthay afesay ushpay ofway alvay ontoway ethay istlay inway ethay drcay ofway onscay."
+msgstr ""
+"Readthay afesay ushpay ofway alvay ontoway ethay istlay inway ethay drcay "
+"ofway onscay."
 
 #: src/code/x86-vm.lisp
 msgid "Thread safe push of val onto the list in the vector element."
-msgstr "Readthay afesay ushpay ofway alvay ontoway ethay istlay inway ethay ectorvay elementway."
+msgstr ""
+"Readthay afesay ushpay ofway alvay ontoway ethay istlay inway ethay ectorvay "
+"elementway."
 
 #: src/code/commandline.lisp
 msgid ""
@@ -95,12 +118,18 @@ msgid ""
 "  so, then SSE2 is used.  If the SSE2 core file cannot be found,Lisp\n"
 "  will fallback to the x87 core, which can run on any machine."
 msgstr ""
-"Ecifiesspay atwhay indkay ofway oatingflay-ointpay upportsay ouldshay ebay usedway onway x86\n"
-"  ystemssay.  Ifway 'x87', Isplay illway useway ethay x87 oatingflay-ointpay unitway; ifway\n"
-"  'sesay2', Isplay usesway SSE2 oatingflay-ointpay unitway. Ethay efaultday isway\n"
-"  'autoway',ichwhay ausescay Isplay otay eckchay otay eesay ifway SSE2 isway availableway.  Ifway\n"
-"  osay, enthay SSE2 isway usedway.  Ifway ethay SSE2 orecay ilefay annotcay ebay oundfay,Isplay\n"
-"  illway allbackfay otay ethay x87 orecay, ichwhay ancay unray onway anyway achinemay."
+"Ecifiesspay atwhay indkay ofway oatingflay-ointpay upportsay ouldshay ebay "
+"usedway onway x86\n"
+"  ystemssay.  Ifway 'x87', Isplay illway useway ethay x87 oatingflay-ointpay "
+"unitway; ifway\n"
+"  'sesay2', Isplay usesway SSE2 oatingflay-ointpay unitway. Ethay efaultday "
+"isway\n"
+"  'autoway',ichwhay ausescay Isplay otay eckchay otay eesay ifway SSE2 isway "
+"availableway.  Ifway\n"
+"  osay, enthay SSE2 isway usedway.  Ifway ethay SSE2 orecay ilefay annotcay "
+"ebay oundfay,Isplay\n"
+"  illway allbackfay otay ethay x87 orecay, ichwhay ancay unray onway anyway "
+"achinemay."
 
 #: src/code/commandline.lisp
 msgid "mode"
@@ -120,13 +149,16 @@ msgstr "Eakpointbray atthay obodynay antsway?"
 
 #: src/compiler/x86/parms.lisp
 msgid "Number of bits per word where a word holds one lisp descriptor."
-msgstr "Umbernay ofway itsbay erpay ordway erewhay away ordway oldshay oneway isplay escriptorday."
+msgstr ""
+"Umbernay ofway itsbay erpay ordway erewhay away ordway oldshay oneway isplay "
+"escriptorday."
 
 #: src/compiler/x86/parms.lisp
 msgid ""
 "Number of bits per byte where a byte is the smallest addressable object."
 msgstr ""
-"Umbernay ofway itsbay erpay ytebay erewhay away ytebay isway ethay mallestsay addressableway objectway."
+"Umbernay ofway itsbay erpay ytebay erewhay away ytebay isway ethay "
+"mallestsay addressableway objectway."
 
 #: src/compiler/x86/parms.lisp
 msgid "Number of bits needed to represent a character"
@@ -138,7 +170,9 @@ msgstr "Umbernay ofway ytesbay eedednay otay epresentray away aracterchay"
 
 #: src/compiler/x86/parms.lisp
 msgid "Number of bits to shift between word addresses and byte addresses."
-msgstr "Umbernay ofway itsbay otay iftshay etweenbay ordway addressesway andway ytebay addressesway."
+msgstr ""
+"Umbernay ofway itsbay otay iftshay etweenbay ordway addressesway andway "
+"ytebay addressesway."
 
 #: src/compiler/x86/parms.lisp
 msgid "Number of bytes in a word."
@@ -161,7 +195,8 @@ msgid ""
 "Loads the type bits of a pointer into target independent of\n"
 "   byte-ordering issues."
 msgstr ""
-"Oadslay ethay ypetay itsbay ofway away ointerpay intoway argettay independentway ofway\n"
+"Oadslay ethay ypetay itsbay ofway away ointerpay intoway argettay "
+"independentway ofway\n"
 "   ytebay-orderingway issuesway."
 
 #: src/compiler/x86/macros.lisp
@@ -172,10 +207,13 @@ msgid ""
 "   speed vs size decision.  If Dynamic-Extent is true, and otherwise\n"
 "   appropriate, allocate from the stack."
 msgstr ""
-"Allocateway anway objectway ithway away izesay inway ytesbay ivengay ybay Izesay.\n"
+"Allocateway anway objectway ithway away izesay inway ytesbay ivengay ybay "
+"Izesay.\n"
 "   Ethay izesay aymay ebay anway integerway orway away TN.\n"
-"   Ifway Inlineway isway away VOP odenay-arvay enthay itway isway usedway otay akemay anway appropriateway\n"
-"   eedspay svay izesay ecisionday.  Ifway Ynamicday-Extentway isway uetray, andway otherwiseway\n"
+"   Ifway Inlineway isway away VOP odenay-arvay enthay itway isway usedway "
+"otay akemay anway appropriateway\n"
+"   eedspay svay izesay ecisionday.  Ifway Ynamicday-Extentway isway uetray, "
+"andway otherwiseway\n"
 "   appropriateway, allocateway omfray ethay tacksay."
 
 #: src/compiler/x86/macros.lisp
@@ -184,8 +222,10 @@ msgid ""
 "   word header having the specified Type-Code.  The result is placed in\n"
 "   Result-TN."
 msgstr ""
-"Allocateway anway otherway-ointerpay objectway ofway ixedfay Izesay ithway away inglesay\n"
-"   ordway eaderhay avinghay ethay ecifiedspay Ypetay-Odecay.  Ethay esultray isway acedplay inway\n"
+"Allocateway anway otherway-ointerpay objectway ofway ixedfay Izesay ithway "
+"away inglesay\n"
+"   ordway eaderhay avinghay ethay ecifiedspay Ypetay-Odecay.  Ethay esultray "
+"isway acedplay inway\n"
 "   Esultray-TN."
 
 #: src/compiler/x86/macros.lisp
@@ -197,7 +237,8 @@ msgid ""
 "Cause a continuable error.  If the error is continued, execution resumes at\n"
 "  LABEL."
 msgstr ""
-"Ausecay away ontinuablecay errorway.  Ifway ethay errorway isway ontinuedcay, executionway esumesray atway\n"
+"Ausecay away ontinuablecay errorway.  Ifway ethay errorway isway "
+"ontinuedcay, executionway esumesray atway\n"
 "  LABEL."
 
 #: src/compiler/x86/macros.lisp
@@ -206,7 +247,8 @@ msgid ""
 "  Emit code for an error with the specified Error-Code and context Values."
 msgstr ""
 "Enerategay-Errorway-Odecay Errorway-odecay Alue*Vay\n"
-"  Emitway odecay orfay anway errorway ithway ethay ecifiedspay Errorway-Odecay andway ontextcay Aluesvay."
+"  Emitway odecay orfay anway errorway ithway ethay ecifiedspay Errorway-"
+"Odecay andway ontextcay Aluesvay."
 
 #: src/compiler/x86/macros.lisp
 msgid ""
@@ -216,8 +258,10 @@ msgid ""
 "  the GENERATE-CERROR-CODE form."
 msgstr ""
 "Enerategay-Errorcay-Odecay Errorway-odecay Alue*Vay\n"
-"  Emitway odecay orfay away ontinuablecay errorway ithway ethay ecifiedspay Errorway-Odecay andway\n"
-"  ontextcay Aluesvay.  Ifway ethay errorway isway ontinuedcay, executionway esumesray afterway\n"
+"  Emitway odecay orfay away ontinuablecay errorway ithway ethay ecifiedspay "
+"Errorway-Odecay andway\n"
+"  ontextcay Aluesvay.  Ifway ethay errorway isway ontinuedcay, executionway "
+"esumesray afterway\n"
 "  ethay GENERATE-CERROR-CODE ormfay."
 
 #: src/compiler/x86/type-vops.lisp src/compiler/x86/pred.lisp
@@ -245,10 +289,11 @@ msgstr "onstantcay oadlay"
 #: src/compiler/x86/move.lisp
 msgid ""
 "Load TN allocated, but no move function?~@\n"
-"	           VM definition inconsistent, recompile and try again."
+"\t           VM definition inconsistent, recompile and try again."
 msgstr ""
 "Oadlay TN allocatedway, utbay onay ovemay unctionfay?~@\n"
-"	           VM efinitionday inconsistentway, ecompileray andway ytray againway."
+"\t           VM efinitionday inconsistentway, ecompileray andway ytray "
+"againway."
 
 #: src/compiler/x86/move.lisp
 msgid "integer to untagged word coercion"
@@ -351,7 +396,8 @@ msgid ""
 "Cons up a piece of code which calls call-callback with INDEX and a\n"
 "pointer to the arguments."
 msgstr ""
-"Onscay upway away iecepay ofway odecay ichwhay allscay allcay-allbackcay ithway INDEX andway away\n"
+"Onscay upway away iecepay ofway odecay ichwhay allscay allcay-allbackcay "
+"ithway INDEX andway away\n"
 "ointerpay otay ethay argumentsway."
 
 #: src/compiler/x86/call.lisp
@@ -365,4 +411,3 @@ msgstr "inlineway arrayway accessway"
 #: src/compiler/x86/array.lisp
 msgid "inline array store"
 msgstr "inlineway arrayway toresay"
-
diff --git a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-x87.po b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-x87.po
index d62737abd..5e6f89a01 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-x87.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-x87.po
@@ -1,10 +1,12 @@
-#@ cmucl-x87
+# @ cmucl-x87
 # SOME DESCRIPTIVE TITLE
 # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR
 #
 #, fuzzy
 msgid ""
-msgstr "Project-Id-Version: CMUCL 20B\n"
+msgstr ""
+"Project-Id-Version: CMUCL 20B\n"
+"Report-Msgid-Bugs-To: \n"
 "PO-Revision-Date: YEAR-MO-DA HO:MI +ZONE\n"
 "Last-Translator: Automatic translation\n"
 "Language-Team: Pig Latin (auto-translated)\n"
@@ -38,10 +40,11 @@ msgstr "oatflay otay ointerpay oercioncay"
 #: src/compiler/x86/float.lisp
 msgid ""
 "Load TN allocated, but no move function?~@\n"
-"	           VM definition inconsistent, recompile and try again."
+"\t           VM definition inconsistent, recompile and try again."
 msgstr ""
 "Oadlay TN allocatedway, utbay onay ovemay unctionfay?~@\n"
-"	           VM efinitionday inconsistentway, ecompileray andway ytray againway."
+"\t           VM efinitionday inconsistentway, ecompileray andway ytray "
+"againway."
 
 #: src/compiler/x86/float.lisp
 msgid "pointer to float coercion"
@@ -202,4 +205,3 @@ msgstr "oubleday-oubleday owlay artpay"
 #: src/compiler/x86/float.lisp
 msgid "inline complex double-double-float creation"
 msgstr "inlineway omplexcay oubleday-oubleday-oatflay eationcray"
-
diff --git a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl.po b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl.po
index b546e4037..8ed111fff 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl.po
@@ -1,10 +1,12 @@
-#@ cmucl
+# @ cmucl
 # SOME DESCRIPTIVE TITLE
 # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR
 #
 #, fuzzy
 msgid ""
-msgstr "Project-Id-Version: CMUCL 20B\n"
+msgstr ""
+"Project-Id-Version: CMUCL 20B\n"
+"Report-Msgid-Bugs-To: \n"
 "PO-Revision-Date: YEAR-MO-DA HO:MI +ZONE\n"
 "Last-Translator: Automatic translation\n"
 "Language-Team: Pig Latin (auto-translated)\n"
@@ -48,14 +50,17 @@ msgstr "Assclay otnay etyay efinedday: ~S"
 
 #: src/code/sysmacs.lisp
 msgid "Register the feature as having influenced the CMUCL build process."
-msgstr "Egisterray ethay eaturefay asway avinghay influencedway ethay CMUCL uildbay ocesspray."
+msgstr ""
+"Egisterray ethay eaturefay asway avinghay influencedway ethay CMUCL uildbay "
+"ocesspray."
 
 #: src/code/sysmacs.lisp
 msgid ""
 "Register the feature as having influenced the CMUCL build process,\n"
 "and also the CMUCL C runtime."
 msgstr ""
-"Egisterray ethay eaturefay asway avinghay influencedway ethay CMUCL uildbay ocesspray,\n"
+"Egisterray ethay eaturefay asway avinghay influencedway ethay CMUCL uildbay "
+"ocesspray,\n"
 "andway alsoway ethay CMUCL C untimeray."
 
 #: src/code/sysmacs.lisp
@@ -64,34 +69,38 @@ msgid ""
 "and\n"
 "  End-Var to the start and end of the designated portion of the data "
 "vector.\n"
-"  Svalue and Evalue are any start and end specified to the original operatio"
-"n,\n"
+"  Svalue and Evalue are any start and end specified to the original "
+"operation,\n"
 "  and are factored into the bindings of Start-Var and End-Var.  Offset-Var "
 "is\n"
 "  the cumulative offset of all displacements encountered, and does not\n"
 "  include Svalue."
 msgstr ""
-"Ivengay anyway Arrayway, indsbay Ataday-Arvay otay ethay arrayway's ataday ectorvay andway Tartsay-Arvay "
-"andway\n"
-"  Endway-Arvay otay ethay tartsay andway endway ofway ethay esignatedday ortionpay ofway ethay ataday "
-"ectorvay.\n"
-"  Valuesay andway Evalueway areway anyway tartsay andway endway ecifiedspay otay ethay originalway operatioway"
-"n,\n"
-"  andway areway actoredfay intoway ethay indingsbay ofway Tartsay-Arvay andway Endway-Arvay.  Offsetway-Arvay "
-"isway\n"
-"  ethay umulativecay offsetway ofway allway isplacementsday encounteredway, andway oesday otnay\n"
+"Ivengay anyway Arrayway, indsbay Ataday-Arvay otay ethay arrayway's ataday "
+"ectorvay andway Tartsay-Arvay andway\n"
+"  Endway-Arvay otay ethay tartsay andway endway ofway ethay esignatedday "
+"ortionpay ofway ethay ataday ectorvay.\n"
+"  Valuesay andway Evalueway areway anyway tartsay andway endway ecifiedspay "
+"otay ethay originalway operatiowayn,\n"
+"  andway areway actoredfay intoway ethay indingsbay ofway Tartsay-Arvay "
+"andway Endway-Arvay.  Offsetway-Arvay isway\n"
+"  ethay umulativecay offsetway ofway allway isplacementsday encounteredway, "
+"andway oesday otnay\n"
 "  includeway Valuesay."
 
 #: src/code/sysmacs.lisp
 msgid "Executes the forms in the body without doing a garbage collection."
-msgstr "Executesway ethay ormsfay inway ethay odybay ithoutway oingday away arbagegay ollectioncay."
+msgstr ""
+"Executesway ethay ormsfay inway ethay odybay ithoutway oingday away "
+"arbagegay ollectioncay."
 
 #: src/code/kernel.lisp
 msgid ""
 "Return the 24 bits of data in the header of object X, which must be an\n"
 "  other-pointer object."
 msgstr ""
-"Eturnray ethay 24 itsbay ofway ataday inway ethay eaderhay ofway objectway X, ichwhay ustmay ebay anway\n"
+"Eturnray ethay 24 itsbay ofway ataday inway ethay eaderhay ofway objectway "
+"X, ichwhay ustmay ebay anway\n"
 "  otherway-ointerpay objectway."
 
 #: src/code/kernel.lisp
@@ -99,7 +108,8 @@ msgid ""
 "Sets the 24 bits of data in the header of object X (which must be an\n"
 "  other-pointer object) to VAL."
 msgstr ""
-"Etssay ethay 24 itsbay ofway ataday inway ethay eaderhay ofway objectway X (ichwhay ustmay ebay anway\n"
+"Etssay ethay 24 itsbay ofway ataday inway ethay eaderhay ofway objectway X "
+"(ichwhay ustmay ebay anway\n"
 "  otherway-ointerpay objectway) otay VAL."
 
 #: src/code/kernel.lisp
@@ -107,7 +117,8 @@ msgid ""
 "Returns the length of the closure X.  This is one more than the number\n"
 "  of variables closed over."
 msgstr ""
-"Eturnsray ethay engthlay ofway ethay osureclay X.  Isthay isway oneway oremay anthay ethay umbernay\n"
+"Eturnsray ethay engthlay ofway ethay osureclay X.  Isthay isway oneway "
+"oremay anthay ethay umbernay\n"
 "  ofway ariablesvay osedclay overway."
 
 #: src/code/kernel.lisp
@@ -123,28 +134,36 @@ msgid ""
 "Return a System-Area-Pointer pointing to the data for the vector X, which\n"
 "  must be simple."
 msgstr ""
-"Eturnray away Ystemsay-Areaway-Ointerpay ointingpay otay ethay ataday orfay ethay ectorvay X, ichwhay\n"
+"Eturnray away Ystemsay-Areaway-Ointerpay ointingpay otay ethay ataday orfay "
+"ethay ectorvay X, ichwhay\n"
 "  ustmay ebay implesay."
 
 #: src/code/kernel.lisp
 msgid "Return a System-Area-Pointer pointing to the end of the binding stack."
-msgstr "Eturnray away Ystemsay-Areaway-Ointerpay ointingpay otay ethay endway ofway ethay indingbay tacksay."
+msgstr ""
+"Eturnray away Ystemsay-Areaway-Ointerpay ointingpay otay ethay endway ofway "
+"ethay indingbay tacksay."
 
 #: src/code/kernel.lisp
 msgid ""
 "Returns a System-Area-Pointer pointing to the next free work of the current\n"
 "  dynamic space."
 msgstr ""
-"Eturnsray away Ystemsay-Areaway-Ointerpay ointingpay otay ethay extnay eefray orkway ofway ethay urrentcay\n"
+"Eturnsray away Ystemsay-Areaway-Ointerpay ointingpay otay ethay extnay "
+"eefray orkway ofway ethay urrentcay\n"
 "  ynamicday acespay."
 
 #: src/code/kernel.lisp
 msgid "Return a System-Area-Pointer pointing to the end of the control stack."
-msgstr "Eturnray away Ystemsay-Areaway-Ointerpay ointingpay otay ethay endway ofway ethay ontrolcay tacksay."
+msgstr ""
+"Eturnray away Ystemsay-Areaway-Ointerpay ointingpay otay ethay endway ofway "
+"ethay ontrolcay tacksay."
 
 #: src/code/kernel.lisp
 msgid "Return the header typecode for FUNCTION.  Can be set with SETF."
-msgstr "Eturnray ethay eaderhay ypecodetay orfay FUNCTION.  Ancay ebay etsay ithway SETF."
+msgstr ""
+"Eturnray ethay eaderhay ypecodetay orfay FUNCTION.  Ancay ebay etsay ithway "
+"SETF."
 
 #: src/code/kernel.lisp
 msgid "Extracts the arglist from the function header FUNC."
@@ -167,7 +186,8 @@ msgid ""
 "Return the length of VECTOR.  There is no reason to use this, 'cause\n"
 "  (length (the vector foo)) is the same."
 msgstr ""
-"Eturnray ethay engthlay ofway VECTOR.  Erethay isway onay easonray otay useway isthay, 'ausecay\n"
+"Eturnray ethay engthlay ofway VECTOR.  Erethay isway onay easonray otay "
+"useway isthay, 'ausecay\n"
 "  (engthlay (ethay ectorvay oofay)) isway ethay amesay."
 
 #: src/code/kernel.lisp
@@ -179,7 +199,8 @@ msgid ""
 "Return the SXHASH for the first LENGTH characters of the simple-string\n"
 "  STRING."
 msgstr ""
-"Eturnray ethay SXHASH orfay ethay irstfay LENGTH aracterschay ofway ethay implesay-ingstray\n"
+"Eturnray ethay SXHASH orfay ethay irstfay LENGTH aracterschay ofway ethay "
+"implesay-ingstray\n"
 "  STRING."
 
 #: src/code/kernel.lisp
@@ -192,24 +213,31 @@ msgid ""
 "  WORDS words long.  Note: it is your responsibility to assure that the\n"
 "  relation between LENGTH and WORDS is correct."
 msgstr ""
-"Allocateway away unboxedway, implesay ectorvay ithway ypetay odecay TYPE, engthlay LENGTH, andway\n"
-"  WORDS ordsway onglay.  Otenay: itway isway ouryay esponsibilityray otay assureway atthay ethay\n"
+"Allocateway away unboxedway, implesay ectorvay ithway ypetay odecay TYPE, "
+"engthlay LENGTH, andway\n"
+"  WORDS ordsway onglay.  Otenay: itway isway ouryay esponsibilityray otay "
+"assureway atthay ethay\n"
 "  elationray etweenbay LENGTH andway WORDS isway orrectcay."
 
 #: src/code/kernel.lisp
 msgid "Allocate an array header with type code TYPE and rank RANK."
-msgstr "Allocateway anway arrayway eaderhay ithway ypetay odecay TYPE andway ankray RANK."
+msgstr ""
+"Allocateway anway arrayway eaderhay ithway ypetay odecay TYPE andway ankray "
+"RANK."
 
 #: src/code/kernel.lisp
 msgid "Return a SAP pointing to the instructions part of CODE-OBJ."
-msgstr "Eturnray away SAP ointingpay otay ethay instructionsway artpay ofway CODE-OBJ."
+msgstr ""
+"Eturnray away SAP ointingpay otay ethay instructionsway artpay ofway CODE-"
+"OBJ."
 
 #: src/code/kernel.lisp
 msgid ""
 "Extract the INDEXth element from the header of CODE-OBJ.  Can be set with\n"
 "  setf."
 msgstr ""
-"Extractway ethay Indexthway elementway omfray ethay eaderhay ofway CODE-OBJ.  Ancay ebay etsay ithway\n"
+"Extractway ethay Indexthway elementway omfray ethay eaderhay ofway CODE-"
+"OBJ.  Ancay ebay etsay ithway\n"
 "  etfsay."
 
 #: src/code/format.lisp src/code/print.lisp src/code/irrat-dd.lisp
@@ -223,7 +251,8 @@ msgid ""
 "Holds a list of symbols that describe features provided by the\n"
 "   implementation."
 msgstr ""
-"Oldshay away istlay ofway ymbolssay atthay escribeday eaturesfay ovidedpray ybay ethay\n"
+"Oldshay away istlay ofway ymbolssay atthay escribeday eaturesfay ovidedpray "
+"ybay ethay\n"
 "   implementationway."
 
 #: src/code/lispinit.lisp
@@ -244,8 +273,8 @@ msgid ""
 "will\n"
 "   enter the debugger prior to signalling that condition."
 msgstr ""
-"Enwhay (ypeptay onditioncay *break-on-signals*) isway uetray, enthay allscay otay SIGNAL "
-"illway\n"
+"Enwhay (ypeptay onditioncay *break-on-signals*) isway uetray, enthay allscay "
+"otay SIGNAL illway\n"
 "   enterway ethay ebuggerday iorpray otay ignallingsay atthay onditioncay."
 
 #: src/code/lispinit.lisp
@@ -256,15 +285,18 @@ msgid ""
 "before\n"
 "   any signalling is done."
 msgstr ""
-"Invokesway ethay ignalsay acilityfay onway away onditioncay ormedfay omfray atumday andway argumentsway.\n"
-"   Ifway ethay onditioncay isway otnay andledhay, ilnay isway eturnedray.  Ifway\n"
-"   (TYPEP onditioncay *BREAK-ON-SIGNALS*) isway uetray, ethay ebuggerday isway invokedway "
-"eforebay\n"
+"Invokesway ethay ignalsay acilityfay onway away onditioncay ormedfay omfray "
+"atumday andway argumentsway.\n"
+"   Ifway ethay onditioncay isway otnay andledhay, ilnay isway eturnedray.  "
+"Ifway\n"
+"   (TYPEP onditioncay *BREAK-ON-SIGNALS*) isway uetray, ethay ebuggerday "
+"isway invokedway eforebay\n"
 "   anyway ignallingsay isway oneday."
 
 #: src/code/lispinit.lisp
 msgid "~A~%Break entered because of *break-on-signals* (now NIL.)"
-msgstr "~Away~%Eakbray enteredway ecausebay ofway *break-on-signals* (ownay NIL.)"
+msgstr ""
+"~Away~%Eakbray enteredway ecausebay ofway *break-on-signals* (ownay NIL.)"
 
 #: src/code/lispinit.lisp
 msgid "Ignore the additional arguments."
@@ -273,10 +305,10 @@ msgstr "Ignoreway ethay additionalway argumentsway."
 #: src/code/lispinit.lisp
 msgid ""
 "You may not supply additional arguments ~\n"
-"				     when giving ~S to ~S."
+"\t\t\t\t     when giving ~S to ~S."
 msgstr ""
 "Ouyay aymay otnay upplysay additionalway argumentsway ~\n"
-"				     enwhay ivinggay ~S otay ~S."
+"\t\t\t\t     enwhay ivinggay ~S otay ~S."
 
 #: src/code/lispinit.lisp
 msgid "Bad argument to ~S: ~S"
@@ -287,8 +319,10 @@ msgid ""
 "Invokes the signal facility on a condition formed from datum and arguments.\n"
 "   If the condition is not handled, the debugger is invoked."
 msgstr ""
-"Invokesway ethay ignalsay acilityfay onway away onditioncay ormedfay omfray atumday andway argumentsway.\n"
-"   Ifway ethay onditioncay isway otnay andledhay, ethay ebuggerday isway invokedway."
+"Invokesway ethay ignalsay acilityfay onway away onditioncay ormedfay omfray "
+"atumday andway argumentsway.\n"
+"   Ifway ethay onditioncay isway otnay andledhay, ethay ebuggerday isway "
+"invokedway."
 
 #: src/pcl/dfun.lisp src/code/interr.lisp src/code/lispinit.lisp
 msgid "Help! "
@@ -307,7 +341,8 @@ msgid ""
 "Prints a message and invokes the debugger without allowing any possibility\n"
 "   of condition handling occurring."
 msgstr ""
-"Intspray away essagemay andway invokesway ethay ebuggerday ithoutway allowingway anyway ossibilitypay\n"
+"Intspray away essagemay andway invokesway ethay ebuggerday ithoutway "
+"allowingway anyway ossibilitypay\n"
 "   ofway onditioncay andlinghay occurringway."
 
 #: src/code/lispinit.lisp
@@ -321,9 +356,10 @@ msgid ""
 "restart\n"
 "   exists that causes WARN to immediately return nil."
 msgstr ""
-"Arnsway aboutway away ituationsay ybay ignallingsay away onditioncay ormedfay ybay atumday andway\n"
-"   argumentsway.  Ilewhay ethay onditioncay isway eingbay ignaledsay, away ufflemay-arningway "
-"estartray\n"
+"Arnsway aboutway away ituationsay ybay ignallingsay away onditioncay "
+"ormedfay ybay atumday andway\n"
+"   argumentsway.  Ilewhay ethay onditioncay isway eingbay ignaledsay, away "
+"ufflemay-arningway estartray\n"
 "   existsway atthay ausescay WARN otay immediatelyway eturnray ilnay."
 
 #: src/code/lispinit.lisp
@@ -345,9 +381,12 @@ msgid ""
 "   is just like error, except that the condition type defaults to the type\n"
 "   simple-program-error, instead of program-error."
 msgstr ""
-"Invokesway ethay ignalsay acilityfay onway away onditioncay ormedfay omfray atumday andway argumentsway.\n"
-"   Ifway ethay onditioncay isway otnay andledhay, ethay ebuggerday isway invokedway.  Isthay unctionfay\n"
-"   isway ustjay ikelay errorway, exceptway atthay ethay onditioncay ypetay efaultsday otay ethay ypetay\n"
+"Invokesway ethay ignalsay acilityfay onway away onditioncay ormedfay omfray "
+"atumday andway argumentsway.\n"
+"   Ifway ethay onditioncay isway otnay andledhay, ethay ebuggerday isway "
+"invokedway.  Isthay unctionfay\n"
+"   isway ustjay ikelay errorway, exceptway atthay ethay onditioncay ypetay "
+"efaultsday otay ethay ypetay\n"
 "   implesay-ogrampray-errorway, insteadway ofway ogrampray-errorway."
 
 #: src/code/lispinit.lisp
@@ -356,14 +395,16 @@ msgstr "Ivesgay ethay orldway away oveshay andway opeshay itway insspay."
 
 #: src/code/lispinit.lisp
 msgid "Functions to be invoked during cleanup at Lisp exit."
-msgstr "Unctionsfay otay ebay invokedway uringday eanupclay atway Isplay exitway."
+msgstr ""
+"Unctionsfay otay ebay invokedway uringday eanupclay atway Isplay exitway."
 
 #: src/code/lispinit.lisp
 msgid ""
 "Terminates the current Lisp.  Things are cleaned up unless Recklessly-P is\n"
 "  non-Nil."
 msgstr ""
-"Erminatestay ethay urrentcay Isplay.  Ingsthay areway eanedclay upway unlessway Ecklesslyray-P isway\n"
+"Erminatestay ethay urrentcay Isplay.  Ingsthay areway eanedclay upway "
+"unlessway Ecklesslyray-P isway\n"
 "  onnay-Ilnay."
 
 #: src/code/lispinit.lisp
@@ -371,7 +412,8 @@ msgid ""
 "This function causes execution to be suspended for N seconds.  N may\n"
 "  be any non-negative, non-complex number."
 msgstr ""
-"Isthay unctionfay ausescay executionway otay ebay uspendedsay orfay N econdssay.  N aymay\n"
+"Isthay unctionfay ausescay executionway otay ebay uspendedsay orfay N "
+"econdssay.  N aymay\n"
 "  ebay anyway onnay-egativenay, onnay-omplexcay umbernay."
 
 #: src/code/lispinit.lisp
@@ -379,22 +421,28 @@ msgid ""
 "Zero the unused portion of the control stack so that old objects are not\n"
 "   kept alive because of uninitialized stack variables."
 msgstr ""
-"Erozay ethay unusedway ortionpay ofway ethay ontrolcay tacksay osay atthay oldway objectsway areway otnay\n"
+"Erozay ethay unusedway ortionpay ofway ethay ontrolcay tacksay osay atthay "
+"oldway objectsway areway otnay\n"
 "   eptkay aliveway ecausebay ofway uninitializedway tacksay ariablesvay."
 
 #: src/code/lispinit.lisp
 msgid ""
 "Holds a list of all the values returned by the most recent top-level EVAL."
 msgstr ""
-"Oldshay away istlay ofway allway ethay aluesvay eturnedray ybay ethay ostmay ecentray optay-evellay EVAL."
+"Oldshay away istlay ofway allway ethay aluesvay eturnedray ybay ethay ostmay "
+"ecentray optay-evellay EVAL."
 
 #: src/code/lispinit.lisp
 msgid "Gets the previous value of / when a new value is computed."
-msgstr "Etsgay ethay eviouspray aluevay ofway / enwhay away ewnay aluevay isway omputedcay."
+msgstr ""
+"Etsgay ethay eviouspray aluevay ofway / enwhay away ewnay aluevay isway "
+"omputedcay."
 
 #: src/code/lispinit.lisp
 msgid "Gets the previous value of // when a new value is computed."
-msgstr "Etsgay ethay eviouspray aluevay ofway // enwhay away ewnay aluevay isway omputedcay."
+msgstr ""
+"Etsgay ethay eviouspray aluevay ofway // enwhay away ewnay aluevay isway "
+"omputedcay."
 
 #: src/code/lispinit.lisp
 msgid "Holds the value of the most recent top-level EVAL."
@@ -402,11 +450,15 @@ msgstr "Oldshay ethay aluevay ofway ethay ostmay ecentray optay-evellay EVAL."
 
 #: src/code/lispinit.lisp
 msgid "Gets the previous value of * when a new value is computed."
-msgstr "Etsgay ethay eviouspray aluevay ofway * enwhay away ewnay aluevay isway omputedcay."
+msgstr ""
+"Etsgay ethay eviouspray aluevay ofway * enwhay away ewnay aluevay isway "
+"omputedcay."
 
 #: src/code/lispinit.lisp
 msgid "Gets the previous value of ** when a new value is computed."
-msgstr "Etsgay ethay eviouspray aluevay ofway ** enwhay away ewnay aluevay isway omputedcay."
+msgstr ""
+"Etsgay ethay eviouspray aluevay ofway ** enwhay away ewnay aluevay isway "
+"omputedcay."
 
 #: src/code/lispinit.lisp
 msgid "Holds the value of the most recent top-level READ."
@@ -414,11 +466,15 @@ msgstr "Oldshay ethay aluevay ofway ethay ostmay ecentray optay-evellay READ."
 
 #: src/code/lispinit.lisp
 msgid "Gets the previous value of + when a new value is read."
-msgstr "Etsgay ethay eviouspray aluevay ofway + enwhay away ewnay aluevay isway eadray."
+msgstr ""
+"Etsgay ethay eviouspray aluevay ofway + enwhay away ewnay aluevay isway "
+"eadray."
 
 #: src/code/lispinit.lisp
 msgid "Gets the previous value of ++ when a new value is read."
-msgstr "Etsgay ethay eviouspray aluevay ofway ++ enwhay away ewnay aluevay isway eadray."
+msgstr ""
+"Etsgay ethay eviouspray aluevay ofway ++ enwhay away ewnay aluevay isway "
+"eadray."
 
 #: src/code/lispinit.lisp
 msgid "Holds the form curently being evaluated."
@@ -429,7 +485,8 @@ msgid ""
 "The top-level prompt string.  This also may be a function of no arguments\n"
 "   that returns a simple-string."
 msgstr ""
-"Ethay optay-evellay omptpray ingstray.  Isthay alsoway aymay ebay away unctionfay ofway onay argumentsway\n"
+"Ethay optay-evellay omptpray ingstray.  Isthay alsoway aymay ebay away "
+"unctionfay ofway onay argumentsway\n"
 "   atthay eturnsray away implesay-ingstray."
 
 #: src/code/lispinit.lisp
@@ -437,17 +494,18 @@ msgid ""
 "True if we are within the Top-Level-Catcher.  This is used by interrupt\n"
 "  handlers to see whether it is o.k. to throw."
 msgstr ""
-"Uetray ifway eway areway ithinway ethay Optay-Evellay-Atchercay.  Isthay isway usedway ybay interruptway\n"
+"Uetray ifway eway areway ithinway ethay Optay-Evellay-Atchercay.  Isthay "
+"isway usedway ybay interruptway\n"
 "  andlershay otay eesay etherwhay itway isway o.k. otay rowthay."
 
 #: src/code/lispinit.lisp
 msgid ""
-"Evaluate FORM, returning whatever it returns but adjust ***, **, *, +++, ++,"
-"\n"
+"Evaluate FORM, returning whatever it returns but adjust ***, **, *, +++, +"
+"+,\n"
 "  +, ///, //, /, and -."
 msgstr ""
-"Evaluateway FORM, eturningray ateverwhay itway eturnsray utbay adjustway ***, **, *, +++, ++,"
-"\n"
+"Evaluateway FORM, eturningray ateverwhay itway eturnsray utbay adjustway "
+"***, **, *, +++, ++,\n"
 "  +, ///, //, /, andway -."
 
 #: src/code/lispinit.lisp
@@ -463,7 +521,8 @@ msgid ""
 "How many pages to reserve from the total heap space so we can handle\n"
 "heap overflow."
 msgstr ""
-"Owhay anymay agespay otay eserveray omfray ethay otaltay eaphay acespay osay eway ancay andlehay\n"
+"Owhay anymay agespay otay eserveray omfray ethay otaltay eaphay acespay osay "
+"eway ancay andlehay\n"
 "eaphay overflowway."
 
 #: src/code/lispinit.lisp
@@ -473,10 +532,10 @@ msgstr "Optay-evellay READ-EVAL-PRINT ooplay.  Oday otnay allcay isthay."
 #: src/code/lispinit.lisp
 msgid ""
 "~&Received EOF on *standard-input*, ~\n"
-"					switching to *terminal-io*.~%"
+"\t\t\t\t\tswitching to *terminal-io*.~%"
 msgstr ""
 "~&Eceivedray EOF onway *standard-input*, ~\n"
-"					witchingsay otay *terminal-io*.~%"
+"\t\t\t\t\twitchingsay otay *terminal-io*.~%"
 
 #: src/code/lispinit.lisp
 msgid "~&Received more than ~D EOFs; Aborting.~%"
@@ -499,18 +558,20 @@ msgid ""
 "          This error should never occur when using PCL.  ~\n"
 "          This most likely source of this error is a program which tries to "
 "~\n"
-"          to use the PCL portable code walker to build its own evaluator.~@:"
-">"
-msgstr ""
-"~@<Ethay evaluatorway asway alledcay otay evaluateway away ormfay inway away acroexpansionmay ~\n"
-"          environmentway onstructedcay ybay ethay PCL ortablepay odecay alkerway.  Esethay ~\n"
-"          environmentsway areway onlyway usefulway orfay acroexpansionmay, eythay annotcay ebay ~\n"
+"          to use the PCL portable code walker to build its own evaluator.~@:>"
+msgstr ""
+"~@<Ethay evaluatorway asway alledcay otay evaluateway away ormfay inway away "
+"acroexpansionmay ~\n"
+"          environmentway onstructedcay ybay ethay PCL ortablepay odecay "
+"alkerway.  Esethay ~\n"
+"          environmentsway areway onlyway usefulway orfay acroexpansionmay, "
+"eythay annotcay ebay ~\n"
 "          usedway orfay evaluationway.  ~\n"
 "          Isthay errorway ouldshay evernay occurway enwhay usingway PCL.  ~\n"
-"          Isthay ostmay ikelylay ourcesay ofway isthay errorway isway away ogrampray ichwhay iestray otay "
-"~\n"
-"          otay useway ethay PCL ortablepay odecay alkerway otay uildbay itsway ownway evaluatorway.~@:"
-">"
+"          Isthay ostmay ikelylay ourcesay ofway isthay errorway isway away "
+"ogrampray ichwhay iestray otay ~\n"
+"          otay useway ethay PCL ortablepay odecay alkerway otay uildbay "
+"itsway ownway evaluatorway.~@:>"
 
 #: src/pcl/walk.lisp
 msgid "~@<~S is not a recognized variable declaration.~@:>"
@@ -523,12 +584,15 @@ msgstr "~@<Ancay't etgay emplatetay orfay ~S.~@:>"
 #: src/pcl/walk.lisp
 msgid ""
 "~@<~S is a special form, not defined in the CommonLisp ~\n"
-"		      manual.  This code walker doesn't know how to walk it.  ~\n"
-"		      Define a template for this special form and try again.~@:>"
+"\t\t      manual.  This code walker doesn't know how to walk it.  ~\n"
+"\t\t      Define a template for this special form and try again.~@:>"
 msgstr ""
-"~@<~S isway away ecialspay ormfay, otnay efinedday inway ethay Ommonlispcay ~\n"
-"		      anualmay.  Isthay odecay alkerway oesnday't nowkay owhay otay alkway itway.  ~\n"
-"		      Efineday away emplatetay orfay isthay ecialspay ormfay andway ytray againway.~@:>"
+"~@<~S isway away ecialspay ormfay, otnay efinedday inway ethay Ommonlispcay "
+"~\n"
+"\t\t      anualmay.  Isthay odecay alkerway oesnday't nowkay owhay otay "
+"alkway itway.  ~\n"
+"\t\t      Efineday away emplatetay orfay isthay ecialspay ormfay andway "
+"ytray againway.~@:>"
 
 #: src/pcl/walk.lisp
 msgid ""
@@ -536,7 +600,8 @@ msgid ""
 "                     Ran into stop while still in repeat template.~@:>"
 msgstr ""
 "~@<Ilewhay andlinghay epeatray: ~\n"
-"                     Anray intoway topsay ilewhay tillsay inway epeatray emplatetay.~@:>"
+"                     Anray intoway topsay ilewhay tillsay inway epeatray "
+"emplatetay.~@:>"
 
 #: src/pcl/walk.lisp
 msgid ""
@@ -564,15 +629,16 @@ msgid ""
 "your source code.~@:>"
 msgstr ""
 "~@<Inway ethay ormfay ~S: ~\n"
-"                       IF onlyway acceptsway reethay argumentsway, ouyay areway usingway ~D. ~\n"
-"                       Itway isway uetray atthay omesay Ommoncay Ispslay upportsay isthay, utbay "
-"~\n"
-"                       itway isway otnay ulytray egallay Ommoncay Isplay.  Orfay ownay, isthay "
-"odecay ~\n"
-"                       alkerway isway interpretingway ethay extraway argumentsway asway extraway "
-"elseway ausesclay. ~\n"
-"                       Evenway ifway isthay isway atwhay ouyay intendedway, ouyay ouldshay ixfay "
-"ouryay ourcesay odecay.~@:>"
+"                       IF onlyway acceptsway reethay argumentsway, ouyay "
+"areway usingway ~D. ~\n"
+"                       Itway isway uetray atthay omesay Ommoncay Ispslay "
+"upportsay isthay, utbay ~\n"
+"                       itway isway otnay ulytray egallay Ommoncay Isplay.  "
+"Orfay ownay, isthay odecay ~\n"
+"                       alkerway isway interpretingway ethay extraway "
+"argumentsway asway extraway elseway ausesclay. ~\n"
+"                       Evenway ifway isthay isway atwhay ouyay intendedway, "
+"ouyay ouldshay ixfay ouryay ourcesay odecay.~@:>"
 
 #: src/code/fwrappers.lisp
 msgid ""
@@ -583,9 +649,12 @@ msgid ""
 "   function of the fwrapper object."
 msgstr ""
 "Away uncallablefay instanceway usedway otay implementway wrappersfay.\n"
-"   Ethay CONSTRUCTOR otslay isway away unctionfay efinedday ithway DEFINE-FWRAPPER.\n"
-"   Isthay unctionfay eturnsray anway instanceway osureclay osingclay overway anway \n"
-"   wrapperfay objectway, ichwhay isway installedway asway ethay uncallablefay-instanceway\n"
+"   Ethay CONSTRUCTOR otslay isway away unctionfay efinedday ithway DEFINE-"
+"FWRAPPER.\n"
+"   Isthay unctionfay eturnsray anway instanceway osureclay osingclay overway "
+"anway \n"
+"   wrapperfay objectway, ichwhay isway installedway asway ethay "
+"uncallablefay-instanceway\n"
 "   unctionfay ofway ethay wrapperfay objectway."
 
 #: src/code/fwrappers.lisp
@@ -594,7 +663,9 @@ msgstr "Intpray-unctionfay orfay uctstray FWRAPPER."
 
 #: src/code/fwrappers.lisp
 msgid "Return FUN if it is an fwrapper or nil if it isn't."
-msgstr "Eturnray FUN ifway itway isway anway wrapperfay orway ilnay ifway itway isnway't."
+msgstr ""
+"Eturnray FUN ifway itway isway anway wrapperfay orway ilnay ifway itway "
+"isnway't."
 
 #: src/code/fwrappers.lisp
 msgid ""
@@ -606,7 +677,8 @@ msgstr ""
 
 #: src/code/fwrappers.lisp
 msgid "Return tha last encapsulation of FDEFN or NIL if none."
-msgstr "Eturnray athay astlay encapsulationway ofway FDEFN orway NIL ifway onenay."
+msgstr ""
+"Eturnray athay astlay encapsulationway ofway FDEFN orway NIL ifway onenay."
 
 #: src/code/fwrappers.lisp
 msgid ""
@@ -614,7 +686,8 @@ msgid ""
 "   Signal an error if FUNCTION-NAME is an undefined function."
 msgstr ""
 "Ependpray encapsulationway F otay ethay efinitionday ofway FUNCTION-NAME.\n"
-"   Ignalsay anway errorway ifway FUNCTION-NAME isway anway undefinedway unctionfay."
+"   Ignalsay anway errorway ifway FUNCTION-NAME isway anway undefinedway "
+"unctionfay."
 
 #: src/code/fwrappers.lisp
 msgid "Remove fwrapper F from the definition of FUNCTION-NAME."
@@ -625,7 +698,8 @@ msgid ""
 "Return a list of all fwrappers of FUNCTION-NAME, ordered\n"
 "   from outermost to innermost."
 msgstr ""
-"Eturnray away istlay ofway allway wrappersfay ofway FUNCTION-NAME, orderedway\n"
+"Eturnray away istlay ofway allway wrappersfay ofway FUNCTION-NAME, "
+"orderedway\n"
 "   omfray outermostway otay innermostway."
 
 #: src/code/fwrappers.lisp
@@ -635,7 +709,8 @@ msgid ""
 "   innermost.  FWRAPPERS null means remove all fwrappers."
 msgstr ""
 "Etsay FUNCTION-NAMES's wrappersfay otay elementsway ofway ethay istlay\n"
-"   FWRAPPERS, ichwhay isway assumedway otay ebay orderedway omfray outermostway otay\n"
+"   FWRAPPERS, ichwhay isway assumedway otay ebay orderedway omfray "
+"outermostway otay\n"
 "   innermostway.  FWRAPPERS ullnay eansmay emoveray allway wrappersfay."
 
 #: src/code/fwrappers.lisp
@@ -648,11 +723,15 @@ msgid ""
 "   functions defined with DEFINE-FWRAPPER as (FWRAPPER-USER-DATA\n"
 "   FWRAPPER)."
 msgstr ""
-"Apwray ethay unctionfay amednay FUNCTION-NAME inway anway wrapperfay ofway ypetay TYPE,\n"
+"Apwray ethay unctionfay amednay FUNCTION-NAME inway anway wrapperfay ofway "
+"ypetay TYPE,\n"
 "   eatedcray ybay allingcay CONSTRUCTOR.  CONSTRUCTOR isway away unctionfay\n"
-"   efinedday ithway DEFINE-FWRAPPER, orway ethay amenay ofway uchsay away unctionfay.\n"
-"   Eturnray ethay wrapperfay eatedcray.  USER-DATA isway arbitraryway ataday otay ebay\n"
-"   associatedway ithway ethay wrapperfay.  Itway isway accessibleway inway apperwray\n"
+"   efinedday ithway DEFINE-FWRAPPER, orway ethay amenay ofway uchsay away "
+"unctionfay.\n"
+"   Eturnray ethay wrapperfay eatedcray.  USER-DATA isway arbitraryway ataday "
+"otay ebay\n"
+"   associatedway ithway ethay wrapperfay.  Itway isway accessibleway inway "
+"apperwray\n"
 "   unctionsfay efinedday ithway DEFINE-FWRAPPER asway (FWRAPPER-USER-DATA\n"
 "   FWRAPPER)."
 
@@ -664,7 +743,8 @@ msgid ""
 "   If both are not specified, remove all fwrappers."
 msgstr ""
 "Emoveray wrappersfay omfray ethay unctionfay amednay FUNCTION-NAME.\n"
-"   Ifway TYPE isway uppliedsay, emoveray wrappersfay osewhay ypetay isway equalway otay TYPE.\n"
+"   Ifway TYPE isway uppliedsay, emoveray wrappersfay osewhay ypetay isway "
+"equalway otay TYPE.\n"
 "   Ifway TEST isway uppliedsay, emoveray wrappersfay atisfyingsay TEST.\n"
 "   Ifway othbay areway otnay ecifiedspay, emoveray allway wrappersfay."
 
@@ -673,7 +753,8 @@ msgid ""
 "Update the funcallable instance function of fwrapper F from its\n"
 "   constructor."
 msgstr ""
-"Updateway ethay uncallablefay instanceway unctionfay ofway wrapperfay F omfray itsway\n"
+"Updateway ethay uncallablefay instanceway unctionfay ofway wrapperfay F "
+"omfray itsway\n"
 "   onstructorcay."
 
 #: src/code/fwrappers.lisp
@@ -683,7 +764,8 @@ msgid ""
 "   If TEST is supplied, update fwrappers satisfying TEST."
 msgstr ""
 "Updateway wrapperfay unctionfay efinitionsday ofway FUNCTION-NAME.\n"
-"   Ifway TYPE isway uppliedsay, updateway wrappersfay osewhay ypetay isway equalway otay TYPE.\n"
+"   Ifway TYPE isway uppliedsay, updateway wrappersfay osewhay ypetay isway "
+"equalway otay TYPE.\n"
 "   Ifway TEST isway uppliedsay, updateway wrappersfay atisfyingsay TEST."
 
 #: src/code/fwrappers.lisp
@@ -693,7 +775,8 @@ msgid ""
 "   If TEST is supplied, find an fwrapper satisfying TEST."
 msgstr ""
 "Indfay anway wrapperfay ofway FUNCTION-NAME.\n"
-"   Ifway TYPE isway uppliedsay, indfay anway wrapperfay osewhay ypetay isway equalway otay TYPE.\n"
+"   Ifway TYPE isway uppliedsay, indfay anway wrapperfay osewhay ypetay isway "
+"equalway otay TYPE.\n"
 "   Ifway TEST isway uppliedsay, indfay anway wrapperfay atisfyingsay TEST."
 
 #: src/code/fwrappers.lisp
@@ -707,11 +790,16 @@ msgid ""
 "   invokes the next function with the supplied args."
 msgstr ""
 "Ikelay DEFUN, utbay efineday away unctionfay apperwray.\n"
-"   Inway BODY, ethay ymbolsay FWRAPPERS:FWRAPPERS efersray otay ethay urrentlycay\n"
-"   executingway wrapperfay.  FWRAPPERS:CALL-NEXT-FUNCTION ancay ebay usedway\n"
-"   inway BODY otay allcay ethay extnay wrapperfay orway ethay imarypray unctionfay.  Enwhay\n"
-"   alledcay ithway onay argumentsway, CALL-NEXT-FUNCTION invokesway ethay extnay\n"
-"   unctionfay ithway ethay originalway argsway otay ethay wrapperfay, otherwiseway itway\n"
+"   Inway BODY, ethay ymbolsay FWRAPPERS:FWRAPPERS efersray otay ethay "
+"urrentlycay\n"
+"   executingway wrapperfay.  FWRAPPERS:CALL-NEXT-FUNCTION ancay ebay "
+"usedway\n"
+"   inway BODY otay allcay ethay extnay wrapperfay orway ethay imarypray "
+"unctionfay.  Enwhay\n"
+"   alledcay ithway onay argumentsway, CALL-NEXT-FUNCTION invokesway ethay "
+"extnay\n"
+"   unctionfay ithway ethay originalway argsway otay ethay wrapperfay, "
+"otherwiseway itway\n"
 "   invokesway ethay extnay unctionfay ithway ethay uppliedsay argsway."
 
 #: src/code/fwrappers.lisp
@@ -724,8 +812,10 @@ msgid ""
 "     OPTIONALS, KEYS or REST, which are what KERNEL:PARSE-LAMBDA-LIST\n"
 "     returns.  Second value is true if BODY refers to REST."
 msgstr ""
-"Irstfay aluevay isway uetray ifway BODY efersray otay anyway ofway ethay ariablesvay inway\n"
-"     OPTIONALS, KEYS orway REST, ichwhay areway atwhay KERNEL:PARSE-LAMBDA-LIST\n"
+"Irstfay aluevay isway uetray ifway BODY efersray otay anyway ofway ethay "
+"ariablesvay inway\n"
+"     OPTIONALS, KEYS orway REST, ichwhay areway atwhay KERNEL:PARSE-LAMBDA-"
+"LIST\n"
 "     eturnsray.  Econdsay aluevay isway uetray ifway BODY efersray otay REST."
 
 #: src/code/fwrappers.lisp
@@ -749,11 +839,15 @@ msgid ""
 "  is the name, a symbol, of the function for use in the BLOCK of DEFUNs\n"
 "  and in similar situations."
 msgstr ""
-"Efineday (NAME ...) otay ebay away alidvay unctionfay amenay osewhay yntaxsay isway eckedchay\n"
-"  ybay BODY.  Inway BODY, VAR isway oundbay otay anway actualway unctionfay amenay ofway ethay\n"
+"Efineday (NAME ...) otay ebay away alidvay unctionfay amenay osewhay "
+"yntaxsay isway eckedchay\n"
+"  ybay BODY.  Inway BODY, VAR isway oundbay otay anway actualway unctionfay "
+"amenay ofway ethay\n"
 "  ormfay (NAME ...) otay eckchay.  BODY ouldshay eturnray wotay aluesvay.\n"
-"  Irstfay aluevay uetray eansmay ethay unctionfay amenay isway alidvay.  Econdsay aluevay\n"
-"  isway ethay amenay, away ymbolsay, ofway ethay unctionfay orfay useway inway ethay BLOCK ofway Efunsday\n"
+"  Irstfay aluevay uetray eansmay ethay unctionfay amenay isway alidvay.  "
+"Econdsay aluevay\n"
+"  isway ethay amenay, away ymbolsay, ofway ethay unctionfay orfay useway "
+"inway ethay BLOCK ofway Efunsday\n"
 "  andway inway imilarsay ituationssay."
 
 #: src/code/fdefinition.lisp
@@ -762,8 +856,10 @@ msgid ""
 "  Second value is the name, a symbol, to use as a block name in DEFUNs\n"
 "  and in similar situations."
 msgstr ""
-"Irstfay aluevay isway uetray ifway NAME ashay alidvay unctionfay amenay yntaxsay.\n"
-"  Econdsay aluevay isway ethay amenay, away ymbolsay, otay useway asway away ockblay amenay inway Efunsday\n"
+"Irstfay aluevay isway uetray ifway NAME ashay alidvay unctionfay amenay "
+"yntaxsay.\n"
+"  Econdsay aluevay isway ethay amenay, away ymbolsay, otay useway asway away "
+"ockblay amenay inway Efunsday\n"
 "  andway inway imilarsay ituationssay."
 
 #: src/code/fdefinition.lisp
@@ -771,7 +867,8 @@ msgid ""
 "Return the fdefn object for NAME.  If it doesn't already exist and CREATE\n"
 "   is non-NIL, create a new (unbound) one."
 msgstr ""
-"Eturnray ethay defnfay objectway orfay NAME.  Ifway itway oesnday't alreadyway existway andway CREATE\n"
+"Eturnray ethay defnfay objectway orfay NAME.  Ifway itway oesnday't "
+"alreadyway existway andway CREATE\n"
 "   isway onnay-NIL, eatecray away ewnay (unboundway) oneway."
 
 #: src/code/fdefinition.lisp
@@ -783,7 +880,8 @@ msgid ""
 "Return the FDEFN of NAME.  Signal an error if there is none\n"
 "   or if it's function is null."
 msgstr ""
-"Eturnray ethay FDEFN ofway NAME.  Ignalsay anway errorway ifway erethay isway onenay\n"
+"Eturnray ethay FDEFN ofway NAME.  Ignalsay anway errorway ifway erethay "
+"isway onenay\n"
 "   orway ifway itway's unctionfay isway ullnay."
 
 #: src/code/fdefinition.lisp
@@ -791,7 +889,8 @@ msgid ""
 "Returns the definition for name, including any encapsulations.  Settable\n"
 "   with SETF."
 msgstr ""
-"Eturnsray ethay efinitionday orfay amenay, includingway anyway encapsulationsway.  Ettablesay\n"
+"Eturnsray ethay efinitionday orfay amenay, includingway anyway "
+"encapsulationsway.  Ettablesay\n"
 "   ithway SETF."
 
 #: src/code/fdefinition.lisp
@@ -801,7 +900,8 @@ msgid ""
 "   stored in the innermost fwrapper."
 msgstr ""
 "Eturnray FUNCTION-NAME's obalglay unctionfay efinitionday.\n"
-"   Ifway FUNCTION-NAME isway wrappedfay, eturnray ethay imarypray unctionfay efinitionday\n"
+"   Ifway FUNCTION-NAME isway wrappedfay, eturnray ethay imarypray unctionfay "
+"efinitionday\n"
 "   toredsay inway ethay innermostway wrapperfay."
 
 #: src/code/fdefinition.lisp
@@ -809,8 +909,10 @@ msgid ""
 "This holds functions that (SETF FDEFINITION) invokes before storing the\n"
 "   new value.  These functions take the function name and the new value."
 msgstr ""
-"Isthay oldshay unctionsfay atthay (SETF FDEFINITION) invokesway eforebay toringsay ethay\n"
-"   ewnay aluevay.  Esethay unctionsfay aketay ethay unctionfay amenay andway ethay ewnay aluevay."
+"Isthay oldshay unctionsfay atthay (SETF FDEFINITION) invokesway eforebay "
+"toringsay ethay\n"
+"   ewnay aluevay.  Esethay unctionsfay aketay ethay unctionfay amenay andway "
+"ethay ewnay aluevay."
 
 #: src/code/fdefinition.lisp
 msgid ""
@@ -819,12 +921,14 @@ msgid ""
 "   in the innermost fwrapper."
 msgstr ""
 "Etsay FUNCTION-NAME's obalglay unctionfay efinitionday otay NEW-VALUE.\n"
-"   Ifway FUNCTION-NAME isway wrappedfay, etsay ethay imarypray unctionfay toredsay\n"
+"   Ifway FUNCTION-NAME isway wrappedfay, etsay ethay imarypray unctionfay "
+"toredsay\n"
 "   inway ethay innermostway wrapperfay."
 
 #: src/code/fdefinition.lisp
 msgid "Return true if name has a global function definition."
-msgstr "Eturnray uetray ifway amenay ashay away obalglay unctionfay efinitionday."
+msgstr ""
+"Eturnray uetray ifway amenay ashay away obalglay unctionfay efinitionday."
 
 #: src/code/fdefinition.lisp
 msgid "Make Name have no global function definition."
@@ -841,9 +945,12 @@ msgid ""
 "   specified, then only restarts associated with Condition (or with no\n"
 "   condition) will be returned."
 msgstr ""
-"Eturnray away istlay ofway allway ethay urrentlycay activeway estartsray orderedway omfray ostmay\n"
-"   ecentlyray establishedway otay esslay ecentlyray establishedway.  Ifway Onditioncay isway\n"
-"   ecifiedspay, enthay onlyway estartsray associatedway ithway Onditioncay (orway ithway onay\n"
+"Eturnray away istlay ofway allway ethay urrentlycay activeway estartsray "
+"orderedway omfray ostmay\n"
+"   ecentlyray establishedway otay esslay ecentlyray establishedway.  Ifway "
+"Onditioncay isway\n"
+"   ecifiedspay, enthay onlyway estartsray associatedway ithway Onditioncay "
+"(orway ithway onay\n"
 "   onditioncay) illway ebay eturnedray."
 
 #: src/code/error.lisp
@@ -855,20 +962,21 @@ msgid ""
 "WITH-CONDITION-RESTARTS Condition-Form Restarts-Form Form*\n"
 "   Evaluates the Forms in a dynamic environment where the restarts in the "
 "list\n"
-"   Restarts-Form are associated with the condition returned by Condition-For"
-"m.\n"
+"   Restarts-Form are associated with the condition returned by Condition-"
+"Form.\n"
 "   This allows FIND-RESTART, etc., to recognize restarts that are not "
 "related\n"
 "   to the error currently being debugged.  See also RESTART-CASE."
 msgstr ""
 "WITH-CONDITION-RESTARTS Onditioncay-Ormfay Estartsray-Ormfay Orm*Fay\n"
-"   Evaluatesway ethay Ormsfay inway away ynamicday environmentway erewhay ethay estartsray inway ethay "
-"istlay\n"
-"   Estartsray-Ormfay areway associatedway ithway ethay onditioncay eturnedray ybay Onditioncay-Orfay"
-"m.\n"
-"   Isthay allowsway FIND-RESTART, etcway., otay ecognizeray estartsray atthay areway otnay "
-"elatedray\n"
-"   otay ethay errorway urrentlycay eingbay ebuggedday.  Eesay alsoway RESTART-CASE."
+"   Evaluatesway ethay Ormsfay inway away ynamicday environmentway erewhay "
+"ethay estartsray inway ethay istlay\n"
+"   Estartsray-Ormfay areway associatedway ithway ethay onditioncay "
+"eturnedray ybay Onditioncay-Orfaym.\n"
+"   Isthay allowsway FIND-RESTART, etcway., otay ecognizeray estartsray "
+"atthay areway otnay elatedray\n"
+"   otay ethay errorway urrentlycay eingbay ebuggedday.  Eesay alsoway "
+"RESTART-CASE."
 
 #: src/code/error.lisp
 msgid ""
@@ -877,16 +985,20 @@ msgid ""
 "contain\n"
 "   the same restart name, FIND-RESTART will find the first such clause."
 msgstr ""
-"Executesway ormsfay inway away ynamicday ontextcay erewhay ethay ivengay estartray indingsbay areway\n"
-"   inway effectway.  Usersway obablypray antway otay useway RESTART-CASE.  Enwhay ausesclay "
-"ontaincay\n"
-"   ethay amesay estartray amenay, FIND-RESTART illway indfay ethay irstfay uchsay auseclay."
+"Executesway ormsfay inway away ynamicday ontextcay erewhay ethay ivengay "
+"estartray indingsbay areway\n"
+"   inway effectway.  Usersway obablypray antway otay useway RESTART-CASE.  "
+"Enwhay ausesclay ontaincay\n"
+"   ethay amesay estartray amenay, FIND-RESTART illway indfay ethay irstfay "
+"uchsay auseclay."
 
 #: src/code/error.lisp
-msgid "Unnamed restart does not have a ~\n"
-"					report function -- ~S"
-msgstr "Unnamedway estartray oesday otnay avehay away ~\n"
-"					eportray unctionfay -- ~S"
+msgid ""
+"Unnamed restart does not have a ~\n"
+"\t\t\t\t\treport function -- ~S"
+msgstr ""
+"Unnamedway estartray oesday otnay avehay away ~\n"
+"\t\t\t\t\teportray unctionfay -- ~S"
 
 #: src/code/error.lisp
 msgid ""
@@ -898,12 +1010,14 @@ msgid ""
 "   NIL, then only restarts associated with that condition (or with no\n"
 "   condition) will be returned."
 msgstr ""
-"Eturnsray ethay irstfay estartray amednay amenay.  Ifway amenay isway away estartray, itway isway eturnedray\n"
-"   ifway itway isway urrentlycay activeway.  Ifway onay uchsay estartray isway oundfay, ilnay isway "
-"eturnedray.\n"
-"   Itway isway anway errorway otay upplysay ilnay asway away amenay.  Ifway Onditioncay isway ecifiedspay andway "
-"otnay\n"
-"   NIL, enthay onlyway estartsray associatedway ithway atthay onditioncay (orway ithway onay\n"
+"Eturnsray ethay irstfay estartray amednay amenay.  Ifway amenay isway away "
+"estartray, itway isway eturnedray\n"
+"   ifway itway isway urrentlycay activeway.  Ifway onay uchsay estartray "
+"isway oundfay, ilnay isway eturnedray.\n"
+"   Itway isway anway errorway otay upplysay ilnay asway away amenay.  Ifway "
+"Onditioncay isway ecifiedspay andway otnay\n"
+"   NIL, enthay onlyway estartsray associatedway ithway atthay onditioncay "
+"(orway ithway onay\n"
 "   onditioncay) illway ebay eturnedray."
 
 #: src/code/error.lisp
@@ -913,10 +1027,12 @@ msgid ""
 "active\n"
 "   non-nil restart name, then a control-error is signalled."
 msgstr ""
-"Allscay ethay unctionfay associatedway ithway ethay ivengay estartray, assingpay anyway ivengay\n"
-"   argumentsway.  Ifway ethay argumentway estartray isway otnay away estartray orway away urrentlycay "
-"activeway\n"
-"   onnay-ilnay estartray amenay, enthay away ontrolcay-errorway isway ignalledsay."
+"Allscay ethay unctionfay associatedway ithway ethay ivengay estartray, "
+"assingpay anyway ivengay\n"
+"   argumentsway.  Ifway ethay argumentway estartray isway otnay away "
+"estartray orway away urrentlycay activeway\n"
+"   onnay-ilnay estartray amenay, enthay away ontrolcay-errorway isway "
+"ignalledsay."
 
 #: src/code/error.lisp
 msgid "Restart ~S is not active."
@@ -926,13 +1042,14 @@ msgstr "Estartray ~S isway otnay activeway."
 msgid ""
 "Calls the function associated with the given restart, prompting for any\n"
 "   necessary arguments.  If the argument restart is not a restart or a\n"
-"   currently active non-nil restart name, then a control-error is "
-"signalled."
+"   currently active non-nil restart name, then a control-error is signalled."
 msgstr ""
-"Allscay ethay unctionfay associatedway ithway ethay ivengay estartray, omptingpray orfay anyway\n"
-"   ecessarynay argumentsway.  Ifway ethay argumentway estartray isway otnay away estartray orway away\n"
-"   urrentlycay activeway onnay-ilnay estartray amenay, enthay away ontrolcay-errorway isway "
-"ignalledsay."
+"Allscay ethay unctionfay associatedway ithway ethay ivengay estartray, "
+"omptingpray orfay anyway\n"
+"   ecessarynay argumentsway.  Ifway ethay argumentway estartray isway otnay "
+"away estartray orway away\n"
+"   urrentlycay activeway onnay-ilnay estartray amenay, enthay away ontrolcay-"
+"errorway isway ignalledsay."
 
 #: src/code/error.lisp
 msgid ""
@@ -940,8 +1057,8 @@ msgid ""
 "   {(case-name arg-list {keyword value}* body)}*)\n"
 "   The form is evaluated in a dynamic context where the clauses have "
 "special\n"
-"   meanings as points to which control may be transferred (see INVOKE-RESTAR"
-"T).\n"
+"   meanings as points to which control may be transferred (see INVOKE-"
+"RESTART).\n"
 "   When clauses contain the same case-name, FIND-RESTART will find the "
 "first\n"
 "   such clause.  If Expression is a call to SIGNAL, ERROR, CERROR or WARN "
@@ -952,16 +1069,16 @@ msgid ""
 msgstr ""
 "(RESTART-CASE ormfay\n"
 "   {(asecay-amenay argway-istlay {eywordkay aluevay}* odybay)}*)\n"
-"   Ethay ormfay isway evaluatedway inway away ynamicday ontextcay erewhay ethay ausesclay avehay "
-"ecialspay\n"
-"   eaningsmay asway ointspay otay ichwhay ontrolcay aymay ebay ansferredtray (eesay INVOKE-RESTAR"
-"T).\n"
-"   Enwhay ausesclay ontaincay ethay amesay asecay-amenay, FIND-RESTART illway indfay ethay "
-"irstfay\n"
-"   uchsay auseclay.  Ifway Expressionway isway away allcay otay SIGNAL, ERROR, CERROR orway WARN "
-"(orway\n"
-"   acroexpandsmay intoway uchsay) enthay ethay ignalledsay onditioncay illway ebay associatedway "
-"ithway\n"
+"   Ethay ormfay isway evaluatedway inway away ynamicday ontextcay erewhay "
+"ethay ausesclay avehay ecialspay\n"
+"   eaningsmay asway ointspay otay ichwhay ontrolcay aymay ebay ansferredtray "
+"(eesay INVOKE-RESTART).\n"
+"   Enwhay ausesclay ontaincay ethay amesay asecay-amenay, FIND-RESTART "
+"illway indfay ethay irstfay\n"
+"   uchsay auseclay.  Ifway Expressionway isway away allcay otay SIGNAL, "
+"ERROR, CERROR orway WARN (orway\n"
+"   acroexpandsmay intoway uchsay) enthay ethay ignalledsay onditioncay "
+"illway ebay associatedway ithway\n"
 "   ethay ewnay estartsray."
 
 #: src/code/error.lisp
@@ -972,10 +1089,13 @@ msgid ""
 "   returned.  If control is transferred to this restart, it immediately\n"
 "   returns the values nil and t."
 msgstr ""
-"(WITH-SIMPLE-RESTART (estartray-amenay ormatfay-ingstray ormatfay-argumentsway)\n"
+"(WITH-SIMPLE-RESTART (estartray-amenay ormatfay-ingstray ormatfay-"
+"argumentsway)\n"
 "   odybay)\n"
-"   Ifway estartray-amenay isway otnay invokedway, enthay allway aluesvay eturnedray ybay ormsfay areway\n"
-"   eturnedray.  Ifway ontrolcay isway ansferredtray otay isthay estartray, itway immediatelyway\n"
+"   Ifway estartray-amenay isway otnay invokedway, enthay allway aluesvay "
+"eturnedray ybay ormsfay areway\n"
+"   eturnedray.  Ifway ontrolcay isway ansferredtray otay isthay estartray, "
+"itway immediatelyway\n"
 "   eturnsray ethay aluesvay ilnay andway t."
 
 #: src/code/error.lisp
@@ -996,7 +1116,9 @@ msgstr "Otslay ~S ofway ~S issingmay."
 
 #: src/code/error.lisp
 msgid "Make an instance of a condition object using the specified initargs."
-msgstr "Akemay anway instanceway ofway away onditioncay objectway usingway ethay ecifiedspay initargsway."
+msgstr ""
+"Akemay anway instanceway ofway away onditioncay objectway usingway ethay "
+"ecifiedspay initargsway."
 
 #: src/code/error.lisp
 msgid "~S is not a condition class."
@@ -1036,45 +1158,52 @@ msgid ""
 "condition.\n"
 "   If a string, the string is printed.\n"
 "\n"
-"   Condition types are classes, but (as allowed by ANSI and not as described"
-" in\n"
+"   Condition types are classes, but (as allowed by ANSI and not as described "
+"in\n"
 "   CLtL2) are neither STANDARD-OBJECTs nor STRUCTURE-OBJECTs.  WITH-SLOTS "
 "and\n"
 "   SLOT-VALUE may not be used on condition objects."
 msgstr ""
 "DEFINE-CONDITION Amenay (Arentpay-Ype*Tay) (Otslay-Ec*Spay) Option*Way\n"
-"   Efineday NAME asway away onditioncay ypetay.  Isthay ewnay ypetay inheritsway otsslay andway itsway\n"
-"   eportray unctionfay omfray ethay ecifiedspay PARENT-Ypestay.  Away otslay ecspay isway eitherway\n"
-"   away ymbolsay enotingday ethay amenay ofway ethay otslay, orway away istlay ofway ethay ormfay:\n"
+"   Efineday NAME asway away onditioncay ypetay.  Isthay ewnay ypetay "
+"inheritsway otsslay andway itsway\n"
+"   eportray unctionfay omfray ethay ecifiedspay PARENT-Ypestay.  Away otslay "
+"ecspay isway eitherway\n"
+"   away ymbolsay enotingday ethay amenay ofway ethay otslay, orway away "
+"istlay ofway ethay ormfay:\n"
 "\n"
 "     (otslay-amenay {otslay-optionway aluevay}*)\n"
 "\n"
-"   erewhay otslay-optionway isway oneway ofway :READER, :WRITER, :ACCESSOR, :ALLOCATION,\n"
+"   erewhay otslay-optionway isway oneway ofway :READER, :WRITER, :ACCESSOR, :"
+"ALLOCATION,\n"
 "   :INITARG, :INITFORM, :DOCUMENTATION, andway :TYPE.\n"
 "\n"
 "   Eachway overallway optionway isway ofway ethay ormfay\n"
 "\n"
 "     (optionway-amenay {aluevay}*)\n"
 "\n"
-"   erewhay optionway-amenay isway oneway ofway :DEFAULT-INITARGS, :DOCUMENTATION,\n"
+"   erewhay optionway-amenay isway oneway ofway :DEFAULT-INITARGS, :"
+"DOCUMENTATION,\n"
 "   andway :REPORT.\n"
 "\n"
-"   Ethay :REPORT optionway isway eculiarpay otay DEFINE-CONDITION.  Itsway argumentway isway "
-"eitherway\n"
-"   away ingstray orway away wotay-argumentway ambdalay orway unctionfay amenay.  Ifway away unctionfay, ethay\n"
-"   unctionfay isway alledcay ithway ethay onditioncay andway eamstray otay eportray ethay "
-"onditioncay.\n"
+"   Ethay :REPORT optionway isway eculiarpay otay DEFINE-CONDITION.  Itsway "
+"argumentway isway eitherway\n"
+"   away ingstray orway away wotay-argumentway ambdalay orway unctionfay "
+"amenay.  Ifway away unctionfay, ethay\n"
+"   unctionfay isway alledcay ithway ethay onditioncay andway eamstray otay "
+"eportray ethay onditioncay.\n"
 "   Ifway away ingstray, ethay ingstray isway intedpray.\n"
 "\n"
-"   Onditioncay ypestay areway assesclay, utbay (asway allowedway ybay ANSI andway otnay asway escribedday"
-" inway\n"
-"   Tlclay2) areway eithernay STANDARD-Objectsway ornay STRUCTURE-Objectsway.  WITH-SLOTS "
-"andway\n"
+"   Onditioncay ypestay areway assesclay, utbay (asway allowedway ybay ANSI "
+"andway otnay asway escribedday inway\n"
+"   Tlclay2) areway eithernay STANDARD-Objectsway ornay STRUCTURE-"
+"Objectsway.  WITH-SLOTS andway\n"
 "   SLOT-VALUE aymay otnay ebay usedway onway onditioncay objectsway."
 
 #: src/code/error.lisp
 msgid "Keyword slot name indicates probable syntax error:~%  ~S"
-msgstr "Eywordkay otslay amenay indicatesway obablepray yntaxsay errorway:~%  ~S"
+msgstr ""
+"Eywordkay otslay amenay indicatesway obablepray yntaxsay errorway:~%  ~S"
 
 #: src/code/error.lisp
 msgid "Malformed condition slot spec:~%  ~S."
@@ -1113,9 +1242,12 @@ msgid ""
 "   signalled condition."
 msgstr ""
 "(HANDLER-BIND ( {(ypetay andlerhay)}* )  odybay)\n"
-"   Executesway odybay inway away ynamicday ontextcay erewhay ethay ivengay andlerhay indingsbay areway\n"
-"   inway effectway.  Eachway andlerhay ustmay aketay ethay onditioncay eingbay ignalledsay asway anway\n"
-"   argumentway.  Ethay indingsbay areway earchedsay irstfay otay astlay inway ethay eventway ofway away\n"
+"   Executesway odybay inway away ynamicday ontextcay erewhay ethay ivengay "
+"andlerhay indingsbay areway\n"
+"   inway effectway.  Eachway andlerhay ustmay aketay ethay onditioncay "
+"eingbay ignalledsay asway anway\n"
+"   argumentway.  Ethay indingsbay areway earchedsay irstfay otay astlay "
+"inway ethay eventway ofway away\n"
 "   ignalledsay onditioncay."
 
 #: src/code/error.lisp
@@ -1141,14 +1273,16 @@ msgstr "~@<Ypetay-errorway inway ~S:  ~3i~:_~S isway otnay ofway ypetay ~S~:>"
 #: src/code/error.lisp
 msgid ""
 "Layout-invalid error in ~S:~@\n"
-"		     Type test of class ~S was passed obsolete instance:~%  ~S"
+"\t\t     Type test of class ~S was passed obsolete instance:~%  ~S"
 msgstr ""
 "Ayoutlay-invalidway errorway inway ~S:~@\n"
-"		     Ypetay esttay ofway assclay ~S asway assedpay obsoleteway instanceway:~%  ~S"
+"\t\t     Ypetay esttay ofway assclay ~S asway assedpay obsoleteway "
+"instanceway:~%  ~S"
 
 #: src/code/error.lisp
 msgid "~@<~S fell through ~S expression.  ~:_Wanted one of ~:S.~:>"
-msgstr "~@<~S ellfay roughthay ~S expressionway.  ~:_Antedway oneway ofway ~:S.~:>"
+msgstr ""
+"~@<~S ellfay roughthay ~S expressionway.  ~:_Antedway oneway ofway ~:S.~:>"
 
 #: src/code/error.lisp
 msgid "End-of-File on ~S"
@@ -1197,13 +1331,14 @@ msgid ""
 msgstr ""
 "(HANDLER-CASE ormfay\n"
 "   { (ypetay ([arvay]) odybay) }* )\n"
-"   Executesway ormfay inway away ontextcay ithway andlershay establishedway orfay ethay onditioncay\n"
-"   ypestay.  Away eculiarpay opertypray allowsway ypetay otay ebay :onay-errorway.  Ifway uchsay away "
-"auseclay\n"
-"   occursway, andway ormfay eturnsray ormallynay, allway itsway aluesvay areway assedpay otay isthay "
-"auseclay\n"
-"   asway ifway ybay MULTIPLE-VALUE-CALL.  Ethay :onay-errorway auseclay acceptsway oremay anthay "
-"oneway\n"
+"   Executesway ormfay inway away ontextcay ithway andlershay establishedway "
+"orfay ethay onditioncay\n"
+"   ypestay.  Away eculiarpay opertypray allowsway ypetay otay ebay :onay-"
+"errorway.  Ifway uchsay away auseclay\n"
+"   occursway, andway ormfay eturnsray ormallynay, allway itsway aluesvay "
+"areway assedpay otay isthay auseclay\n"
+"   asway ifway ybay MULTIPLE-VALUE-CALL.  Ethay :onay-errorway auseclay "
+"acceptsway oremay anthay oneway\n"
 "   arvay ecificationspay."
 
 #: src/code/error.lisp
@@ -1211,19 +1346,23 @@ msgid ""
 "Executes forms after establishing a handler for all error conditions that\n"
 "   returns from this form nil and the condition signalled."
 msgstr ""
-"Executesway ormsfay afterway establishingway away andlerhay orfay allway errorway onditionscay atthay\n"
+"Executesway ormsfay afterway establishingway away andlerhay orfay allway "
+"errorway onditionscay atthay\n"
 "   eturnsray omfray isthay ormfay ilnay andway ethay onditioncay ignalledsay."
 
 #: src/code/error.lisp
 msgid "Found an \"abort\" restart that failed to transfer control dynamically."
-msgstr "Oundfay anway \"abortway\" estartray atthay ailedfay otay ansfertray ontrolcay ynamicallyday."
+msgstr ""
+"Oundfay anway \"abortway\" estartray atthay ailedfay otay ansfertray "
+"ontrolcay ynamicallyday."
 
 #: src/code/error.lisp
 msgid ""
 "Transfers control to a restart named abort, signalling a control-error if\n"
 "   none exists."
 msgstr ""
-"Ansferstray ontrolcay otay away estartray amednay abortway, ignallingsay away ontrolcay-errorway ifway\n"
+"Ansferstray ontrolcay otay away estartray amednay abortway, ignallingsay "
+"away ontrolcay-errorway ifway\n"
 "   onenay existsway."
 
 #: src/code/error.lisp
@@ -1231,21 +1370,24 @@ msgid ""
 "Transfers control to a restart named muffle-warning, signalling a\n"
 "   control-error if none exists."
 msgstr ""
-"Ansferstray ontrolcay otay away estartray amednay ufflemay-arningway, ignallingsay away\n"
+"Ansferstray ontrolcay otay away estartray amednay ufflemay-arningway, "
+"ignallingsay away\n"
 "   ontrolcay-errorway ifway onenay existsway."
 
 #: src/code/error.lisp
 msgid ""
 "Transfer control to a restart named continue, returning nil if none exists."
 msgstr ""
-"Ansfertray ontrolcay otay away estartray amednay ontinuecay, eturningray ilnay ifway onenay existsway."
+"Ansfertray ontrolcay otay away estartray amednay ontinuecay, eturningray "
+"ilnay ifway onenay existsway."
 
 #: src/code/error.lisp
 msgid ""
 "Transfer control and value to a restart named store-value, returning nil if\n"
 "   none exists."
 msgstr ""
-"Ansfertray ontrolcay andway aluevay otay away estartray amednay toresay-aluevay, eturningray ilnay ifway\n"
+"Ansfertray ontrolcay andway aluevay otay away estartray amednay toresay-"
+"aluevay, eturningray ilnay ifway\n"
 "   onenay existsway."
 
 #: src/code/error.lisp
@@ -1253,16 +1395,20 @@ msgid ""
 "Transfer control and value to a restart named use-value, returning nil if\n"
 "   none exists."
 msgstr ""
-"Ansfertray ontrolcay andway aluevay otay away estartray amednay useway-aluevay, eturningray ilnay ifway\n"
+"Ansfertray ontrolcay andway aluevay otay away estartray amednay useway-"
+"aluevay, eturningray ilnay ifway\n"
 "   onenay existsway."
 
 #: src/code/typedefs.lisp
 msgid "Forms that must happen before top level forms are run."
-msgstr "Ormsfay atthay ustmay appenhay eforebay optay evellay ormsfay areway unray."
+msgstr ""
+"Ormsfay atthay ustmay appenhay eforebay optay evellay ormsfay areway unray."
 
 #: src/code/typedefs.lisp
 msgid "Can't cold-load-init other forms along with an eval-when."
-msgstr "Ancay't oldcay-oadlay-initway otherway ormsfay alongway ithway anway evalway-enwhay."
+msgstr ""
+"Ancay't oldcay-oadlay-initway otherway ormsfay alongway ithway anway evalway-"
+"enwhay."
 
 #: src/code/typedefs.lisp
 msgid "~S is not a defined type class."
@@ -1278,7 +1424,8 @@ msgstr "~S isway otnay away efinedday ypetay assclay ethodmay."
 
 #: src/code/typedefs.lisp
 msgid "DEFINE-TYPE-METHOD (Class-Name Method-Name+) Lambda-List Form*"
-msgstr "DEFINE-TYPE-METHOD (Assclay-Amenay Ethodmay-Amenay+) Ambdalay-Istlay Orm*Fay"
+msgstr ""
+"DEFINE-TYPE-METHOD (Assclay-Amenay Ethodmay-Amenay+) Ambdalay-Istlay Orm*Fay"
 
 #: src/code/typedefs.lisp
 msgid "DEFINE-TYPE-CLASS Name [Inherits]"
@@ -1293,14 +1440,18 @@ msgid "The inclusive upper bound on LAYOUT-HASH values."
 msgstr "Ethay inclusiveway upperway oundbay onway LAYOUT-HASH aluesvay."
 
 #: src/code/class.lisp
-msgid "Layout depth conflict: ~S~%  ~\n"
-"		        (~S collides at ~S with ~S)~%"
-msgstr "Ayoutlay epthday onflictcay: ~S~%  ~\n"
-"		        (~S ollidescay atway ~S ithway ~S)~%"
+msgid ""
+"Layout depth conflict: ~S~%  ~\n"
+"\t\t        (~S collides at ~S with ~S)~%"
+msgstr ""
+"Ayoutlay epthday onflictcay: ~S~%  ~\n"
+"\t\t        (~S ollidescay atway ~S ithway ~S)~%"
 
 #: src/code/class.lisp
 msgid "Can't use anonymous or undefined class as constant:~%  ~S"
-msgstr "Ancay't useway anonymousway orway undefinedway assclay asway onstantcay:~%  ~S"
+msgstr ""
+"Ancay't useway anonymousway orway undefinedway assclay asway onstantcay:~%  "
+"~S"
 
 #: src/code/class.lisp
 msgid "~:[<anonymous>~;~:*~S~]~@[ (~(~A~))~]"
@@ -1311,7 +1462,8 @@ msgid ""
 "Return the class with the specified Name.  If ERRORP is false, then NIL is\n"
 "   returned when no such class exists."
 msgstr ""
-"Eturnray ethay assclay ithway ethay ecifiedspay Amenay.  Ifway ERRORP isway alsefay, enthay NIL isway\n"
+"Eturnray ethay assclay ithway ethay ecifiedspay Amenay.  Ifway ERRORP isway "
+"alsefay, enthay NIL isway\n"
 "   eturnedray enwhay onay uchsay assclay existsway."
 
 #: src/code/class.lisp
@@ -1335,7 +1487,8 @@ msgid ""
 "Return the class of the supplied object, which may be any Lisp object, not\n"
 "   just a CLOS STANDARD-OBJECT."
 msgstr ""
-"Eturnray ethay assclay ofway ethay uppliedsay objectway, ichwhay aymay ebay anyway Isplay objectway, otnay\n"
+"Eturnray ethay assclay ofway ethay uppliedsay objectway, ichwhay aymay ebay "
+"anyway Isplay objectway, otnay\n"
 "   ustjay away CLOS STANDARD-OBJECT."
 
 #: src/code/class.lisp
@@ -1349,50 +1502,52 @@ msgstr "Ubclassingsay ealedsay assclay ~S; unsealingway itway."
 #: src/code/class.lisp
 msgid ""
 "Change in the inheritance structure of class ~S~%  ~\n"
-"		 between the ~A definition and the ~A definition."
+"\t\t between the ~A definition and the ~A definition."
 msgstr ""
 "Angechay inway ethay inheritanceway ucturestray ofway assclay ~S~%  ~\n"
-"		 etweenbay ethay ~Away efinitionday andway ethay ~Away efinitionday."
+"\t\t etweenbay ethay ~Away efinitionday andway ethay ~Away efinitionday."
 
 #: src/code/class.lisp
 msgid ""
 "Change in instance length of class ~S:~%  ~\n"
-"		   ~A length: ~D~%  ~\n"
-"		   ~A length: ~D"
+"\t\t   ~A length: ~D~%  ~\n"
+"\t\t   ~A length: ~D"
 msgstr ""
 "Angechay inway instanceway engthlay ofway assclay ~S:~%  ~\n"
-"		   ~Away engthlay: ~D~%  ~\n"
-"		   ~Away engthlay: ~D"
+"\t\t   ~Away engthlay: ~D~%  ~\n"
+"\t\t   ~Away engthlay: ~D"
 
 #: src/code/class.lisp
 msgid ""
 "In class ~S:~%  ~\n"
-"		    ~:(~A~) definition of superclass ~S incompatible with~%  ~\n"
-"		    ~A definition."
+"\t\t    ~:(~A~) definition of superclass ~S incompatible with~%  ~\n"
+"\t\t    ~A definition."
 msgstr ""
 "Inway assclay ~S:~%  ~\n"
-"		    ~:(~Away~) efinitionday ofway uperclasssay ~S incompatibleway ithway~%  ~\n"
-"		    ~Away efinitionday."
+"\t\t    ~:(~Away~) efinitionday ofway uperclasssay ~S incompatibleway ithway~"
+"%  ~\n"
+"\t\t    ~Away efinitionday."
 
 #: src/code/class.lisp
 msgid ""
 "Change in superclasses of class ~S:~%  ~\n"
-"		  ~A superclasses: ~S~%  ~\n"
-"		  ~A superclasses: ~S"
+"\t\t  ~A superclasses: ~S~%  ~\n"
+"\t\t  ~A superclasses: ~S"
 msgstr ""
 "Angechay inway uperclassessay ofway assclay ~S:~%  ~\n"
-"		  ~Away uperclassessay: ~S~%  ~\n"
-"		  ~Away uperclassessay: ~S"
+"\t\t  ~Away uperclassessay: ~S~%  ~\n"
+"\t\t  ~Away uperclassessay: ~S"
 
 #: src/code/class.lisp
 msgid ""
 "Loading a reference to class ~S when the compile~\n"
-"		       ~%  time definition was incompatible with the current ~\n"
-"		       one."
+"\t\t       ~%  time definition was incompatible with the current ~\n"
+"\t\t       one."
 msgstr ""
 "Oadinglay away eferenceray otay assclay ~S enwhay ethay ompilecay~\n"
-"		       ~%  imetay efinitionday asway incompatibleway ithway ethay urrentcay ~\n"
-"		       oneway."
+"\t\t       ~%  imetay efinitionday asway incompatibleway ithway ethay "
+"urrentcay ~\n"
+"\t\t       oneway."
 
 #: src/code/class.lisp
 msgid "Invalidate current definition."
@@ -1413,20 +1568,20 @@ msgstr "Ewnay efinitionday ofway ~S ustmay ebay oadedlay eventuallyway."
 #: src/code/class.lisp
 msgid ""
 "Any old ~S instances will be in a bad way.~@\n"
-"		      I hope you know what you're doing..."
+"\t\t      I hope you know what you're doing..."
 msgstr ""
 "Anyway oldway ~S instancesway illway ebay inway away adbay ayway.~@\n"
-"		      Iway opehay ouyay nowkay atwhay ouyay'eray oingday..."
+"\t\t      Iway opehay ouyay nowkay atwhay ouyay'eray oingday..."
 
 #: src/code/class.lisp
 msgid ""
 "Assuming the current definition of ~S is correct, and~@\n"
-"		      that the loaded code doesn't care about the ~\n"
-"		      incompatibility."
+"\t\t      that the loaded code doesn't care about the ~\n"
+"\t\t      incompatibility."
 msgstr ""
 "Assumingway ethay urrentcay efinitionday ofway ~S isway orrectcay, andway~@\n"
-"		      atthay ethay oadedlay odecay oesnday't arecay aboutway ethay ~\n"
-"		      incompatibilityway."
+"\t\t      atthay ethay oadedlay odecay oesnday't arecay aboutway ethay ~\n"
+"\t\t      incompatibilityway."
 
 #: src/code/class.lisp
 msgid "Topological sort failed due to constraint on ~S."
@@ -1447,13 +1602,16 @@ msgid ""
 "only\n"
 "   affects array types."
 msgstr ""
-"*Use-Implementation-Types* isway away emisay-ublicpay agflay ichwhay eterminesday owhay\n"
-"   estrictiveray eway areway inway eterminingday ypetay embershipmay.  Ifway wotay ypestay areway ethay\n"
-"   amesay inway ethay implementationway, enthay eway illway onsidercay emthay emthay ethay amesay "
-"enwhay\n"
-"   isthay witchsay isway onway.  Enwhay itway isway offway, eway ytray otay ebay asway estrictiveray asway ethay\n"
-"   anguagelay allowsway, allowingway usway otay etectday oremay errorsway.  Urrentlycay, isthay "
-"onlyway\n"
+"*Use-Implementation-Types* isway away emisay-ublicpay agflay ichwhay "
+"eterminesday owhay\n"
+"   estrictiveray eway areway inway eterminingday ypetay embershipmay.  Ifway "
+"wotay ypestay areway ethay\n"
+"   amesay inway ethay implementationway, enthay eway illway onsidercay "
+"emthay emthay ethay amesay enwhay\n"
+"   isthay witchsay isway onway.  Enwhay itway isway offway, eway ytray otay "
+"ebay asway estrictiveray asway ethay\n"
+"   anguagelay allowsway, allowingway usway otay etectday oremay errorsway.  "
+"Urrentlycay, isthay onlyway\n"
 "   affectsway arrayway ypestay."
 
 #: src/code/type.lisp
@@ -1477,7 +1635,8 @@ msgid ""
 "The maximum length of a union of integer types before we take a\n"
 "  short cut and return a simpler union."
 msgstr ""
-"Ethay aximummay engthlay ofway away unionway ofway integerway ypestay eforebay eway aketay away\n"
+"Ethay aximummay engthlay ofway away unionway ofway integerway ypestay "
+"eforebay eway aketay away\n"
 "  ortshay utcay andway eturnray away implersay unionway."
 
 #: src/code/type.lisp
@@ -1506,7 +1665,8 @@ msgstr "Adbay oatflay ormatfay: ~S."
 
 #: src/code/type.lisp
 msgid "Arrays can't have a negative number of dimensions: ~D."
-msgstr "Arraysway ancay't avehay away egativenay umbernay ofway imensionsday: ~D."
+msgstr ""
+"Arraysway ancay't avehay away egativenay umbernay ofway imensionsday: ~D."
 
 #: src/code/type.lisp
 msgid "Array type has too many dimensions: ~S."
@@ -1518,15 +1678,20 @@ msgstr "Adbay imensionday inway arrayway ypetay: ~S."
 
 #: src/code/type.lisp
 msgid "Array dimensions is not a list, integer or *:~%  ~S"
-msgstr "Arrayway imensionsday isway otnay away istlay, integerway orway *:~%  ~S"
+msgstr ""
+"Arrayway imensionsday isway otnay away istlay, integerway orway *:~%  ~S"
 
 #: src/code/type.lisp
 msgid "Type of characters that aren't base-char's.  None in CMU CL."
-msgstr "Ypetay ofway aracterschay atthay arenway't asebay-archay's.  Onenay inway CMU CL."
+msgstr ""
+"Ypetay ofway aracterschay atthay arenway't asebay-archay's.  Onenay inway "
+"CMU CL."
 
 #: src/code/type.lisp
 msgid "Type corresponding to the charaters required by the standard."
-msgstr "Ypetay orrespondingcay otay ethay araterschay equiredray ybay ethay tandardsay."
+msgstr ""
+"Ypetay orrespondingcay otay ethay araterschay equiredray ybay ethay "
+"tandardsay."
 
 #: src/code/type.lisp
 msgid "Type for any keyword symbol."
@@ -1570,7 +1735,8 @@ msgstr ""
 
 #: src/code/type.lisp
 msgid "Bound is not *, a ~A or a list of a ~A: ~S"
-msgstr "Oundbay isway otnay *, away ~Away orway away istlay ofway away ~Away: ~S"
+msgstr ""
+"Oundbay isway otnay *, away ~Away orway away istlay ofway away ~Away: ~S"
 
 #: src/compiler/generic/vm-type.lisp
 msgid "~S isn't an integer type?"
@@ -1578,7 +1744,9 @@ msgstr "~S isnway't anway integerway ypetay?"
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is an array-header-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway anway arrayway-eaderhay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway anway arrayway-eaderhay-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is an arrayp and NIL otherwise."
@@ -1590,7 +1758,8 @@ msgstr "Eturnray T ifway OBJECT isway anway atomway andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a base-char-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away asebay-archay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away asebay-archay-p andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a bignump and NIL otherwise."
@@ -1598,15 +1767,19 @@ msgstr "Eturnray T ifway OBJECT isway away ignumpbay andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a bit-vector-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away itbay-ectorvay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away itbay-ectorvay-p andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a characterp and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away aracterpchay andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away aracterpchay andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a code-component-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away odecay-omponentcay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away odecay-omponentcay-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a consp and NIL otherwise."
@@ -1614,7 +1787,9 @@ msgstr "Eturnray T ifway OBJECT isway away onspcay andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a compiled-function-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away ompiledcay-unctionfay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away ompiledcay-unctionfay-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a complexp and NIL otherwise."
@@ -1622,33 +1797,46 @@ msgstr "Eturnray T ifway OBJECT isway away omplexpcay andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a complex-double-float-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away omplexcay-oubleday-oatflay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away omplexcay-oubleday-oatflay-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a complex-float-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away omplexcay-oatflay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away omplexcay-oatflay-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid ""
 "Return T if OBJECT is a complex-double-double-float-p and NIL otherwise."
 msgstr ""
-"Eturnray T ifway OBJECT isway away omplexcay-oubleday-oubleday-oatflay-p andway NIL otherwiseway."
+"Eturnray T ifway OBJECT isway away omplexcay-oubleday-oubleday-oatflay-p "
+"andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a complex-rational-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away omplexcay-ationalray-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away omplexcay-ationalray-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a complex-single-float-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away omplexcay-inglesay-oatflay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away omplexcay-inglesay-oatflay-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a double-double-float-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away oubleday-oubleday-oatflay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away oubleday-oubleday-oatflay-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a double-float-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away oubleday-oatflay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away oubleday-oatflay-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a fdefn-p and NIL otherwise."
@@ -1664,11 +1852,13 @@ msgstr "Eturnray T ifway OBJECT isway away oatpflay andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a functionp and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away unctionpfay andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away unctionpfay andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is an integerp and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway anway integerpway andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway anway integerpway andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a listp and NIL otherwise."
@@ -1676,7 +1866,8 @@ msgstr "Eturnray T ifway OBJECT isway away istplay andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a long-float-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away onglay-oatflay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away onglay-oatflay-p andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a lra-p and NIL otherwise."
@@ -1696,7 +1887,8 @@ msgstr "Eturnray T ifway OBJECT isway away umberpnay andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a rationalp and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away ationalpray andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away ationalpray andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a ratiop and NIL otherwise."
@@ -1708,31 +1900,44 @@ msgstr "Eturnray T ifway OBJECT isway away ealpray andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a scavenger-hook-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away avengerscay-ookhay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away avengerscay-ookhay-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a short-float-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away ortshay-oatflay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away ortshay-oatflay-p andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a simple-array-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away implesay-arrayway-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away implesay-arrayway-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a simple-bit-vector-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away implesay-itbay-ectorvay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away implesay-itbay-ectorvay-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a simple-string-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away implesay-ingstray-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away implesay-ingstray-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a simple-vector-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away implesay-ectorvay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away implesay-ectorvay-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a single-float-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away inglesay-oatflay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away inglesay-oatflay-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a stringp and NIL otherwise."
@@ -1740,7 +1945,8 @@ msgstr "Eturnray T ifway OBJECT isway away ingpstray andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a %instancep and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away %instancepway andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away %instancepway andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a symbolp and NIL otherwise."
@@ -1748,11 +1954,15 @@ msgstr "Eturnray T ifway OBJECT isway away ymbolpsay andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a system-area-pointer-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away ystemsay-areaway-ointerpay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away ystemsay-areaway-ointerpay-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a weak-pointer-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away eakway-ointerpay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away eakway-ointerpay-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a vectorp and NIL otherwise."
@@ -1760,105 +1970,120 @@ msgstr "Eturnray T ifway OBJECT isway away ectorpvay andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is an unsigned-byte-32-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway anway unsignedway-ytebay-32-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway anway unsignedway-ytebay-32-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a signed-byte-32-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away ignedsay-ytebay-32-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away ignedsay-ytebay-32-p andway NIL "
+"otherwiseway."
 
 #: src/code/pred.lisp
 msgid ""
 "Return T if OBJECT is a simple-array-unsigned-byte-2-p and NIL otherwise."
 msgstr ""
-"Eturnray T ifway OBJECT isway away implesay-arrayway-unsignedway-ytebay-2-p andway NIL otherwiseway."
+"Eturnray T ifway OBJECT isway away implesay-arrayway-unsignedway-ytebay-2-p "
+"andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid ""
 "Return T if OBJECT is a simple-array-unsigned-byte-4-p and NIL otherwise."
 msgstr ""
-"Eturnray T ifway OBJECT isway away implesay-arrayway-unsignedway-ytebay-4-p andway NIL otherwiseway."
+"Eturnray T ifway OBJECT isway away implesay-arrayway-unsignedway-ytebay-4-p "
+"andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid ""
 "Return T if OBJECT is a simple-array-unsigned-byte-8-p and NIL otherwise."
 msgstr ""
-"Eturnray T ifway OBJECT isway away implesay-arrayway-unsignedway-ytebay-8-p andway NIL otherwiseway."
+"Eturnray T ifway OBJECT isway away implesay-arrayway-unsignedway-ytebay-8-p "
+"andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid ""
 "Return T if OBJECT is a simple-array-unsigned-byte-16-p and NIL otherwise."
 msgstr ""
-"Eturnray T ifway OBJECT isway away implesay-arrayway-unsignedway-ytebay-16-p andway NIL otherwiseway."
+"Eturnray T ifway OBJECT isway away implesay-arrayway-unsignedway-ytebay-16-p "
+"andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid ""
 "Return T if OBJECT is a simple-array-unsigned-byte-32-p and NIL otherwise."
 msgstr ""
-"Eturnray T ifway OBJECT isway away implesay-arrayway-unsignedway-ytebay-32-p andway NIL otherwiseway."
+"Eturnray T ifway OBJECT isway away implesay-arrayway-unsignedway-ytebay-32-p "
+"andway NIL otherwiseway."
 
 #: src/code/pred.lisp
-msgid ""
-"Return T if OBJECT is a simple-array-signed-byte-8-p and NIL otherwise."
+msgid "Return T if OBJECT is a simple-array-signed-byte-8-p and NIL otherwise."
 msgstr ""
-"Eturnray T ifway OBJECT isway away implesay-arrayway-ignedsay-ytebay-8-p andway NIL otherwiseway."
+"Eturnray T ifway OBJECT isway away implesay-arrayway-ignedsay-ytebay-8-p "
+"andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid ""
 "Return T if OBJECT is a simple-array-signed-byte-16-p and NIL otherwise."
 msgstr ""
-"Eturnray T ifway OBJECT isway away implesay-arrayway-ignedsay-ytebay-16-p andway NIL otherwiseway."
+"Eturnray T ifway OBJECT isway away implesay-arrayway-ignedsay-ytebay-16-p "
+"andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid ""
 "Return T if OBJECT is a simple-array-signed-byte-30-p and NIL otherwise."
 msgstr ""
-"Eturnray T ifway OBJECT isway away implesay-arrayway-ignedsay-ytebay-30-p andway NIL otherwiseway."
+"Eturnray T ifway OBJECT isway away implesay-arrayway-ignedsay-ytebay-30-p "
+"andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid ""
 "Return T if OBJECT is a simple-array-signed-byte-32-p and NIL otherwise."
 msgstr ""
-"Eturnray T ifway OBJECT isway away implesay-arrayway-ignedsay-ytebay-32-p andway NIL otherwiseway."
+"Eturnray T ifway OBJECT isway away implesay-arrayway-ignedsay-ytebay-32-p "
+"andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a simple-array-single-float-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away implesay-arrayway-inglesay-oatflay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away implesay-arrayway-inglesay-oatflay-p "
+"andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return T if OBJECT is a simple-array-double-float-p and NIL otherwise."
-msgstr "Eturnray T ifway OBJECT isway away implesay-arrayway-oubleday-oatflay-p andway NIL otherwiseway."
+msgstr ""
+"Eturnray T ifway OBJECT isway away implesay-arrayway-oubleday-oatflay-p "
+"andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid ""
-"Return T if OBJECT is a simple-array-double-double-float-p and NIL otherwise"
-"."
+"Return T if OBJECT is a simple-array-double-double-float-p and NIL otherwise."
 msgstr ""
-"Eturnray T ifway OBJECT isway away implesay-arrayway-oubleday-oubleday-oatflay-p andway NIL otherwiseway"
-"."
+"Eturnray T ifway OBJECT isway away implesay-arrayway-oubleday-oubleday-"
+"oatflay-p andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid ""
-"Return T if OBJECT is a simple-array-complex-single-float-p and NIL otherwis"
-"e."
+"Return T if OBJECT is a simple-array-complex-single-float-p and NIL "
+"otherwise."
 msgstr ""
-"Eturnray T ifway OBJECT isway away implesay-arrayway-omplexcay-inglesay-oatflay-p andway NIL otherwisway"
-"e."
+"Eturnray T ifway OBJECT isway away implesay-arrayway-omplexcay-inglesay-"
+"oatflay-p andway NIL otherwiswaye."
 
 #: src/code/pred.lisp
 msgid ""
-"Return T if OBJECT is a simple-array-complex-double-float-p and NIL otherwis"
-"e."
+"Return T if OBJECT is a simple-array-complex-double-float-p and NIL "
+"otherwise."
 msgstr ""
-"Eturnray T ifway OBJECT isway away implesay-arrayway-omplexcay-oubleday-oatflay-p andway NIL otherwisway"
-"e."
+"Eturnray T ifway OBJECT isway away implesay-arrayway-omplexcay-oubleday-"
+"oatflay-p andway NIL otherwiswaye."
 
 #: src/code/pred.lisp
 msgid ""
 "Return T if OBJECT is a simple-array-complex-double-double-float-p and NIL "
 "otherwise."
 msgstr ""
-"Eturnray T ifway OBJECT isway away implesay-arrayway-omplexcay-oubleday-oubleday-oatflay-p andway NIL "
-"otherwiseway."
+"Eturnray T ifway OBJECT isway away implesay-arrayway-omplexcay-oubleday-"
+"oubleday-oatflay-p andway NIL otherwiseway."
 
 #: src/code/pred.lisp
 msgid "Return the type of OBJECT."
@@ -1869,7 +2094,8 @@ msgid ""
 "Return the element type that will actually be used to implement an array\n"
 "   with the specifier :ELEMENT-TYPE Spec."
 msgstr ""
-"Eturnray ethay elementway ypetay atthay illway actuallyway ebay usedway otay implementway anway arrayway\n"
+"Eturnray ethay elementway ypetay atthay illway actuallyway ebay usedway otay "
+"implementway anway arrayway\n"
 "   ithway ethay ecifierspay :ELEMENT-TYPE Ecspay."
 
 #: src/code/pred.lisp
@@ -1879,9 +2105,11 @@ msgid ""
 "  NIL and T: type1 definitely is not a subtype of type2.\n"
 "  NIL and NIL: who knows?"
 msgstr ""
-"Eturnray wotay aluesvay indicatingway ethay elationshipray etweenbay ypetay1 andway ypetay2:\n"
+"Eturnray wotay aluesvay indicatingway ethay elationshipray etweenbay ypetay1 "
+"andway ypetay2:\n"
 "  T andway T: ypetay1 efinitelyday isway away ubtypesay ofway ypetay2.\n"
-"  NIL andway T: ypetay1 efinitelyday isway otnay away ubtypesay ofway ypetay2.\n"
+"  NIL andway T: ypetay1 efinitelyday isway otnay away ubtypesay ofway "
+"ypetay2.\n"
 "  NIL andway NIL: owhay nowskay?"
 
 #: src/code/pred.lisp
@@ -1902,7 +2130,8 @@ msgstr "Invalidway ypetay ecifierspay: ~S"
 
 #: src/code/pred.lisp
 msgid "Function types are not a legal argument to TYPEP:~%  ~S"
-msgstr "Unctionfay ypestay areway otnay away egallay argumentway otay TYPEP:~%  ~S"
+msgstr ""
+"Unctionfay ypestay areway otnay away egallay argumentway otay TYPEP:~%  ~S"
 
 #: src/code/pred.lisp
 msgid "Class has not yet been defined: ~S"
@@ -1918,7 +2147,9 @@ msgstr "Assclay isway urrentlycay invalidway: ~S"
 
 #: src/code/pred.lisp
 msgid "Return T if OBJ1 and OBJ2 are the same object, otherwise NIL."
-msgstr "Eturnray T ifway OBJ1 andway OBJ2 areway ethay amesay objectway, otherwiseway NIL."
+msgstr ""
+"Eturnray T ifway OBJ1 andway OBJ2 areway ethay amesay objectway, "
+"otherwiseway NIL."
 
 #: src/code/pred.lisp
 msgid ""
@@ -1927,9 +2158,12 @@ msgid ""
 "  are the same length and have indentical components.  Other arrays must be\n"
 "  EQ to be EQUAL."
 msgstr ""
-"Eturnsray T ifway X andway Y areway EQL orway ifway eythay areway ucturedstray omponentscay\n"
-"  osewhay elementsway areway EQUAL.  Ingsstray andway itbay-ectorsvay areway EQUAL ifway eythay\n"
-"  areway ethay amesay engthlay andway avehay indenticalway omponentscay.  Otherway arraysway ustmay ebay\n"
+"Eturnsray T ifway X andway Y areway EQL orway ifway eythay areway "
+"ucturedstray omponentscay\n"
+"  osewhay elementsway areway EQUAL.  Ingsstray andway itbay-ectorsvay areway "
+"EQUAL ifway eythay\n"
+"  areway ethay amesay engthlay andway avehay indenticalway omponentscay.  "
+"Otherway arraysway ustmay ebay\n"
 "  EQ otay ebay EQUAL."
 
 #: src/code/pred.lisp
@@ -1941,9 +2175,12 @@ msgid ""
 "  in their type restriction."
 msgstr ""
 "Ustjay ikelay EQUAL, utbay oremay iberallay inway everalsay espectsray.\n"
-"  Umbersnay aymay ebay ofway ifferentday ypestay, asway onglay asway ethay aluesvay areway identicalway\n"
-"  afterway oercioncay.  Aracterschay aymay ifferday inway alphabeticway asecay.  Ectorsvay andway\n"
-"  arraysway ustmay avehay identicalway imensionsday andway EQUALP elementsway, utbay aymay ifferday\n"
+"  Umbersnay aymay ebay ofway ifferentday ypestay, asway onglay asway ethay "
+"aluesvay areway identicalway\n"
+"  afterway oercioncay.  Aracterschay aymay ifferday inway alphabeticway "
+"asecay.  Ectorsvay andway\n"
+"  arraysway ustmay avehay identicalway imensionsday andway EQUALP "
+"elementsway, utbay aymay ifferday\n"
 "  inway eirthay ypetay estrictionray."
 
 #: src/code/alieneval.lisp
@@ -1959,7 +2196,8 @@ msgid ""
 "Parse the list structure TYPE as an alien type specifier and return\n"
 "   the resultant alien-type structure."
 msgstr ""
-"Arsepay ethay istlay ucturestray TYPE asway anway alienway ypetay ecifierspay andway eturnray\n"
+"Arsepay ethay istlay ucturestray TYPE asway anway alienway ypetay "
+"ecifierspay andway eturnray\n"
 "   ethay esultantray alienway-ypetay ucturestray."
 
 #: src/code/alieneval.lisp
@@ -1987,7 +2225,8 @@ msgid ""
 "Convert the alien-type structure TYPE back into a list specification of\n"
 "   the type."
 msgstr ""
-"Onvertcay ethay alienway-ypetay ucturestray TYPE ackbay intoway away istlay ecificationspay ofway\n"
+"Onvertcay ethay alienway-ypetay ucturestray TYPE ackbay intoway away istlay "
+"ecificationspay ofway\n"
 "   ethay ypetay."
 
 #: src/code/alieneval.lisp
@@ -2000,8 +2239,10 @@ msgid ""
 "   STRUCT and UNION types, in which case the name is taken from the type\n"
 "   specifier."
 msgstr ""
-"Efineday ethay alienway ypetay NAME otay ebay equivalentway otay TYPE.  Amenay aymay ebay NIL orfay\n"
-"   STRUCT andway UNION ypestay, inway ichwhay asecay ethay amenay isway akentay omfray ethay ypetay\n"
+"Efineday ethay alienway ypetay NAME otay ebay equivalentway otay TYPE.  "
+"Amenay aymay ebay NIL orfay\n"
+"   STRUCT andway UNION ypestay, inway ichwhay asecay ethay amenay isway "
+"akentay omfray ethay ypetay\n"
 "   ecifierspay."
 
 #: src/code/alieneval.lisp
@@ -2018,7 +2259,9 @@ msgstr "Edefiningray ~S otay ebay:~%  ~S,~%asway~%  ~S"
 
 #: src/code/alieneval.lisp
 msgid "Return T iff TYPE1 and TYPE2 describe equivalent alien types."
-msgstr "Eturnray T iffway TYPE1 andway TYPE2 escribeday equivalentway alienway ypestay."
+msgstr ""
+"Eturnray T iffway TYPE1 andway TYPE2 escribeday equivalentway alienway "
+"ypestay."
 
 #: src/code/alieneval.lisp
 msgid ""
@@ -2028,10 +2271,14 @@ msgid ""
 "   (array <eltype> nil ...).  Otherwise, the two types have to be\n"
 "   ALIEN-TYPE-=."
 msgstr ""
-"Eturnray T iffway ethay alienway ypetay TYPE1 isway away ubtypesay ofway TYPE2.  Urrentlycay, ethay\n"
-"   onlyway upportedsay ubtypesay elationshipsray areway atthay anyway ointerpay ypetay isway away\n"
-"   ubtypesay ofway (* t), andway anyway arrayway ypetay's irstfay imensionday illway atchmay \n"
-"   (arrayway <eltypeway> ilnay ...).  Otherwiseway, ethay wotay ypestay avehay otay ebay\n"
+"Eturnray T iffway ethay alienway ypetay TYPE1 isway away ubtypesay ofway "
+"TYPE2.  Urrentlycay, ethay\n"
+"   onlyway upportedsay ubtypesay elationshipsray areway atthay anyway "
+"ointerpay ypetay isway away\n"
+"   ubtypesay ofway (* t), andway anyway arrayway ypetay's irstfay "
+"imensionday illway atchmay \n"
+"   (arrayway <eltypeway> ilnay ...).  Otherwiseway, ethay wotay ypestay "
+"avehay otay ebay\n"
 "   ALIEN-TYPE-=."
 
 #: src/code/alieneval.lisp
@@ -2044,7 +2291,9 @@ msgstr "Annotcay epresentray ~S ypedtay aliensway."
 
 #: src/code/alieneval.lisp
 msgid "Cannot pass aliens of type ~S as arguments to call-out"
-msgstr "Annotcay asspay aliensway ofway ypetay ~S asway argumentsway otay allcay-outway"
+msgstr ""
+"Annotcay asspay aliensway ofway ypetay ~S asway argumentsway otay allcay-"
+"outway"
 
 #: src/code/alieneval.lisp
 msgid "Cannot return aliens of type ~S from call-out"
@@ -2096,7 +2345,8 @@ msgstr "Annotcay epositday aliensway ofway ypetay ~S (unknownway izesay)."
 
 #: src/code/alieneval.lisp
 msgid "First dimension is not a non-negative fixnum or NIL: ~S"
-msgstr "Irstfay imensionday isway otnay away onnay-egativenay ixnumfay orway NIL: ~S"
+msgstr ""
+"Irstfay imensionday isway otnay away onnay-egativenay ixnumfay orway NIL: ~S"
 
 #: src/code/alieneval.lisp
 msgid "Dimension is not a non-negative fixnum: ~S"
@@ -2105,9 +2355,10 @@ msgstr "Imensionday isway otnay away onnay-egativenay ixnumfay: ~S"
 #: src/pcl/env.lisp src/pcl/fixup.lisp src/pcl/methods.lisp src/pcl/cpl.lisp
 #: src/pcl/seal.lisp src/pcl/dfun.lisp
 #: src/pcl/method-slot-access-optimization.lisp src/pcl/boot.lisp
-#: src/pcl/dlisp.lisp src/pcl/cache.lisp src/pcl/defclass.lisp src/pcl/low.lisp
-#: src/compiler/disassem.lisp src/code/pathname.lisp src/code/pprint-loop.lisp
-#: src/code/pprint.lisp src/code/bignum.lisp src/code/alieneval.lisp
+#: src/pcl/dlisp.lisp src/pcl/cache.lisp src/pcl/defclass.lisp
+#: src/pcl/low.lisp src/compiler/disassem.lisp src/code/pathname.lisp
+#: src/code/pprint-loop.lisp src/code/pprint.lisp src/code/bignum.lisp
+#: src/code/alieneval.lisp
 msgid "Required argument missing"
 msgstr "Equiredray argumentway issingmay"
 
@@ -2121,7 +2372,9 @@ msgstr "Unknownway alignmentway: ~S"
 
 #: src/code/alieneval.lisp
 msgid "A hash table used to detect cycles while comparing record types."
-msgstr "Away ashhay abletay usedway otay etectday yclescay ilewhay omparingcay ecordray ypestay."
+msgstr ""
+"Away ashhay abletay usedway otay etectday yclescay ilewhay omparingcay "
+"ecordray ypestay."
 
 #: src/code/alieneval.lisp
 msgid ""
@@ -2148,11 +2401,12 @@ msgid ""
 "guessed\n"
 "   from the one supplied."
 msgstr ""
-"Efineday NAME asway anway externalway alienway ariablevay ofway ypetay TYPE.  NAME ouldshay ebay\n"
-"   away istlay ofway away ingstray oldinghay ethay alienway amenay andway away ymbolsay otay useway asway ethay "
-"Isplay\n"
-"   amenay.  Ifway NAME isway ustjay away ymbolsay orway ingstray, enthay ethay otherway amenay isway "
-"uessedgay\n"
+"Efineday NAME asway anway externalway alienway ariablevay ofway ypetay "
+"TYPE.  NAME ouldshay ebay\n"
+"   away istlay ofway away ingstray oldinghay ethay alienway amenay andway "
+"away ymbolsay otay useway asway ethay Isplay\n"
+"   amenay.  Ifway NAME isway ustjay away ymbolsay orway ingstray, enthay "
+"ethay otherway amenay isway uessedgay\n"
 "   omfray ethay oneway uppliedsay."
 
 #: src/code/alieneval.lisp
@@ -2160,7 +2414,8 @@ msgid ""
 "Access the alien variable named NAME, assuming it is of type TYPE.  This\n"
 "   is SETFable."
 msgstr ""
-"Accessway ethay alienway ariablevay amednay NAME, assumingway itway isway ofway ypetay TYPE.  Isthay\n"
+"Accessway ethay alienway ariablevay amednay NAME, assumingway itway isway "
+"ofway ypetay TYPE.  Isthay\n"
 "   isway Etfablesay."
 
 #: src/code/alieneval.lisp
@@ -2180,33 +2435,38 @@ msgid ""
 "       No alien is allocated, but VAR is established as a local name for\n"
 "       the external alien given by EXTERNAL-NAME."
 msgstr ""
-"Establishway omesay ocallay alienway ariablesvay.  Eachway BINDING isway ofway ethay ormfay:\n"
+"Establishway omesay ocallay alienway ariablesvay.  Eachway BINDING isway "
+"ofway ethay ormfay:\n"
 "     VAR TYPE [ ALLOCATION ] [ INITIAL-VALUE | EXTERNAL-NAME ]\n"
 "   ALLOCATION ouldshay ebay oneway ofway:\n"
 "     :LOCAL (ethay efaultday)\n"
-"       Ethay alienway isway allocatedway onway ethay tacksay, andway ashay ynamicday extentway.\n"
+"       Ethay alienway isway allocatedway onway ethay tacksay, andway ashay "
+"ynamicday extentway.\n"
 "     :STATIC\n"
-"       Ethay alienway isway allocatedway onway ethay eaphay, andway ashay infinateway extentway.  Ethay "
-"alienway\n"
-"       isway allocatedway atway oadlay imetay, osay ethay amesay iecepay ofway emorymay isway usedway eachway "
-"imetay\n"
+"       Ethay alienway isway allocatedway onway ethay eaphay, andway ashay "
+"infinateway extentway.  Ethay alienway\n"
+"       isway allocatedway atway oadlay imetay, osay ethay amesay iecepay "
+"ofway emorymay isway usedway eachway imetay\n"
 "       isthay ormfay executesway.\n"
 "     :EXTERN\n"
-"       Onay alienway isway allocatedway, utbay VAR isway establishedway asway away ocallay amenay orfay\n"
+"       Onay alienway isway allocatedway, utbay VAR isway establishedway "
+"asway away ocallay amenay orfay\n"
 "       ethay externalway alienway ivengay ybay EXTERNAL-NAME."
 
 #: src/code/alieneval.lisp
 msgid ""
 "Return true if X (which must be an Alien pointer) is null, false otherwise."
 msgstr ""
-"Eturnray uetray ifway X (ichwhay ustmay ebay anway Alienway ointerpay) isway ullnay, alsefay otherwiseway."
+"Eturnray uetray ifway X (ichwhay ustmay ebay anway Alienway ointerpay) isway "
+"ullnay, alsefay otherwiseway."
 
 #: src/code/alieneval.lisp
 msgid ""
 "Convert the System-Area-Pointer SAP to an Alien of the specified Type (not\n"
 "   evaluated.)  Type must be pointer-like."
 msgstr ""
-"Onvertcay ethay Ystemsay-Areaway-Ointerpay SAP otay anway Alienway ofway ethay ecifiedspay Ypetay (otnay\n"
+"Onvertcay ethay Ystemsay-Areaway-Ointerpay SAP otay anway Alienway ofway "
+"ethay ecifiedspay Ypetay (otnay\n"
 "   evaluatedway.)  Ypetay ustmay ebay ointerpay-ikelay."
 
 #: src/code/alieneval.lisp
@@ -2215,7 +2475,8 @@ msgstr "Annotcay akemay aliensway ofway ypetay ~S outway ofway Apssay"
 
 #: src/code/alieneval.lisp
 msgid "Return a System-Area-Pointer pointing to Alien's data."
-msgstr "Eturnray away Ystemsay-Areaway-Ointerpay ointingpay otay Alienway's ataday."
+msgstr ""
+"Eturnray away Ystemsay-Areaway-Ointerpay ointingpay otay Alienway's ataday."
 
 #: src/code/alieneval.lisp
 msgid ""
@@ -2227,12 +2488,16 @@ msgid ""
 "   memory is allocated using ``malloc'', so it can be passed to foreign\n"
 "   functions which use ``free''."
 msgstr ""
-"Allocateway anway alienway ofway ypetay TYPE andway eturnray anway alienway ointerpay otay itway.  Ifway SIZE\n"
-"   isway uppliedsay, owhay itway isway interpretedway ependsday onway TYPE.  Ifway TYPE isway anway arrayway\n"
-"   ypetay, SIZE isway usedway asway ethay irstfay imensionday orfay ethay allocatedway arrayway.  Ifway "
-"TYPE\n"
-"   isway otnay anway arrayway, enthay SIZE isway ethay umbernay ofway elementsway otay allocateway.  Ethay\n"
-"   emorymay isway allocatedway usingway ``allocmay'', osay itway ancay ebay assedpay otay oreignfay\n"
+"Allocateway anway alienway ofway ypetay TYPE andway eturnray anway alienway "
+"ointerpay otay itway.  Ifway SIZE\n"
+"   isway uppliedsay, owhay itway isway interpretedway ependsday onway TYPE.  "
+"Ifway TYPE isway anway arrayway\n"
+"   ypetay, SIZE isway usedway asway ethay irstfay imensionday orfay ethay "
+"allocatedway arrayway.  Ifway TYPE\n"
+"   isway otnay anway arrayway, enthay SIZE isway ethay umbernay ofway "
+"elementsway otay allocateway.  Ethay\n"
+"   emorymay isway allocatedway usingway ``allocmay'', osay itway ancay ebay "
+"assedpay otay oreignfay\n"
 "   unctionsfay ichwhay useway ``eefray''."
 
 #: src/code/alieneval.lisp
@@ -2245,14 +2510,16 @@ msgstr "Alignmentway ofway ~S unknownway."
 
 #: src/code/alieneval.lisp
 msgid "Cannot override the size of zero-dimensional arrays."
-msgstr "Annotcay overrideway ethay izesay ofway erozay-imensionalday arraysway."
+msgstr ""
+"Annotcay overrideway ethay izesay ofway erozay-imensionalday arraysway."
 
 #: src/code/alieneval.lisp
 msgid ""
 "Dispose of the storage pointed to by ALIEN.  ALIEN must have been allocated\n"
 "   by MAKE-ALIEN or ``malloc''."
 msgstr ""
-"Isposeday ofway ethay toragesay ointedpay otay ybay ALIEN.  ALIEN ustmay avehay eenbay allocatedway\n"
+"Isposeday ofway ethay toragesay ointedpay otay ybay ALIEN.  ALIEN ustmay "
+"avehay eenbay allocatedway\n"
 "   ybay MAKE-ALIEN orway ``allocmay''."
 
 #: src/code/alieneval.lisp
@@ -2263,7 +2530,8 @@ msgstr "Onay otslay amednay ~S inway ~S"
 msgid ""
 "Extract SLOT from the Alien STRUCT or UNION ALIEN.  May be set with SETF."
 msgstr ""
-"Extractway SLOT omfray ethay Alienway STRUCT orway UNION ALIEN.  Aymay ebay etsay ithway SETF."
+"Extractway SLOT omfray ethay Alienway STRUCT orway UNION ALIEN.  Aymay ebay "
+"etsay ithway SETF."
 
 #: src/code/alieneval.lisp
 msgid "Too many indices when derefing ~S: ~D"
@@ -2280,10 +2548,12 @@ msgid ""
 "can\n"
 "   optionally be specified, giving the equivalent of C pointer arithmetic."
 msgstr ""
-"Eday-eferenceray anway Alienway ointerpay orway arrayway.  Ifway anway arrayway, ethay indicesway areway usedway\n"
-"   asway ethay indicesway ofway ethay arrayway elementway otay accessway.  Ifway away ointerpay, oneway indexway "
-"ancay\n"
-"   optionallyway ebay ecifiedspay, ivinggay ethay equivalentway ofway C ointerpay arithmeticway."
+"Eday-eferenceray anway Alienway ointerpay orway arrayway.  Ifway anway "
+"arrayway, ethay indicesway areway usedway\n"
+"   asway ethay indicesway ofway ethay arrayway elementway otay accessway.  "
+"Ifway away ointerpay, oneway indexway ancay\n"
+"   optionallyway ebay ecifiedspay, ivinggay ethay equivalentway ofway C "
+"ointerpay arithmeticway."
 
 #: src/code/alieneval.lisp
 msgid "Something is wrong; local-alien-info not found: ~S"
@@ -2298,8 +2568,10 @@ msgid ""
 "Return an Alien pointer to the data addressed by Expr, which must be a call\n"
 "   to SLOT or DEREF, or a reference to an Alien variable."
 msgstr ""
-"Eturnray anway Alienway ointerpay otay ethay ataday addressedway ybay Exprway, ichwhay ustmay ebay away allcay\n"
-"   otay SLOT orway DEREF, orway away eferenceray otay anway Alienway ariablevay."
+"Eturnray anway Alienway ointerpay otay ethay ataday addressedway ybay "
+"Exprway, ichwhay ustmay ebay away allcay\n"
+"   otay SLOT orway DEREF, orway away eferenceray otay anway Alienway "
+"ariablevay."
 
 #: src/code/alieneval.lisp
 msgid "~S is not a valid L-value"
@@ -2315,8 +2587,8 @@ msgid ""
 "types\n"
 "   must be Alien array, pointer or function types."
 msgstr ""
-"Onvertcay ALIEN otay anway Alienway ofway ethay ecifiedspay TYPE (otnay evaluatedway).  Othbay "
-"ypestay\n"
+"Onvertcay ALIEN otay anway Alienway ofway ethay ecifiedspay TYPE (otnay "
+"evaluatedway).  Othbay ypestay\n"
 "   ustmay ebay Alienway arrayway, ointerpay orway unctionfay ypestay."
 
 #: src/code/alieneval.lisp
@@ -2332,7 +2604,8 @@ msgid ""
 "Return the size of the alien type TYPE.  UNITS specifies the units to\n"
 "   use and can be either :BITS, :BYTES, or :WORDS."
 msgstr ""
-"Eturnray ethay izesay ofway ethay alienway ypetay TYPE.  UNITS ecifiesspay ethay unitsway otay\n"
+"Eturnray ethay izesay ofway ethay alienway ypetay TYPE.  UNITS ecifiesspay "
+"ethay unitsway otay\n"
 "   useway andway ancay ebay eitherway :BITS, :BYTES, orway :WORDS."
 
 #: src/code/alieneval.lisp
@@ -2344,12 +2617,14 @@ msgid ""
 "Call the foreign function ALIEN with the specified arguments.  ALIEN's\n"
 "   type specifies the argument and result types."
 msgstr ""
-"Allcay ethay oreignfay unctionfay ALIEN ithway ethay ecifiedspay argumentsway.  ALIEN's\n"
+"Allcay ethay oreignfay unctionfay ALIEN ithway ethay ecifiedspay "
+"argumentsway.  ALIEN's\n"
 "   ypetay ecifiesspay ethay argumentway andway esultray ypestay."
 
 #: src/code/alieneval.lisp
 msgid "Wrong number of arguments for ~S~%Expected ~D, got ~D."
-msgstr "Ongwray umbernay ofway argumentsway orfay ~S~%Expectedway ~D, otgay ~D."
+msgstr ""
+"Ongwray umbernay ofway argumentsway orfay ~S~%Expectedway ~D, otgay ~D."
 
 #: src/code/alieneval.lisp
 msgid "~S is not an alien function."
@@ -2398,52 +2673,60 @@ msgid ""
 "        A combination of :OUT and :COPY.  A pointer to the argument is "
 "passed,\n"
 "        with the object being initialized from the supplied argument and\n"
-"        the return value being determined by accessing the object on "
-"return."
+"        the return value being determined by accessing the object on return."
 msgstr ""
 "Efday-Alienway-Outineray Amenay Esultray-Ypetay\n"
 "                    {(Argway-Amenay Argway-Ypetay [Tylesay])}*\n"
 "\n"
-"  Efineday away oreignfay interfaceway unctionfay orfay ethay outineray ithway ethay ecifiedspay "
-"Amenay,\n"
-"  ichwhay aymay ebay eitherway away ingstray, ymbolsay orway istlay ofway ethay ormfay (ingstray ymbolsay).\n"
-"  Eturnray-Ypetay isway ethay Alienway ypetay orfay ethay unctionfay eturnray aluevay.  VOID aymay ebay\n"
+"  Efineday away oreignfay interfaceway unctionfay orfay ethay outineray "
+"ithway ethay ecifiedspay Amenay,\n"
+"  ichwhay aymay ebay eitherway away ingstray, ymbolsay orway istlay ofway "
+"ethay ormfay (ingstray ymbolsay).\n"
+"  Eturnray-Ypetay isway ethay Alienway ypetay orfay ethay unctionfay "
+"eturnray aluevay.  VOID aymay ebay\n"
 "  usedway otay ecifyspay away unctionfay ithway onay esultray.\n"
 "\n"
-"  Ethay emainingray ormsfay ecifyspay individualway argumentsway atthay areway assedpay otay ethay\n"
-"  outineray.  Argway-Amenay isway away ymbolsay atthay amesnay ethay argumentway, imarilypray orfay\n"
-"  ocumentationday.  Argway-Ypetay isway ethay C-Ypetay ofway ethay argumentway.  Tylesay ecifiesspay "
-"ethay\n"
+"  Ethay emainingray ormsfay ecifyspay individualway argumentsway atthay "
+"areway assedpay otay ethay\n"
+"  outineray.  Argway-Amenay isway away ymbolsay atthay amesnay ethay "
+"argumentway, imarilypray orfay\n"
+"  ocumentationday.  Argway-Ypetay isway ethay C-Ypetay ofway ethay "
+"argumentway.  Tylesay ecifiesspay ethay\n"
 "  ayway atthay ethay argumentway isway assedpay.\n"
 "\n"
 "  :IN\n"
-"        Anway :Inway argumentway isway implysay assedpay ybay aluevay.  Ethay aluevay otay ebay assedpay "
-"isway\n"
-"        obtainedway omfray argumentway(s) otay ethay interfaceway unctionfay.  Onay aluesvay areway\n"
-"        eturnedray orfay :Inway argumentsway.  Isthay isway ethay efaultday odemay.\n"
+"        Anway :Inway argumentway isway implysay assedpay ybay aluevay.  "
+"Ethay aluevay otay ebay assedpay isway\n"
+"        obtainedway omfray argumentway(s) otay ethay interfaceway "
+"unctionfay.  Onay aluesvay areway\n"
+"        eturnedray orfay :Inway argumentsway.  Isthay isway ethay efaultday "
+"odemay.\n"
 "\n"
 "  :OUT\n"
-"        Ethay ecifiedspay argumentway ypetay ustmay ebay away ointerpay otay away ixedfay izedsay "
-"objectway.\n"
-"        Away ointerpay otay away eallocatedpray objectway isway assedpay otay ethay outineray, andway "
-"ethay\n"
-"        ethay objectway isway accessedway onway eturnray, ithway ethay aluevay eingbay eturnedray "
-"omfray\n"
-"        ethay interfaceway unctionfay.  :OUT andway :IN-OUT annotcay ebay usedway ithway "
-"ointerspay\n"
+"        Ethay ecifiedspay argumentway ypetay ustmay ebay away ointerpay otay "
+"away ixedfay izedsay objectway.\n"
+"        Away ointerpay otay away eallocatedpray objectway isway assedpay "
+"otay ethay outineray, andway ethay\n"
+"        ethay objectway isway accessedway onway eturnray, ithway ethay "
+"aluevay eingbay eturnedray omfray\n"
+"        ethay interfaceway unctionfay.  :OUT andway :IN-OUT annotcay ebay "
+"usedway ithway ointerspay\n"
 "        otay arraysway, ecordsray orway unctionsfay.\n"
 "\n"
 "  :COPY\n"
-"        Imilarsay otay :IN, exceptway atthay ethay argumentway aluesvay areway toredsay inway onway\n"
-"        ethay tacksay, andway away ointerpay otay ethay objectway isway assedpay insteadway ofway\n"
+"        Imilarsay otay :IN, exceptway atthay ethay argumentway aluesvay "
+"areway toredsay inway onway\n"
+"        ethay tacksay, andway away ointerpay otay ethay objectway isway "
+"assedpay insteadway ofway\n"
 "        ethay aluesvay emselvesthay.\n"
 "\n"
 "  :IN-OUT\n"
-"        Away ombinationcay ofway :OUT andway :COPY.  Away ointerpay otay ethay argumentway isway "
-"assedpay,\n"
-"        ithway ethay objectway eingbay initializedway omfray ethay uppliedsay argumentway andway\n"
-"        ethay eturnray aluevay eingbay eterminedday ybay accessingway ethay objectway onway "
-"eturnray."
+"        Away ombinationcay ofway :OUT andway :COPY.  Away ointerpay otay "
+"ethay argumentway isway assedpay,\n"
+"        ithway ethay objectway eingbay initializedway omfray ethay "
+"uppliedsay argumentway andway\n"
+"        ethay eturnray aluevay eingbay eterminedday ybay accessingway ethay "
+"objectway onway eturnray."
 
 #: src/code/alieneval.lisp
 msgid "Bogus argument style ~S in ~S."
@@ -2451,7 +2734,9 @@ msgstr "Ogusbay argumentway tylesay ~S inway ~S."
 
 #: src/code/alieneval.lisp
 msgid "Can't use :out or :in-out on pointer-like type:~%  ~S"
-msgstr "Ancay't useway :outway orway :inway-outway onway ointerpay-ikelay ypetay:~%  ~S"
+msgstr ""
+"Ancay't useway :outway orway :inway-outway onway ointerpay-ikelay ypetay:~%  "
+"~S"
 
 #: src/code/alieneval.lisp
 msgid "Vector of all callbacks."
@@ -2466,7 +2751,9 @@ msgstr "~S isway otnay anway arrayway ithway away illfay-ointerpay."
 
 #: src/code/alieneval.lisp
 msgid "Unable to mprotect ~S bytes (~S) at ~S (~S).  Callbacks may not work."
-msgstr "Unableway otay protectmay ~S ytesbay (~S) atway ~S (~S).  Allbackscay aymay otnay orkway."
+msgstr ""
+"Unableway otay protectmay ~S ytesbay (~S) atway ~S (~S).  Allbackscay aymay "
+"otnay orkway."
 
 #: src/code/alieneval.lisp
 msgid "Return the trampoline pointer for the callback NAME."
@@ -2480,15 +2767,19 @@ msgid ""
 "    New type is: ~A"
 msgstr ""
 "~\n"
-"Attemptway otay edefineray allbackcay ithway incompatibleway eturnray ypetay.\n"
+"Attemptway otay edefineray allbackcay ithway incompatibleway eturnray "
+"ypetay.\n"
 "   Oldway ypetay asway: ~Away \n"
 "    Ewnay ypetay isway: ~Away"
 
 #: src/code/alieneval.lisp
-msgid "~\n"
+msgid ""
+"~\n"
 "Create new trampoline (old trampoline calls old lisp function)."
-msgstr "~\n"
-"Eatecray ewnay ampolinetray (oldway ampolinetray allscay oldway isplay unctionfay)."
+msgstr ""
+"~\n"
+"Eatecray ewnay ampolinetray (oldway ampolinetray allscay oldway isplay "
+"unctionfay)."
 
 #: src/code/alieneval.lisp
 msgid "Unsupported argument type: ~A"
@@ -2516,43 +2807,58 @@ msgstr ""
 "(efcallbackday NAME (RETURN-TYPE {(ARG-NAME ARG-TYPE)}*)\n"
 "     {ocday-ingstray} {eclsday}* {FORM}*)\n"
 "\n"
-"Efineday away unctionfay ichwhay ancay ebay alledcay ybay oreignfay odecay.  Ethay ointerpay\n"
-"eturnedray ybay (allbackcay NAME), enwhay alledcay ybay oreignfay odecay, invokesway ethay\n"
-"isplay unctionfay.  Ethay isplay unctionfay expectsway alienway argumentsway ofway ethay\n"
-"ecifiedspay ARG-Ypestay andway eturnsray anway alienway ofway ypetay RETURN-TYPE.\n"
-"\n"
-"Ifway (allbackcay NAME) isway alreadyway away allbackcay unctionfay ointerpay, itsway aluevay\n"
-"isway otnay angedchay (oughthay itway's arrangedway atthay anway updatedway ersionvay ofway ethay\n"
-"isplay allbackcay unctionfay illway ebay alledcay).  Isthay eaturefay allowsway orfay\n"
+"Efineday away unctionfay ichwhay ancay ebay alledcay ybay oreignfay odecay.  "
+"Ethay ointerpay\n"
+"eturnedray ybay (allbackcay NAME), enwhay alledcay ybay oreignfay odecay, "
+"invokesway ethay\n"
+"isplay unctionfay.  Ethay isplay unctionfay expectsway alienway argumentsway "
+"ofway ethay\n"
+"ecifiedspay ARG-Ypestay andway eturnsray anway alienway ofway ypetay RETURN-"
+"TYPE.\n"
+"\n"
+"Ifway (allbackcay NAME) isway alreadyway away allbackcay unctionfay "
+"ointerpay, itsway aluevay\n"
+"isway otnay angedchay (oughthay itway's arrangedway atthay anway updatedway "
+"ersionvay ofway ethay\n"
+"isplay allbackcay unctionfay illway ebay alledcay).  Isthay eaturefay "
+"allowsway orfay\n"
 "incrementalway edefinitionray ofway allbackcay unctionsfay."
 
 #: src/code/sap.lisp
 msgid "Return T iff the SAP X points to a smaller address then the SAP Y."
-msgstr "Eturnray T iffway ethay SAP X ointspay otay away mallersay addressway enthay ethay SAP Y."
+msgstr ""
+"Eturnray T iffway ethay SAP X ointspay otay away mallersay addressway enthay "
+"ethay SAP Y."
 
 #: src/code/sap.lisp
 msgid ""
 "Return T iff the SAP X points to a smaller or the same address as\n"
 "   the SAP Y."
 msgstr ""
-"Eturnray T iffway ethay SAP X ointspay otay away mallersay orway ethay amesay addressway asway\n"
+"Eturnray T iffway ethay SAP X ointspay otay away mallersay orway ethay "
+"amesay addressway asway\n"
 "   ethay SAP Y."
 
 #: src/code/sap.lisp
 msgid "Return T iff the SAP X points to the same address as the SAP Y."
-msgstr "Eturnray T iffway ethay SAP X ointspay otay ethay amesay addressway asway ethay SAP Y."
+msgstr ""
+"Eturnray T iffway ethay SAP X ointspay otay ethay amesay addressway asway "
+"ethay SAP Y."
 
 #: src/code/sap.lisp
 msgid ""
 "Return T iff the SAP X points to a larger or the same address as\n"
 "   the SAP Y."
 msgstr ""
-"Eturnray T iffway ethay SAP X ointspay otay away argerlay orway ethay amesay addressway asway\n"
+"Eturnray T iffway ethay SAP X ointspay otay away argerlay orway ethay amesay "
+"addressway asway\n"
 "   ethay SAP Y."
 
 #: src/code/sap.lisp
 msgid "Return T iff the SAP X points to a larger address then the SAP Y."
-msgstr "Eturnray T iffway ethay SAP X ointspay otay away argerlay addressway enthay ethay SAP Y."
+msgstr ""
+"Eturnray T iffway ethay SAP X ointspay otay away argerlay addressway enthay "
+"ethay SAP Y."
 
 #: src/code/sap.lisp
 msgid "Return a new sap OFFSET bytes from SAP."
@@ -2588,15 +2894,19 @@ msgstr "Eturnsray ethay 64-itbay adwordquay atway OFFSET ytesbay omfray SAP."
 
 #: src/code/sap.lisp
 msgid "Returns the 32-bit system-area-pointer at OFFSET bytes from SAP."
-msgstr "Eturnsray ethay 32-itbay ystemsay-areaway-ointerpay atway OFFSET ytesbay omfray SAP."
+msgstr ""
+"Eturnsray ethay 32-itbay ystemsay-areaway-ointerpay atway OFFSET ytesbay "
+"omfray SAP."
 
 #: src/code/sap.lisp
 msgid "Returns the 32-bit single-float at OFFSET bytes from SAP."
-msgstr "Eturnsray ethay 32-itbay inglesay-oatflay atway OFFSET ytesbay omfray SAP."
+msgstr ""
+"Eturnsray ethay 32-itbay inglesay-oatflay atway OFFSET ytesbay omfray SAP."
 
 #: src/code/sap.lisp
 msgid "Returns the 64-bit double-float at OFFSET bytes from SAP."
-msgstr "Eturnsray ethay 64-itbay oubleday-oatflay atway OFFSET ytesbay omfray SAP."
+msgstr ""
+"Eturnsray ethay 64-itbay oubleday-oatflay atway OFFSET ytesbay omfray SAP."
 
 #: src/code/sap.lisp
 msgid "Returns the long-float at OFFSET bytes from SAP."
@@ -2604,29 +2914,33 @@ msgstr "Eturnsray ethay onglay-oatflay atway OFFSET ytesbay omfray SAP."
 
 #: src/code/sap.lisp
 msgid "Returns the signed 8-bit byte at OFFSET bytes from SAP."
-msgstr "Eturnsray ethay ignedsay 8-itbay ytebay atway OFFSET ytesbay omfray SAP."
+msgstr ""
+"Eturnsray ethay ignedsay 8-itbay ytebay atway OFFSET ytesbay omfray SAP."
 
 #: src/code/sap.lisp
 msgid "Returns the signed 16-bit word at OFFSET bytes from SAP."
-msgstr "Eturnsray ethay ignedsay 16-itbay ordway atway OFFSET ytesbay omfray SAP."
+msgstr ""
+"Eturnsray ethay ignedsay 16-itbay ordway atway OFFSET ytesbay omfray SAP."
 
 #: src/code/sap.lisp
 msgid "Returns the signed 32-bit dualword at OFFSET bytes from SAP."
-msgstr "Eturnsray ethay ignedsay 32-itbay ualwordday atway OFFSET ytesbay omfray SAP."
+msgstr ""
+"Eturnsray ethay ignedsay 32-itbay ualwordday atway OFFSET ytesbay omfray SAP."
 
 #: src/code/sap.lisp
 msgid "Returns the signed 64-bit quadword at OFFSET bytes from SAP."
-msgstr "Eturnsray ethay ignedsay 64-itbay adwordquay atway OFFSET ytesbay omfray SAP."
+msgstr ""
+"Eturnsray ethay ignedsay 64-itbay adwordquay atway OFFSET ytesbay omfray SAP."
 
 #: src/code/bit-bash.lisp
 msgid "The number of bits to process at a time."
 msgstr "Ethay umbernay ofway itsbay otay ocesspray atway away imetay."
 
 #: src/code/bit-bash.lisp
-msgid ""
-"The maximum number of bits that can be dealt with during a single call."
+msgid "The maximum number of bits that can be dealt with during a single call."
 msgstr ""
-"Ethay aximummay umbernay ofway itsbay atthay ancay ebay ealtday ithway uringday away inglesay allcay."
+"Ethay aximummay umbernay ofway itsbay atthay ancay ebay ealtday ithway "
+"uringday away inglesay allcay."
 
 #: src/code/bit-bash.lisp
 msgid ""
@@ -2636,10 +2950,12 @@ msgid ""
 "bits\n"
 "  of count are significant."
 msgstr ""
-"Iftshay NUMBER ybay COUNT itsbay, addingway erozay itsbay atway ethay ``endway'' andway emovingray\n"
-"  itsbay omfray ethay ``tartsay.''  Onway igbay-endianway achinesmay isthay isway away eftlay-iftshay andway\n"
-"  onway ittlelay-endianway achinesmay isthay isway away ightray-iftshay.  Otenay: onlyway ethay owlay 5/6 "
-"itsbay\n"
+"Iftshay NUMBER ybay COUNT itsbay, addingway erozay itsbay atway ethay "
+"``endway'' andway emovingray\n"
+"  itsbay omfray ethay ``tartsay.''  Onway igbay-endianway achinesmay isthay "
+"isway away eftlay-iftshay andway\n"
+"  onway ittlelay-endianway achinesmay isthay isway away ightray-iftshay.  "
+"Otenay: onlyway ethay owlay 5/6 itsbay\n"
 "  ofway ountcay areway ignificantsay."
 
 #: src/code/bit-bash.lisp
@@ -2648,19 +2964,22 @@ msgid ""
 "  bits from the ``end.''  On big-endian machines this is a right-shift and\n"
 "  on little-endian machines this is a left-shift."
 msgstr ""
-"Iftshay NUMBER ybay COUNT itsbay, addingway erozay itsbay atway ethay ``tartsay'' andway emovingray\n"
-"  itsbay omfray ethay ``endway.''  Onway igbay-endianway achinesmay isthay isway away ightray-iftshay andway\n"
+"Iftshay NUMBER ybay COUNT itsbay, addingway erozay itsbay atway ethay "
+"``tartsay'' andway emovingray\n"
+"  itsbay omfray ethay ``endway.''  Onway igbay-endianway achinesmay isthay "
+"isway away ightray-iftshay andway\n"
 "  onway ittlelay-endianway achinesmay isthay isway away eftlay-iftshay."
 
 #: src/code/bit-bash.lisp
 msgid ""
 "Produce a mask that contains 1's for the COUNT ``start'' bits and 0's for\n"
-"  the remaining ``end'' bits.  Only the lower 5 bits of COUNT are significan"
-"t."
+"  the remaining ``end'' bits.  Only the lower 5 bits of COUNT are "
+"significant."
 msgstr ""
-"Oducepray away askmay atthay ontainscay 1's orfay ethay COUNT ``tartsay'' itsbay andway 0's orfay\n"
-"  ethay emainingray ``endway'' itsbay.  Onlyway ethay owerlay 5 itsbay ofway COUNT areway ignificansay"
-"t."
+"Oducepray away askmay atthay ontainscay 1's orfay ethay COUNT ``tartsay'' "
+"itsbay andway 0's orfay\n"
+"  ethay emainingray ``endway'' itsbay.  Onlyway ethay owerlay 5 itsbay ofway "
+"COUNT areway ignificansayt."
 
 #: src/code/bit-bash.lisp
 msgid ""
@@ -2668,19 +2987,24 @@ msgid ""
 "  the remaining ``start'' bits.  Only the lower 5 bits of COUNT are\n"
 "  significant."
 msgstr ""
-"Oducepray away askmay atthay ontainscay 1's orfay ethay COUNT ``endway'' itsbay andway 0's orfay\n"
-"  ethay emainingray ``tartsay'' itsbay.  Onlyway ethay owerlay 5 itsbay ofway COUNT areway\n"
+"Oducepray away askmay atthay ontainscay 1's orfay ethay COUNT ``endway'' "
+"itsbay andway 0's orfay\n"
+"  ethay emainingray ``tartsay'' itsbay.  Onlyway ethay owerlay 5 itsbay "
+"ofway COUNT areway\n"
 "  ignificantsay."
 
 #: src/code/bit-bash.lisp
 msgid "Align the SAP to a word boundry, and update the offset accordingly."
-msgstr "Alignway ethay SAP otay away ordway oundrybay, andway updateway ethay offsetway accordinglyway."
+msgstr ""
+"Alignway ethay SAP otay away ordway oundrybay, andway updateway ethay "
+"offsetway accordinglyway."
 
 #: src/code/bit-bash.lisp
 msgid ""
 "Fill DST with VALUE starting at DST-OFFSET and continuing for LENGTH bits."
 msgstr ""
-"Illfay DST ithway VALUE tartingsay atway DST-OFFSET andway ontinuingcay orfay LENGTH itsbay."
+"Illfay DST ithway VALUE tartingsay atway DST-OFFSET andway ontinuingcay "
+"orfay LENGTH itsbay."
 
 #: src/code/byte-interp.lisp
 msgid "This is the interpreter's evaluation stack."
@@ -2688,7 +3012,9 @@ msgstr "Isthay isway ethay interpreterway's evaluationway tacksay."
 
 #: src/code/byte-interp.lisp
 msgid "This is the next free element of the interpreter's evaluation stack."
-msgstr "Isthay isway ethay extnay eefray elementway ofway ethay interpreterway's evaluationway tacksay."
+msgstr ""
+"Isthay isway ethay extnay eefray elementway ofway ethay interpreterway's "
+"evaluationway tacksay."
 
 #: src/code/byte-interp.lisp
 msgid "Undefined XOP."
@@ -2736,15 +3062,20 @@ msgstr "unctionfay-endway eakpointsbray otnay upportedsay."
 
 #: src/code/array.lisp
 msgid "The exclusive upper bound on the rank of an array."
-msgstr "Ethay exclusiveway upperway oundbay onway ethay ankray ofway anway arrayway."
+msgstr ""
+"Ethay exclusiveway upperway oundbay onway ethay ankray ofway anway arrayway."
 
 #: src/code/array.lisp
 msgid "The exclusive upper bound any given dimension of an array."
-msgstr "Ethay exclusiveway upperway oundbay anyway ivengay imensionday ofway anway arrayway."
+msgstr ""
+"Ethay exclusiveway upperway oundbay anyway ivengay imensionday ofway anway "
+"arrayway."
 
 #: src/code/array.lisp
 msgid "The exclusive upper bound on the total number of elements in an array."
-msgstr "Ethay exclusiveway upperway oundbay onway ethay otaltay umbernay ofway elementsway inway anway arrayway."
+msgstr ""
+"Ethay exclusiveway upperway oundbay onway ethay otaltay umbernay ofway "
+"elementsway inway anway arrayway."
 
 #: src/code/array.lisp
 msgid "Start ~D is greater than end ~D."
@@ -2758,7 +3089,8 @@ msgstr "Endway ~D isway eatergray anthay otaltay izesay ~D."
 msgid ""
 "List of weak-pointers to static vectors.  Needed for GCing static vectors"
 msgstr ""
-"Istlay ofway eakway-ointerspay otay taticsay ectorsvay.  Eedednay orfay Cinggay taticsay ectorsvay"
+"Istlay ofway eakway-ointerspay otay taticsay ectorsvay.  Eedednay orfay "
+"Cinggay taticsay ectorsvay"
 
 #: src/code/array.lisp
 msgid "Cannot make a static array of element type ~S"
@@ -2766,7 +3098,9 @@ msgstr "Annotcay akemay away taticsay arrayway ofway elementway ypetay ~S"
 
 #: src/code/array.lisp
 msgid "Failed to allocate space for static array of length ~S of type ~S"
-msgstr "Ailedfay otay allocateway acespay orfay taticsay arrayway ofway engthlay ~S ofway ypetay ~S"
+msgstr ""
+"Ailedfay otay allocateway acespay orfay taticsay arrayway ofway engthlay ~S "
+"ofway ypetay ~S"
 
 #: src/code/array.lisp
 msgid ""
@@ -2796,35 +3130,44 @@ msgid ""
 "      How to allocate the array.  If :MALLOC, a static, nonmovable array is\n"
 "      created.  This array is created by calling malloc."
 msgstr ""
-"Eatescray anway arrayway ofway ethay ecifiedspay Imensionsday andway opertiespray.  Eesay ethay\n"
+"Eatescray anway arrayway ofway ethay ecifiedspay Imensionsday andway "
+"opertiespray.  Eesay ethay\n"
 "  anualmay orfay etailsday.\n"
 "\n"
 "  :Elementway-ypetay\n"
 "      Ethay ypetay ofway objectsway atthay ethay arrayway ancay oldhay \n"
 "  :Initialway-elementway\n"
-"      Eachway elementway ofway ethay arrayway isway initializedway otay isthay aluevay, ifway uppliedsay.\n"
-"      Ifway otnay uppliedsay, 0 ofway ethay appropriateway ypetay isway usedway.\n"
+"      Eachway elementway ofway ethay arrayway isway initializedway otay "
+"isthay aluevay, ifway uppliedsay.\n"
+"      Ifway otnay uppliedsay, 0 ofway ethay appropriateway ypetay isway "
+"usedway.\n"
 "  :Initialway-ontentscay\n"
-"      Ethay ontentscay ofway ethay arrayway areway initializedway otay isthay.\n"
+"      Ethay ontentscay ofway ethay arrayway areway initializedway otay "
+"isthay.\n"
 "  :Adjustableway\n"
 "      Ifway onnay-Ilnay, akemay anway expresslyway adjustableway arrayway.\n"
 "  :Illfay-ointerpay\n"
-"      Orfay oneway-imensionalday arrayway, etsay ethay illfay-ointerpay otay ethay ivengay aluevay.\n"
+"      Orfay oneway-imensionalday arrayway, etsay ethay illfay-ointerpay otay "
+"ethay ivengay aluevay.\n"
 "      Ifway T, useway ethay actualway engthlay ofway ethay arrayway.\n"
 "  :Isplacedday-otay\n"
-"      Eatecray anway arrayway atthay isway isplacedday otay ethay argettay arrayway ecifiedspay\n"
+"      Eatecray anway arrayway atthay isway isplacedday otay ethay argettay "
+"arrayway ecifiedspay\n"
 "      ybay :isplacedday-otay.\n"
 "  :Isplacedday-indexway-offsetway\n"
-"      Indexway offsetway otay ethay isplacedday arrayway.  Atthay isway, indexway 0 ofway isthay arrayway "
-"isway\n"
-"      actuallyway indexway isplacedday-indexway-offsetway ofway ethay argettay isplacedday arrayway. \n"
+"      Indexway offsetway otay ethay isplacedday arrayway.  Atthay isway, "
+"indexway 0 ofway isthay arrayway isway\n"
+"      actuallyway indexway isplacedday-indexway-offsetway ofway ethay "
+"argettay isplacedday arrayway. \n"
 "  :Allocationway\n"
-"      Owhay otay allocateway ethay arrayway.  Ifway :MALLOC, away taticsay, onmovablenay arrayway isway\n"
+"      Owhay otay allocateway ethay arrayway.  Ifway :MALLOC, away taticsay, "
+"onmovablenay arrayway isway\n"
 "      eatedcray.  Isthay arrayway isway eatedcray ybay allingcay allocmay."
 
 #: src/code/array.lisp
 msgid "Can't specify :displaced-index-offset without :displaced-to"
-msgstr "Ancay't ecifyspay :isplacedday-indexway-offsetway ithoutway :isplacedday-otay"
+msgstr ""
+"Ancay't ecifyspay :isplacedday-indexway-offsetway ithoutway :isplacedday-otay"
 
 #: src/code/array.lisp
 msgid "Cannot make an adjustable static array"
@@ -2835,16 +3178,20 @@ msgid "Cannot make a displaced array static"
 msgstr "Annotcay akemay away isplacedday arrayway taticsay"
 
 #: src/code/array.lisp
-msgid "Cannot specify both :initial-element and ~\n"
-"		:initial-contents"
-msgstr "Annotcay ecifyspay othbay :initialway-elementway andway ~\n"
-"		:initialway-ontentscay"
+msgid ""
+"Cannot specify both :initial-element and ~\n"
+"\t\t:initial-contents"
+msgstr ""
+"Annotcay ecifyspay othbay :initialway-elementway andway ~\n"
+"\t\t:initialway-ontentscay"
 
 #: src/code/array.lisp
-msgid "~D elements in the initial-contents, but the ~\n"
-"		vector length is ~D."
-msgstr "~D elementsway inway ethay initialway-ontentscay, utbay ethay ~\n"
-"		ectorvay engthlay isway ~D."
+msgid ""
+"~D elements in the initial-contents, but the ~\n"
+"\t\tvector length is ~D."
+msgstr ""
+"~D elementsway inway ethay initialway-ontentscay, utbay ethay ~\n"
+"\t\tectorvay engthlay isway ~D."
 
 #: src/code/array.lisp
 msgid "Only vectors can have fill pointers."
@@ -2857,10 +3204,10 @@ msgstr "Invalidway illfay-ointerpay ~D"
 #: src/code/array.lisp
 msgid ""
 "Neither :initial-element nor :initial-contents ~\n"
-"		   can be specified along with :displaced-to"
+"\t\t   can be specified along with :displaced-to"
 msgstr ""
 "Eithernay :initialway-elementway ornay :initialway-ontentscay ~\n"
-"		   ancay ebay ecifiedspay alongway ithway :isplacedday-otay"
+"\t\t   ancay ebay ecifiedspay alongway ithway :isplacedday-otay"
 
 #: src/code/array.lisp
 msgid ""
@@ -2876,7 +3223,9 @@ msgstr "~S oesnday't avehay enoughway elementsway."
 
 #: src/code/array.lisp
 msgid "If non-NIL, print some debugging information when GC'ing static arrays"
-msgstr "Ifway onnay-NIL, intpray omesay ebuggingday informationway enwhay GC'ingway taticsay arraysway"
+msgstr ""
+"Ifway onnay-NIL, intpray omesay ebuggingday informationway enwhay GC'ingway "
+"taticsay arraysway"
 
 #: src/code/array.lisp
 msgid "~&Freeing foreign vector at #x~X~%"
@@ -2903,34 +3252,36 @@ msgid ""
 "Cannot supply both :initial-contents and :initial-element to\n"
 "            either make-array or adjust-array."
 msgstr ""
-"Annotcay upplysay othbay :initialway-ontentscay andway :initialway-elementway otay\n"
+"Annotcay upplysay othbay :initialway-ontentscay andway :initialway-"
+"elementway otay\n"
 "            eitherway akemay-arrayway orway adjustway-arrayway."
 
 #: src/code/array.lisp
 msgid "~S cannot be used to initialize an array of type ~S."
-msgstr "~S annotcay ebay usedway otay initializeway anway arrayway ofway ypetay ~S."
+msgstr ""
+"~S annotcay ebay usedway otay initializeway anway arrayway ofway ypetay ~S."
 
 #: src/code/array.lisp
 msgid ""
 "Malformed :initial-contents.  ~S is not a ~\n"
-"			                       sequence, but ~D more layer needed."
+"\t\t\t                       sequence, but ~D more layer needed."
 msgid_plural ""
 "Malformed :initial-contents.  ~S is not a ~\n"
-"			                       sequence, but ~D more layers needed."
+"\t\t\t                       sequence, but ~D more layers needed."
 msgstr[0] ""
 "Alformedmay :initialway-ontentscay.  ~S isway otnay away ~\n"
-"			                       equencesay, utbay ~D oremay ayerlay eedednay."
+"\t\t\t                       equencesay, utbay ~D oremay ayerlay eedednay."
 msgstr[1] ""
 "Alformedmay :initialway-ontentscay.  ~S isway otnay away ~\n"
-"			                       equencesay, utbay ~D oremay ayerslay eedednay."
+"\t\t\t                       equencesay, utbay ~D oremay ayerslay eedednay."
 
 #: src/code/array.lisp
 msgid ""
 "Malformed :initial-contents.  Dimension of ~\n"
-"			        axis ~D is ~D, but ~S is ~D long."
+"\t\t\t        axis ~D is ~D, but ~S is ~D long."
 msgstr ""
 "Alformedmay :initialway-ontentscay.  Imensionday ofway ~\n"
-"			        axisway ~D isway ~D, utbay ~S isway ~D onglay."
+"\t\t\t        axisway ~D isway ~D, utbay ~S isway ~D onglay."
 
 #: src/code/array.lisp
 msgid "Constructs a simple-vector from the given objects."
@@ -2938,7 +3289,8 @@ msgstr "Onstructscay away implesay-ectorvay omfray ethay ivengay objectsway."
 
 #: src/code/array.lisp
 msgid "Wrong number of subscripts, ~D, for array of rank ~D"
-msgstr "Ongwray umbernay ofway ubscriptssay, ~D, orfay arrayway ofway ankray ~D"
+msgstr ""
+"Ongwray umbernay ofway ubscriptssay, ~D, orfay arrayway ofway ankray ~D"
 
 #: src/code/array.lisp
 msgid "Invalid index ~D~[~;~:; on axis ~:*~D~] in ~S"
@@ -2950,11 +3302,15 @@ msgstr "Invalidway indexway ~D inway ~S"
 
 #: src/code/array.lisp
 msgid "Returns T if the Subscipts are in bounds for the Array, Nil otherwise."
-msgstr "Eturnsray T ifway ethay Ubsciptssay areway inway oundsbay orfay ethay Arrayway, Ilnay otherwiseway."
+msgstr ""
+"Eturnsray T ifway ethay Ubsciptssay areway inway oundsbay orfay ethay "
+"Arrayway, Ilnay otherwiseway."
 
 #: src/code/array.lisp
 msgid "Returns the element of the Array specified by the Subscripts."
-msgstr "Eturnsray ethay elementway ofway ethay Arrayway ecifiedspay ybay ethay Ubscriptssay."
+msgstr ""
+"Eturnsray ethay elementway ofway ethay Arrayway ecifiedspay ybay ethay "
+"Ubscriptssay."
 
 #: src/code/array.lisp
 msgid ""
@@ -2962,21 +3318,27 @@ msgid ""
 "is\n"
 "   SETF'able."
 msgstr ""
-"Eturnsray ethay elementway ofway arrayway orresspondingcay otay ethay owray-ajormay indexway.  Isthay "
-"isway\n"
+"Eturnsray ethay elementway ofway arrayway orresspondingcay otay ethay owray-"
+"ajormay indexway.  Isthay isway\n"
 "   SETF'ableway."
 
 #: src/code/array.lisp
 msgid "Returns the Index'th element of the given Simple-Vector."
-msgstr "Eturnsray ethay Indexway'thay elementway ofway ethay ivengay Implesay-Ectorvay."
+msgstr ""
+"Eturnsray ethay Indexway'thay elementway ofway ethay ivengay Implesay-"
+"Ectorvay."
 
 #: src/code/array.lisp
 msgid "Returns the bit from the Bit-Array at the specified Subscripts."
-msgstr "Eturnsray ethay itbay omfray ethay Itbay-Arrayway atway ethay ecifiedspay Ubscriptssay."
+msgstr ""
+"Eturnsray ethay itbay omfray ethay Itbay-Arrayway atway ethay ecifiedspay "
+"Ubscriptssay."
 
 #: src/code/array.lisp
 msgid "Returns the bit from the Simple-Bit-Array at the specified Subscripts."
-msgstr "Eturnsray ethay itbay omfray ethay Implesay-Itbay-Arrayway atway ethay ecifiedspay Ubscriptssay."
+msgstr ""
+"Eturnsray ethay itbay omfray ethay Implesay-Itbay-Arrayway atway ethay "
+"ecifiedspay Ubscriptssay."
 
 #: src/code/array.lisp
 msgid "Returns the type of the elements of the array"
@@ -2988,7 +3350,8 @@ msgstr "Eturnsray ethay umbernay ofway imensionsday ofway ethay Arrayway."
 
 #: src/code/array.lisp
 msgid "Returns length of dimension Axis-Number of the Array."
-msgstr "Eturnsray engthlay ofway imensionday Axisway-Umbernay ofway ethay Arrayway."
+msgstr ""
+"Eturnsray engthlay ofway imensionday Axisway-Umbernay ofway ethay Arrayway."
 
 #: src/code/array.lisp
 msgid "Vector axis is not zero: ~S"
@@ -3002,31 +3365,39 @@ msgstr[1] "~D isway ootay igbay; ~S onlyway ashay ~D imensionsday"
 
 #: src/code/array.lisp
 msgid "Returns a list whose elements are the dimensions of the array"
-msgstr "Eturnsray away istlay osewhay elementsway areway ethay imensionsday ofway ethay arrayway"
+msgstr ""
+"Eturnsray away istlay osewhay elementsway areway ethay imensionsday ofway "
+"ethay arrayway"
 
 #: src/code/array.lisp
 msgid "Returns the total number of elements in the Array."
-msgstr "Eturnsray ethay otaltay umbernay ofway elementsway inway ethay Arrayway."
+msgstr ""
+"Eturnsray ethay otaltay umbernay ofway elementsway inway ethay Arrayway."
 
 #: src/code/array.lisp
 msgid ""
 "Returns values of :displaced-to and :displaced-index-offset options to\n"
 "   make-array, or the defaults nil and 0 if not a displaced array."
 msgstr ""
-"Eturnsray aluesvay ofway :isplacedday-otay andway :isplacedday-indexway-offsetway optionsway otay\n"
-"   akemay-arrayway, orway ethay efaultsday ilnay andway 0 ifway otnay away isplacedday arrayway."
+"Eturnsray aluesvay ofway :isplacedday-otay andway :isplacedday-indexway-"
+"offsetway optionsway otay\n"
+"   akemay-arrayway, orway ethay efaultsday ilnay andway 0 ifway otnay away "
+"isplacedday arrayway."
 
 #: src/code/array.lisp
 msgid ""
 "Returns T if (adjust-array array...) would return an array identical\n"
 "   to the argument, this happens for complex arrays."
 msgstr ""
-"Eturnsray T ifway (adjustway-arrayway arrayway...) ouldway eturnray anway arrayway identicalway\n"
+"Eturnsray T ifway (adjustway-arrayway arrayway...) ouldway eturnray anway "
+"arrayway identicalway\n"
 "   otay ethay argumentway, isthay appenshay orfay omplexcay arraysway."
 
 #: src/code/array.lisp
 msgid "Returns T if the given Array has a fill pointer, or Nil otherwise."
-msgstr "Eturnsray T ifway ethay ivengay Arrayway ashay away illfay ointerpay, orway Ilnay otherwiseway."
+msgstr ""
+"Eturnsray T ifway ethay ivengay Arrayway ashay away illfay ointerpay, orway "
+"Ilnay otherwiseway."
 
 #: src/code/array.lisp
 msgid "Returns the Fill-Pointer of the given Vector."
@@ -3034,20 +3405,24 @@ msgstr "Eturnsray ethay Illfay-Ointerpay ofway ethay ivengay Ectorvay."
 
 #: src/code/array.lisp
 msgid "New fill pointer, ~S, is larger than the length of the vector."
-msgstr "Ewnay illfay ointerpay, ~S, isway argerlay anthay ethay engthlay ofway ethay ectorvay."
+msgstr ""
+"Ewnay illfay ointerpay, ~S, isway argerlay anthay ethay engthlay ofway ethay "
+"ectorvay."
 
 #: src/code/array.lisp
 msgid ""
 "Attempts to set the element of Array designated by the fill pointer\n"
 "   to New-El and increment fill pointer by one.  If the fill pointer is\n"
-"   too large, Nil is returned, otherwise the index of the pushed element is "
-"\n"
+"   too large, Nil is returned, otherwise the index of the pushed element "
+"is \n"
 "   returned."
 msgstr ""
-"Attemptsway otay etsay ethay elementway ofway Arrayway esignatedday ybay ethay illfay ointerpay\n"
-"   otay Ewnay-Elway andway incrementway illfay ointerpay ybay oneway.  Ifway ethay illfay ointerpay isway\n"
-"   ootay argelay, Ilnay isway eturnedray, otherwiseway ethay indexway ofway ethay ushedpay elementway isway "
-"\n"
+"Attemptsway otay etsay ethay elementway ofway Arrayway esignatedday ybay "
+"ethay illfay ointerpay\n"
+"   otay Ewnay-Elway andway incrementway illfay ointerpay ybay oneway.  Ifway "
+"ethay illfay ointerpay isway\n"
+"   ootay argelay, Ilnay isway eturnedray, otherwiseway ethay indexway ofway "
+"ethay ushedpay elementway isway \n"
 "   eturnedray."
 
 #: src/code/array.lisp
@@ -3055,7 +3430,8 @@ msgid ""
 "Like Vector-Push except that if the fill pointer gets too large, the\n"
 "   Array is extended rather than Nil being returned."
 msgstr ""
-"Ikelay Ectorvay-Ushpay exceptway atthay ifway ethay illfay ointerpay etsgay ootay argelay, ethay\n"
+"Ikelay Ectorvay-Ushpay exceptway atthay ifway ethay illfay ointerpay etsgay "
+"ootay argelay, ethay\n"
 "   Arrayway isway extendedway atherray anthay Ilnay eingbay eturnedray."
 
 #: src/code/array.lisp
@@ -3064,8 +3440,10 @@ msgid ""
 "   pointer to by the new fill pointer.  If the original value of the fill\n"
 "   pointer is 0, an error occurs."
 msgstr ""
-"Attemptsway otay ecreaseday ethay illfay-ointerpay ybay 1 andway eturnray ethay elementway\n"
-"   ointerpay otay ybay ethay ewnay illfay ointerpay.  Ifway ethay originalway aluevay ofway ethay illfay\n"
+"Attemptsway otay ecreaseday ethay illfay-ointerpay ybay 1 andway eturnray "
+"ethay elementway\n"
+"   ointerpay otay ybay ethay ewnay illfay ointerpay.  Ifway ethay "
+"originalway aluevay ofway ethay illfay\n"
 "   ointerpay isway 0, anway errorway occursway."
 
 #: src/code/array.lisp
@@ -3074,7 +3452,9 @@ msgstr "Othingnay eftlay otay oppay."
 
 #: src/code/array.lisp
 msgid "Adjusts the Array's dimensions to the given Dimensions and stuff."
-msgstr "Adjustsway ethay Arrayway's imensionsday otay ethay ivengay Imensionsday andway tuffsay."
+msgstr ""
+"Adjustsway ethay Arrayway's imensionsday otay ethay ivengay Imensionsday "
+"andway tuffsay."
 
 #: src/code/array.lisp
 msgid "Number of dimensions not equal to rank of array."
@@ -3095,26 +3475,27 @@ msgstr "Ultidimensionalmay arraysway ancay't avehay illfay ointerspay."
 #: src/code/array.lisp
 msgid ""
 "Initial contents may not be specified with ~\n"
-"		 the :initial-element or :displaced-to option."
+"\t\t the :initial-element or :displaced-to option."
 msgstr ""
 "Initialway ontentscay aymay otnay ebay ecifiedspay ithway ~\n"
-"		 ethay :initialway-elementway orway :isplacedday-otay optionway."
+"\t\t ethay :initialway-elementway orway :isplacedday-otay optionway."
 
 #: src/code/array.lisp
 msgid ""
 "The :initial-element option may not be specified ~\n"
-"	       with :displaced-to."
+"\t       with :displaced-to."
 msgstr ""
 "Ethay :initialway-elementway optionway aymay otnay ebay ecifiedspay ~\n"
-"	       ithway :isplacedday-otay."
+"\t       ithway :isplacedday-otay."
 
 #: src/code/array.lisp
 msgid ""
 "One can't displace an array of type ~S into another of ~\n"
-"	               type ~S."
+"\t               type ~S."
 msgstr ""
-"Oneway ancay't isplaceday anway arrayway ofway ypetay ~S intoway anotherway ofway ~\n"
-"	               ypetay ~S."
+"Oneway ancay't isplaceday anway arrayway ofway ypetay ~S intoway anotherway "
+"ofway ~\n"
+"\t               ypetay ~S."
 
 #: src/code/array.lisp
 msgid "The :displaced-to array is too small."
@@ -3123,28 +3504,31 @@ msgstr "Ethay :isplacedday-otay arrayway isway ootay mallsay."
 #: src/code/array.lisp
 msgid ""
 "Cannot adjust-array an array (~S) to a size (~S) that is ~\n"
-"	            smaller than it's fill pointer (~S)."
+"\t            smaller than it's fill pointer (~S)."
 msgstr ""
-"Annotcay adjustway-arrayway anway arrayway (~S) otay away izesay (~S) atthay isway ~\n"
-"	            mallersay anthay itway's illfay ointerpay (~S)."
+"Annotcay adjustway-arrayway anway arrayway (~S) otay away izesay (~S) atthay "
+"isway ~\n"
+"\t            mallersay anthay itway's illfay ointerpay (~S)."
 
 #: src/code/array.lisp
 msgid ""
 "Cannot supply a non-NIL value (~S) for :fill-pointer ~\n"
-"	   in adjust-array unless the array (~S) was originally ~\n"
-" 	   created with a fill pointer."
+"\t   in adjust-array unless the array (~S) was originally ~\n"
+" \t   created with a fill pointer."
 msgstr ""
 "Annotcay upplysay away onnay-NIL aluevay (~S) orfay :illfay-ointerpay ~\n"
-"	   inway adjustway-arrayway unlessway ethay arrayway (~S) asway originallyway ~\n"
-" 	   eatedcray ithway away illfay ointerpay."
+"\t   inway adjustway-arrayway unlessway ethay arrayway (~S) asway "
+"originallyway ~\n"
+" \t   eatedcray ithway away illfay ointerpay."
 
 #: src/code/array.lisp
 msgid ""
 "Cannot supply a value for :fill-pointer (~S) that is larger ~\n"
-"	     than the new length of the vector (~S)."
+"\t     than the new length of the vector (~S)."
 msgstr ""
-"Annotcay upplysay away aluevay orfay :illfay-ointerpay (~S) atthay isway argerlay ~\n"
-"	     anthay ethay ewnay engthlay ofway ethay ectorvay (~S)."
+"Annotcay upplysay away aluevay orfay :illfay-ointerpay (~S) atthay isway "
+"argerlay ~\n"
+"\t     anthay ethay ewnay engthlay ofway ethay ectorvay (~S)."
 
 #: src/code/array.lisp
 msgid "Bogus value for :fill-pointer in adjust-array: ~S"
@@ -3155,12 +3539,15 @@ msgid ""
 "Destructively alters the Vector, changing its length to New-Size, which\n"
 "   must be less than or equal to its current size."
 msgstr ""
-"Estructivelyday altersway ethay Ectorvay, angingchay itsway engthlay otay Ewnay-Izesay, ichwhay\n"
+"Estructivelyday altersway ethay Ectorvay, angingchay itsway engthlay otay "
+"Ewnay-Izesay, ichwhay\n"
 "   ustmay ebay esslay anthay orway equalway otay itsway urrentcay izesay."
 
 #: src/code/array.lisp
 msgid "Fills in array header with provided information.  Returns array."
-msgstr "Illsfay inway arrayway eaderhay ithway ovidedpray informationway.  Eturnsray arrayway."
+msgstr ""
+"Illsfay inway arrayway eaderhay ithway ovidedpray informationway.  Eturnsray "
+"arrayway."
 
 #: src/code/array.lisp
 msgid "~S and ~S do not have the same dimensions."
@@ -3174,11 +3561,14 @@ msgid ""
 "is\n"
 "  created.  All the arrays must have the same rank and dimensions."
 msgstr ""
-"Erformpay away itbay-iseway LOGAND onway ethay elementsway ofway BIT-ARRAY-1 andway BIT-ARRAY-2,\n"
-"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY isway T,\n"
-"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway omittedway, away ewnay arrayway "
-"isway\n"
-"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray andway imensionsday."
+"Erformpay away itbay-iseway LOGAND onway ethay elementsway ofway BIT-ARRAY-1 "
+"andway BIT-ARRAY-2,\n"
+"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY "
+"isway T,\n"
+"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway "
+"omittedway, away ewnay arrayway isway\n"
+"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray "
+"andway imensionsday."
 
 #: src/code/array.lisp
 msgid ""
@@ -3188,11 +3578,14 @@ msgid ""
 "is\n"
 "  created.  All the arrays must have the same rank and dimensions."
 msgstr ""
-"Erformpay away itbay-iseway LOGIOR onway ethay elementsway ofway BIT-ARRAY-1 andway BIT-ARRAY-2,\n"
-"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY isway T,\n"
-"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway omittedway, away ewnay arrayway "
-"isway\n"
-"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray andway imensionsday."
+"Erformpay away itbay-iseway LOGIOR onway ethay elementsway ofway BIT-ARRAY-1 "
+"andway BIT-ARRAY-2,\n"
+"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY "
+"isway T,\n"
+"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway "
+"omittedway, away ewnay arrayway isway\n"
+"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray "
+"andway imensionsday."
 
 #: src/code/array.lisp
 msgid ""
@@ -3202,11 +3595,14 @@ msgid ""
 "is\n"
 "  created.  All the arrays must have the same rank and dimensions."
 msgstr ""
-"Erformpay away itbay-iseway LOGXOR onway ethay elementsway ofway BIT-ARRAY-1 andway BIT-ARRAY-2,\n"
-"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY isway T,\n"
-"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway omittedway, away ewnay arrayway "
-"isway\n"
-"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray andway imensionsday."
+"Erformpay away itbay-iseway LOGXOR onway ethay elementsway ofway BIT-ARRAY-1 "
+"andway BIT-ARRAY-2,\n"
+"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY "
+"isway T,\n"
+"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway "
+"omittedway, away ewnay arrayway isway\n"
+"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray "
+"andway imensionsday."
 
 #: src/code/array.lisp
 msgid ""
@@ -3216,11 +3612,14 @@ msgid ""
 "is\n"
 "  created.  All the arrays must have the same rank and dimensions."
 msgstr ""
-"Erformpay away itbay-iseway LOGEQV onway ethay elementsway ofway BIT-ARRAY-1 andway BIT-ARRAY-2,\n"
-"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY isway T,\n"
-"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway omittedway, away ewnay arrayway "
-"isway\n"
-"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray andway imensionsday."
+"Erformpay away itbay-iseway LOGEQV onway ethay elementsway ofway BIT-ARRAY-1 "
+"andway BIT-ARRAY-2,\n"
+"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY "
+"isway T,\n"
+"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway "
+"omittedway, away ewnay arrayway isway\n"
+"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray "
+"andway imensionsday."
 
 #: src/code/array.lisp
 msgid ""
@@ -3230,11 +3629,14 @@ msgid ""
 "is\n"
 "  created.  All the arrays must have the same rank and dimensions."
 msgstr ""
-"Erformpay away itbay-iseway LOGNAND onway ethay elementsway ofway BIT-ARRAY-1 andway BIT-ARRAY-2,\n"
-"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY isway T,\n"
-"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway omittedway, away ewnay arrayway "
-"isway\n"
-"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray andway imensionsday."
+"Erformpay away itbay-iseway LOGNAND onway ethay elementsway ofway BIT-"
+"ARRAY-1 andway BIT-ARRAY-2,\n"
+"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY "
+"isway T,\n"
+"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway "
+"omittedway, away ewnay arrayway isway\n"
+"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray "
+"andway imensionsday."
 
 #: src/code/array.lisp
 msgid ""
@@ -3244,11 +3646,14 @@ msgid ""
 "is\n"
 "  created.  All the arrays must have the same rank and dimensions."
 msgstr ""
-"Erformpay away itbay-iseway LOGNOR onway ethay elementsway ofway BIT-ARRAY-1 andway BIT-ARRAY-2,\n"
-"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY isway T,\n"
-"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway omittedway, away ewnay arrayway "
-"isway\n"
-"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray andway imensionsday."
+"Erformpay away itbay-iseway LOGNOR onway ethay elementsway ofway BIT-ARRAY-1 "
+"andway BIT-ARRAY-2,\n"
+"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY "
+"isway T,\n"
+"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway "
+"omittedway, away ewnay arrayway isway\n"
+"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray "
+"andway imensionsday."
 
 #: src/code/array.lisp
 msgid ""
@@ -3258,11 +3663,14 @@ msgid ""
 "is\n"
 "  created.  All the arrays must have the same rank and dimensions."
 msgstr ""
-"Erformpay away itbay-iseway LOGANDC1 onway ethay elementsway ofway BIT-ARRAY-1 andway BIT-ARRAY-2,\n"
-"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY isway T,\n"
-"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway omittedway, away ewnay arrayway "
-"isway\n"
-"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray andway imensionsday."
+"Erformpay away itbay-iseway LOGANDC1 onway ethay elementsway ofway BIT-"
+"ARRAY-1 andway BIT-ARRAY-2,\n"
+"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY "
+"isway T,\n"
+"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway "
+"omittedway, away ewnay arrayway isway\n"
+"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray "
+"andway imensionsday."
 
 #: src/code/array.lisp
 msgid ""
@@ -3272,11 +3680,14 @@ msgid ""
 "is\n"
 "  created.  All the arrays must have the same rank and dimensions."
 msgstr ""
-"Erformpay away itbay-iseway LOGANDC2 onway ethay elementsway ofway BIT-ARRAY-1 andway BIT-ARRAY-2,\n"
-"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY isway T,\n"
-"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway omittedway, away ewnay arrayway "
-"isway\n"
-"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray andway imensionsday."
+"Erformpay away itbay-iseway LOGANDC2 onway ethay elementsway ofway BIT-"
+"ARRAY-1 andway BIT-ARRAY-2,\n"
+"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY "
+"isway T,\n"
+"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway "
+"omittedway, away ewnay arrayway isway\n"
+"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray "
+"andway imensionsday."
 
 #: src/code/array.lisp
 msgid ""
@@ -3286,11 +3697,14 @@ msgid ""
 "is\n"
 "  created.  All the arrays must have the same rank and dimensions."
 msgstr ""
-"Erformpay away itbay-iseway LOGORC1 onway ethay elementsway ofway BIT-ARRAY-1 andway BIT-ARRAY-2,\n"
-"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY isway T,\n"
-"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway omittedway, away ewnay arrayway "
-"isway\n"
-"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray andway imensionsday."
+"Erformpay away itbay-iseway LOGORC1 onway ethay elementsway ofway BIT-"
+"ARRAY-1 andway BIT-ARRAY-2,\n"
+"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY "
+"isway T,\n"
+"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway "
+"omittedway, away ewnay arrayway isway\n"
+"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray "
+"andway imensionsday."
 
 #: src/code/array.lisp
 msgid ""
@@ -3300,11 +3714,14 @@ msgid ""
 "is\n"
 "  created.  All the arrays must have the same rank and dimensions."
 msgstr ""
-"Erformpay away itbay-iseway LOGORC2 onway ethay elementsway ofway BIT-ARRAY-1 andway BIT-ARRAY-2,\n"
-"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY isway T,\n"
-"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway omittedway, away ewnay arrayway "
-"isway\n"
-"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray andway imensionsday."
+"Erformpay away itbay-iseway LOGORC2 onway ethay elementsway ofway BIT-"
+"ARRAY-1 andway BIT-ARRAY-2,\n"
+"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY "
+"isway T,\n"
+"  BIT-ARRAY-1 isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway "
+"omittedway, away ewnay arrayway isway\n"
+"  eatedcray.  Allway ethay arraysway ustmay avehay ethay amesay ankray "
+"andway imensionsday."
 
 #: src/code/array.lisp
 msgid ""
@@ -3313,10 +3730,14 @@ msgid ""
 "  BIT-ARRAY is used.  If RESULT-BIT-ARRAY is NIL or omitted, a new array is\n"
 "  created.  Both arrays must have the same rank and dimensions."
 msgstr ""
-"Erformspay away itbay-iseway ogicallay NOT onway ethay elementsway ofway BIT-ARRAY,\n"
-"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY isway T,\n"
-"  BIT-ARRAY isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway omittedway, away ewnay arrayway isway\n"
-"  eatedcray.  Othbay arraysway ustmay avehay ethay amesay ankray andway imensionsday."
+"Erformspay away itbay-iseway ogicallay NOT onway ethay elementsway ofway BIT-"
+"ARRAY,\n"
+"  uttingpay ethay esultsray inway RESULT-BIT-ARRAY.  Ifway RESULT-BIT-ARRAY "
+"isway T,\n"
+"  BIT-ARRAY isway usedway.  Ifway RESULT-BIT-ARRAY isway NIL orway "
+"omittedway, away ewnay arrayway isway\n"
+"  eatedcray.  Othbay arraysway ustmay avehay ethay amesay ankray andway "
+"imensionsday."
 
 #: src/code/hash-new.lisp
 msgid "Structure used to implement hash tables."
@@ -3327,7 +3748,8 @@ msgid ""
 "Almost-Primify returns an almost prime number greater than or equal\n"
 "   to NUM."
 msgstr ""
-"Almostway-Imifypray eturnsray anway almostway imepray umbernay eatergray anthay orway equalway\n"
+"Almostway-Imifypray eturnsray anway almostway imepray umbernay eatergray "
+"anthay orway equalway\n"
 "   otay NUM."
 
 #: src/code/hash-new.lisp
@@ -3362,31 +3784,45 @@ msgid ""
 "                If the condition does not hold, the entry is removed.  For\n"
 "                backward compatibility, a value of T is the same as :KEY."
 msgstr ""
-"Eatescray andway eturnsray away ewnay ashhay abletay.  Ethay eywordskay areway asway ollowsfay:\n"
-"     :TEST -- Indicatesway atwhay indkay ofway esttay otay useway.  Onlyway EQ, EQL, EQUAL,\n"
+"Eatescray andway eturnsray away ewnay ashhay abletay.  Ethay eywordskay "
+"areway asway ollowsfay:\n"
+"     :TEST -- Indicatesway atwhay indkay ofway esttay otay useway.  Onlyway "
+"EQ, EQL, EQUAL,\n"
 "       andway EQUALP areway urrentlycay upportedsay.\n"
-"     :SIZE -- Away inthay asway otay owhay anymay elementsway illway ebay utpay inway isthay ashhay\n"
+"     :SIZE -- Away inthay asway otay owhay anymay elementsway illway ebay "
+"utpay inway isthay ashhay\n"
 "       abletay.\n"
-"     :REHASH-SIZE -- Indicatesway owhay otay expandway ethay abletay enwhay itway illsfay upway.\n"
-"       Ifway anway integerway, addway acespay orfay atthay anymay elementsway.  Ifway away oatingflay\n"
-"       ointpay umbernay (ichwhay ustmay ebay eatergray anthay 1.0), ultiplemay ethay izesay\n"
+"     :REHASH-SIZE -- Indicatesway owhay otay expandway ethay abletay enwhay "
+"itway illsfay upway.\n"
+"       Ifway anway integerway, addway acespay orfay atthay anymay "
+"elementsway.  Ifway away oatingflay\n"
+"       ointpay umbernay (ichwhay ustmay ebay eatergray anthay 1.0), "
+"ultiplemay ethay izesay\n"
 "       ybay atthay amountway.\n"
-"     :REHASH-THRESHOLD -- Indicatesway owhay enseday ethay abletay ancay ecomebay eforebay\n"
-"       orcingfay away ehashray.  Ancay ebay anyway ositivepay umbernay <= otay 1, ithway ensityday\n"
-"       approachingway erozay asway ethay resholdthay approachesway 0.  Ensityday 1 eansmay anway\n"
+"     :REHASH-THRESHOLD -- Indicatesway owhay enseday ethay abletay ancay "
+"ecomebay eforebay\n"
+"       orcingfay away ehashray.  Ancay ebay anyway ositivepay umbernay <= "
+"otay 1, ithway ensityday\n"
+"       approachingway erozay asway ethay resholdthay approachesway 0.  "
+"Ensityday 1 eansmay anway\n"
 "       averageway ofway oneway entryway erpay ucketbay.\n"
 "   CMUCL Extensionway:\n"
-"     :WEAK-P -- Eakway ashhay abletay.  Ancay onlyway ebay usedway enwhay ethay eykay isway 'eqway orway "
-"'eqlway.\n"
-"                Anway entryway inway ethay abletay isway emainsray ifway ethay onditioncay oldshay:\n"
+"     :WEAK-P -- Eakway ashhay abletay.  Ancay onlyway ebay usedway enwhay "
+"ethay eykay isway 'eqway orway 'eqlway.\n"
+"                Anway entryway inway ethay abletay isway emainsray ifway "
+"ethay onditioncay oldshay:\n"
 "\n"
 "                :KEY            -- eykay isway eferencedray elsewhereway\n"
 "                :VALUE          -- aluevay isway eferencedray elsewhereway\n"
-"                :KEY-AND-VALUE  -- eykay andway aluevay areway eferencedray elsewhereway\n"
-"                :KEY-OR-VALUE   -- eykay orway aluevay isway eferencedray elsewhereway\n"
+"                :KEY-AND-VALUE  -- eykay andway aluevay areway eferencedray "
+"elsewhereway\n"
+"                :KEY-OR-VALUE   -- eykay orway aluevay isway eferencedray "
+"elsewhereway\n"
 "\n"
-"                Ifway ethay onditioncay oesday otnay oldhay, ethay entryway isway emovedray.  Orfay\n"
-"                ackwardbay ompatibilitycay, away aluevay ofway T isway ethay amesay asway :KEY."
+"                Ifway ethay onditioncay oesday otnay oldhay, ethay entryway "
+"isway emovedray.  Orfay\n"
+"                ackwardbay ompatibilitycay, away aluevay ofway T isway ethay "
+"amesay asway :KEY."
 
 #: src/code/hash-new.lisp
 msgid "Cannot make a weak ~A hashtable with test: ~S"
@@ -3398,7 +3834,8 @@ msgstr "Unknownway :TEST orfay MAKE-HASH-TABLE: ~S"
 
 #: src/code/hash-new.lisp
 msgid "Returns the number of entries in the given HASH-TABLE."
-msgstr "Eturnsray ethay umbernay ofway entriesway inway ethay ivengay HASH-TABLE."
+msgstr ""
+"Eturnsray ethay umbernay ofway entriesway inway ethay ivengay HASH-TABLE."
 
 #: src/code/hash-new.lisp
 msgid "Return the rehash-size HASH-TABLE was created with."
@@ -3414,8 +3851,10 @@ msgid ""
 "   table that can hold however many entries HASH-TABLE can hold without\n"
 "   having to be grown."
 msgstr ""
-"Eturnray away izesay atthay ancay ebay usedway ithway MAKE-HASH-TABLE otay eatecray away ashhay\n"
-"   abletay atthay ancay oldhay oweverhay anymay entriesway HASH-TABLE ancay oldhay ithoutway\n"
+"Eturnray away izesay atthay ancay ebay usedway ithway MAKE-HASH-TABLE otay "
+"eatecray away ashhay\n"
+"   abletay atthay ancay oldhay oweverhay anymay entriesway HASH-TABLE ancay "
+"oldhay ithoutway\n"
 "   avinghay otay ebay owngray."
 
 #: src/code/hash-new.lisp
@@ -3427,7 +3866,8 @@ msgid ""
 "Return T if HASH-TABLE will not keep entries for keys that would\n"
 "   otherwise be garbage, and NIL if it will."
 msgstr ""
-"Eturnray T ifway HASH-TABLE illway otnay eepkay entriesway orfay eyskay atthay ouldway\n"
+"Eturnray T ifway HASH-TABLE illway otnay eepkay entriesway orfay eyskay "
+"atthay ouldway\n"
 "   otherwiseway ebay arbagegay, andway NIL ifway itway illway."
 
 #: src/code/hash-new.lisp
@@ -3437,9 +3877,10 @@ msgid ""
 "no\n"
 "   such entry.  Entries can be added using SETF."
 msgstr ""
-"Indsfay ethay entryway inway HASH-TABLE osewhay eykay isway KEY andway eturnsray ethay associatedway\n"
-"   aluevay andway T asway ultiplemay aluesvay, orway eturnsray DEFAULT andway NIL ifway erethay isway "
-"onay\n"
+"Indsfay ethay entryway inway HASH-TABLE osewhay eykay isway KEY andway "
+"eturnsray ethay associatedway\n"
+"   aluevay andway T asway ultiplemay aluesvay, orway eturnsray DEFAULT "
+"andway NIL ifway erethay isway onay\n"
 "   uchsay entryway.  Entriesway ancay ebay addedway usingway SETF."
 
 #: src/code/hash-new.lisp
@@ -3447,7 +3888,8 @@ msgid ""
 "Remove the entry in HASH-TABLE associated with KEY.  Returns T if there\n"
 "   was such an entry, and NIL if not."
 msgstr ""
-"Emoveray ethay entryway inway HASH-TABLE associatedway ithway KEY.  Eturnsray T ifway erethay\n"
+"Emoveray ethay entryway inway HASH-TABLE associatedway ithway KEY.  "
+"Eturnsray T ifway erethay\n"
 "   asway uchsay anway entryway, andway NIL ifway otnay."
 
 #: src/code/hash-new.lisp
@@ -3455,7 +3897,8 @@ msgid ""
 "This removes all the entries from HASH-TABLE and returns the hash table\n"
 "   itself."
 msgstr ""
-"Isthay emovesray allway ethay entriesway omfray HASH-TABLE andway eturnsray ethay ashhay abletay\n"
+"Isthay emovesray allway ethay entriesway omfray HASH-TABLE andway eturnsray "
+"ethay ashhay abletay\n"
 "   itselfway."
 
 #: src/code/hash-new.lisp
@@ -3463,7 +3906,8 @@ msgid ""
 "This removes all the entries from HASH-TABLE and returns the hash table\n"
 "   itself, shrinking the size to free memory."
 msgstr ""
-"Isthay emovesray allway ethay entriesway omfray HASH-TABLE andway eturnsray ethay ashhay abletay\n"
+"Isthay emovesray allway ethay entriesway omfray HASH-TABLE andway eturnsray "
+"ethay ashhay abletay\n"
 "   itselfway, rinkingshay ethay izesay otay eefray emorymay."
 
 #: src/code/hash-new.lisp
@@ -3471,7 +3915,8 @@ msgid ""
 "For each entry in HASH-TABLE, calls MAP-FUNCTION on the key and value\n"
 "   of the entry; returns NIL."
 msgstr ""
-"Orfay eachway entryway inway HASH-TABLE, allscay MAP-FUNCTION onway ethay eykay andway aluevay\n"
+"Orfay eachway entryway inway HASH-TABLE, allscay MAP-FUNCTION onway ethay "
+"eykay andway aluevay\n"
 "   ofway ethay entryway; eturnsray NIL."
 
 #: src/code/hash-new.lisp
@@ -3481,16 +3926,19 @@ msgid ""
 "   FUNCTION is bound to a generator-macro that, within the scope of the\n"
 "   invocation, returns one or three values. The first value tells whether\n"
 "   any objects remain in the hash table. When the first value is non-NIL, \n"
-"   the second and third values are the key and the value of the next "
-"object."
+"   the second and third values are the key and the value of the next object."
 msgstr ""
 "WITH-HASH-TABLE-ITERATOR ((unctionfay ashhay-abletay) &odybay odybay)\n"
-"   ovidespray away ethodmay ofway anuallymay oopinglay overway ethay elementsway ofway away ashhay-abletay.\n"
-"   FUNCTION isway oundbay otay away eneratorgay-acromay atthay, ithinway ethay opescay ofway ethay\n"
-"   invocationway, eturnsray oneway orway reethay aluesvay. Ethay irstfay aluevay ellstay etherwhay\n"
-"   anyway objectsway emainray inway ethay ashhay abletay. Enwhay ethay irstfay aluevay isway onnay-NIL, \n"
-"   ethay econdsay andway irdthay aluesvay areway ethay eykay andway ethay aluevay ofway ethay extnay "
-"objectway."
+"   ovidespray away ethodmay ofway anuallymay oopinglay overway ethay "
+"elementsway ofway away ashhay-abletay.\n"
+"   FUNCTION isway oundbay otay away eneratorgay-acromay atthay, ithinway "
+"ethay opescay ofway ethay\n"
+"   invocationway, eturnsray oneway orway reethay aluesvay. Ethay irstfay "
+"aluevay ellstay etherwhay\n"
+"   anyway objectsway emainray inway ethay ashhay abletay. Enwhay ethay "
+"irstfay aluevay isway onnay-NIL, \n"
+"   ethay econdsay andway irdthay aluesvay areway ethay eykay andway ethay "
+"aluevay ofway ethay extnay objectway."
 
 #: src/pcl/slots.lisp src/code/hash-new.lisp
 msgid "What kind of instance is this?"
@@ -3498,7 +3946,9 @@ msgstr "Atwhay indkay ofway instanceway isway isthay?"
 
 #: src/code/hash-new.lisp
 msgid "Computes a hash code for S-EXPR and returns it as an integer."
-msgstr "Omputescay away ashhay odecay orfay S-EXPR andway eturnsray itway asway anway integerway."
+msgstr ""
+"Omputescay away ashhay odecay orfay S-EXPR andway eturnsray itway asway "
+"anway integerway."
 
 #: src/code/list.lisp
 msgid "Returns the 1st object in a list."
@@ -3622,69 +4072,97 @@ msgstr "Eturnsray ethay drcay ofway ethay dadrcay ofway away istlay."
 
 #: src/code/list.lisp
 msgid "Returns a list with se1 as the car and se2 as the cdr."
-msgstr "Eturnsray away istlay ithway esay1 asway ethay arcay andway esay2 asway ethay drcay."
+msgstr ""
+"Eturnsray away istlay ithway esay1 asway ethay arcay andway esay2 asway "
+"ethay drcay."
 
 #: src/code/list.lisp
 msgid "Returns T if X and Y are isomorphic trees with identical leaves."
-msgstr "Eturnsray T ifway X andway Y areway isomorphicway eestray ithway identicalway eaveslay."
+msgstr ""
+"Eturnsray T ifway X andway Y areway isomorphicway eestray ithway "
+"identicalway eaveslay."
 
 #: src/code/list.lisp
 msgid ""
 "The recommended way to test for the end of a list.  True if Object is nil,\n"
-"   false if Object is a cons, and an error for any other types of "
-"arguments."
+"   false if Object is a cons, and an error for any other types of arguments."
 msgstr ""
-"Ethay ecommendedray ayway otay esttay orfay ethay endway ofway away istlay.  Uetray ifway Objectway isway ilnay,\n"
-"   alsefay ifway Objectway isway away onscay, andway anway errorway orfay anyway otherway ypestay ofway "
-"argumentsway."
+"Ethay ecommendedray ayway otay esttay orfay ethay endway ofway away istlay.  "
+"Uetray ifway Objectway isway ilnay,\n"
+"   alsefay ifway Objectway isway away onscay, andway anway errorway orfay "
+"anyway otherway ypestay ofway argumentsway."
 
 #: src/code/list.lisp
 msgid "Returns the length of the given List, or Nil if the List is circular."
-msgstr "Eturnsray ethay engthlay ofway ethay ivengay Istlay, orway Ilnay ifway ethay Istlay isway ircularcay."
+msgstr ""
+"Eturnsray ethay engthlay ofway ethay ivengay Istlay, orway Ilnay ifway ethay "
+"Istlay isway ircularcay."
 
 #: src/code/list.lisp
 msgid "Returns the nth object in a list where the car is the zero-th element."
-msgstr "Eturnsray ethay thnay objectway inway away istlay erewhay ethay arcay isway ethay erozay-thay elementway."
+msgstr ""
+"Eturnsray ethay thnay objectway inway away istlay erewhay ethay arcay isway "
+"ethay erozay-thay elementway."
 
 #: src/code/list.lisp
 msgid "Returns the 1st object in a list or NIL if the list is empty."
-msgstr "Eturnsray ethay 1tsay objectway inway away istlay orway NIL ifway ethay istlay isway emptyway."
+msgstr ""
+"Eturnsray ethay 1tsay objectway inway away istlay orway NIL ifway ethay "
+"istlay isway emptyway."
 
 #: src/code/list.lisp
 msgid "Returns the 2nd object in a list or NIL if there is no 2nd object."
-msgstr "Eturnsray ethay 2dnay objectway inway away istlay orway NIL ifway erethay isway onay 2dnay objectway."
+msgstr ""
+"Eturnsray ethay 2dnay objectway inway away istlay orway NIL ifway erethay "
+"isway onay 2dnay objectway."
 
 #: src/code/list.lisp
 msgid "Returns the 3rd object in a list or NIL if there is no 3rd object."
-msgstr "Eturnsray ethay 3dray objectway inway away istlay orway NIL ifway erethay isway onay 3dray objectway."
+msgstr ""
+"Eturnsray ethay 3dray objectway inway away istlay orway NIL ifway erethay "
+"isway onay 3dray objectway."
 
 #: src/code/list.lisp
 msgid "Returns the 4th object in a list or NIL if there is no 4th object."
-msgstr "Eturnsray ethay 4thay objectway inway away istlay orway NIL ifway erethay isway onay 4thay objectway."
+msgstr ""
+"Eturnsray ethay 4thay objectway inway away istlay orway NIL ifway erethay "
+"isway onay 4thay objectway."
 
 #: src/code/list.lisp
 msgid "Returns the 5th object in a list or NIL if there is no 5th object."
-msgstr "Eturnsray ethay 5thay objectway inway away istlay orway NIL ifway erethay isway onay 5thay objectway."
+msgstr ""
+"Eturnsray ethay 5thay objectway inway away istlay orway NIL ifway erethay "
+"isway onay 5thay objectway."
 
 #: src/code/list.lisp
 msgid "Returns the 6th object in a list or NIL if there is no 6th object."
-msgstr "Eturnsray ethay 6thay objectway inway away istlay orway NIL ifway erethay isway onay 6thay objectway."
+msgstr ""
+"Eturnsray ethay 6thay objectway inway away istlay orway NIL ifway erethay "
+"isway onay 6thay objectway."
 
 #: src/code/list.lisp
 msgid "Returns the 7th object in a list or NIL if there is no 7th object."
-msgstr "Eturnsray ethay 7thay objectway inway away istlay orway NIL ifway erethay isway onay 7thay objectway."
+msgstr ""
+"Eturnsray ethay 7thay objectway inway away istlay orway NIL ifway erethay "
+"isway onay 7thay objectway."
 
 #: src/code/list.lisp
 msgid "Returns the 8th object in a list or NIL if there is no 8th object."
-msgstr "Eturnsray ethay 8thay objectway inway away istlay orway NIL ifway erethay isway onay 8thay objectway."
+msgstr ""
+"Eturnsray ethay 8thay objectway inway away istlay orway NIL ifway erethay "
+"isway onay 8thay objectway."
 
 #: src/code/list.lisp
 msgid "Returns the 9th object in a list or NIL if there is no 9th object."
-msgstr "Eturnsray ethay 9thay objectway inway away istlay orway NIL ifway erethay isway onay 9thay objectway."
+msgstr ""
+"Eturnsray ethay 9thay objectway inway away istlay orway NIL ifway erethay "
+"isway onay 9thay objectway."
 
 #: src/code/list.lisp
 msgid "Returns the 10th object in a list or NIL if there is no 10th object."
-msgstr "Eturnsray ethay 10thay objectway inway away istlay orway NIL ifway erethay isway onay 10thay objectway."
+msgstr ""
+"Eturnsray ethay 10thay objectway inway away istlay orway NIL ifway erethay "
+"isway onay 10thay objectway."
 
 #: src/code/list.lisp
 msgid "Means the same as the cdr of a list."
@@ -3696,19 +4174,26 @@ msgstr "Erformspay ethay drcay unctionfay n imestay onway away istlay."
 
 #: src/code/list.lisp
 msgid "Returns the last N conses (not the last element!) of a list."
-msgstr "Eturnsray ethay astlay N onsescay (otnay ethay astlay elementway!) ofway away istlay."
+msgstr ""
+"Eturnsray ethay astlay N onsescay (otnay ethay astlay elementway!) ofway "
+"away istlay."
 
 #: src/code/list.lisp
 msgid "Returns constructs and returns a list of its arguments."
-msgstr "Eturnsray onstructscay andway eturnsray away istlay ofway itsway argumentsway."
+msgstr ""
+"Eturnsray onstructscay andway eturnsray away istlay ofway itsway "
+"argumentsway."
 
 #: src/code/list.lisp
 msgid "Returns a list of the arguments with last cons a dotted pair"
-msgstr "Eturnsray away istlay ofway ethay argumentsway ithway astlay onscay away ottedday airpay"
+msgstr ""
+"Eturnsray away istlay ofway ethay argumentsway ithway astlay onscay away "
+"ottedday airpay"
 
 #: src/code/list.lisp
 msgid "Constructs a list with size elements each set to value"
-msgstr "Onstructscay away istlay ithway izesay elementsway eachway etsay otay aluevay"
+msgstr ""
+"Onstructscay away istlay ithway izesay elementsway eachway etsay otay aluevay"
 
 #: src/code/list.lisp
 msgid "~S is not a proper list"
@@ -3726,15 +4211,23 @@ msgid ""
 "  there are no preceding non-empty lists.  In the latter case, if the\n"
 "  last Arg is not a list, the returned value is not a list either."
 msgstr ""
-"Ypicallytay, eturnsray away ewnay istlay atthay isway ethay oncatenationcay ofway Argsway.\n"
-"\n"
-"  Eachway Argway inway Argsway ustmay ebay away operpray istlay exceptway ethay astlay oneway, ichwhay\n"
-"  aymay ebay anyway objectway.  Ethay unctionfay isway otnay estructiveday: orfay allway utbay ethay\n"
-"  astlay Argway, itsway istlay ucturestray isway opiedcay.  Ethay astlay argumentway isway otnay\n"
-"  opiedcay; itway ecomesbay ethay drcay ofway ethay inalfay ottedday airpay ofway ethay\n"
-"  oncatenationcay ofway ethay ecedingpray istslay, orway isway eturnedray irectlyday ifway\n"
-"  erethay areway onay ecedingpray onnay-emptyway istslay.  Inway ethay atterlay asecay, ifway ethay\n"
-"  astlay Argway isway otnay away istlay, ethay eturnedray aluevay isway otnay away istlay eitherway."
+"Ypicallytay, eturnsray away ewnay istlay atthay isway ethay oncatenationcay "
+"ofway Argsway.\n"
+"\n"
+"  Eachway Argway inway Argsway ustmay ebay away operpray istlay exceptway "
+"ethay astlay oneway, ichwhay\n"
+"  aymay ebay anyway objectway.  Ethay unctionfay isway otnay estructiveday: "
+"orfay allway utbay ethay\n"
+"  astlay Argway, itsway istlay ucturestray isway opiedcay.  Ethay astlay "
+"argumentway isway otnay\n"
+"  opiedcay; itway ecomesbay ethay drcay ofway ethay inalfay ottedday airpay "
+"ofway ethay\n"
+"  oncatenationcay ofway ethay ecedingpray istslay, orway isway eturnedray "
+"irectlyday ifway\n"
+"  erethay areway onay ecedingpray onnay-emptyway istslay.  Inway ethay "
+"atterlay asecay, ifway ethay\n"
+"  astlay Argway isway otnay away istlay, ethay eturnedray aluevay isway "
+"otnay away istlay eitherway."
 
 #: src/code/list.lisp
 msgid "~S is not a list."
@@ -3746,7 +4239,9 @@ msgstr "Eturnsray away ewnay istlay EQUAL utbay otnay EQ otay istlay"
 
 #: src/code/list.lisp
 msgid "Returns a new association list equal to alist, constructed in space"
-msgstr "Eturnsray away ewnay associationway istlay equalway otay alistway, onstructedcay inway acespay"
+msgstr ""
+"Eturnsray away ewnay associationway istlay equalway otay alistway, "
+"onstructedcay inway acespay"
 
 #: src/code/list.lisp
 msgid "Copy-Tree recursively copys trees of conses."
@@ -3758,7 +4253,9 @@ msgstr "Eturnsray (appendway (everseray x) y)"
 
 #: src/code/list.lisp
 msgid "Concatenates the lists given as arguments (by changing them)"
-msgstr "Oncatenatescay ethay istslay ivengay asway argumentsway (ybay angingchay emthay)"
+msgstr ""
+"Oncatenatescay ethay istslay ivengay asway argumentsway (ybay angingchay "
+"emthay)"
 
 #: src/code/list.lisp
 msgid "Argument is not a list -- ~S."
@@ -3777,12 +4274,15 @@ msgid ""
 "Returns a new list the same as List without the last N conses.\n"
 "   List must not be circular."
 msgstr ""
-"Eturnsray away ewnay istlay ethay amesay asway Istlay ithoutway ethay astlay N onsescay.\n"
+"Eturnsray away ewnay istlay ethay amesay asway Istlay ithoutway ethay astlay "
+"N onsescay.\n"
 "   Istlay ustmay otnay ebay ircularcay."
 
 #: src/code/list.lisp
 msgid "Modifies List to remove the last N conses. List must not be circular."
-msgstr "Odifiesmay Istlay otay emoveray ethay astlay N onsescay. Istlay ustmay otnay ebay ircularcay."
+msgstr ""
+"Odifiesmay Istlay otay emoveray ethay astlay N onsescay. Istlay ustmay otnay "
+"ebay ircularcay."
 
 #: src/code/list.lisp
 msgid ""
@@ -3790,8 +4290,10 @@ msgid ""
 "   Object.  If Object is not a tail of List, a copy of List is returned.\n"
 "   List must be a proper list or a dotted list."
 msgstr ""
-"Eturnsray away ewnay istlay, osewhay elementsway areway osethay ofway Istlay atthay appearway eforebay\n"
-"   Objectway.  Ifway Objectway isway otnay away ailtay ofway Istlay, away opycay ofway Istlay isway eturnedray.\n"
+"Eturnsray away ewnay istlay, osewhay elementsway areway osethay ofway Istlay "
+"atthay appearway eforebay\n"
+"   Objectway.  Ifway Objectway isway otnay away ailtay ofway Istlay, away "
+"opycay ofway Istlay isway eturnedray.\n"
 "   Istlay ustmay ebay away operpray istlay orway away ottedday istlay."
 
 #: src/code/list.lisp
@@ -3804,7 +4306,8 @@ msgstr "Angeschay ethay drcay ofway x otay y andway eturnsray ethay ewnay x."
 
 #: src/code/list.lisp
 msgid "Sets the Nth element of List (zero based) to Newval."
-msgstr "Etssay ethay Thnay elementway ofway Istlay (erozay asedbay) otay Ewvalnay."
+msgstr ""
+"Etssay ethay Thnay elementway ofway Istlay (erozay asedbay) otay Ewvalnay."
 
 #: src/code/list.lisp
 msgid "~S is too large an index for SETF of NTH."
@@ -3819,12 +4322,15 @@ msgid ""
 "Builds a new function that returns T whenever FUNCTION returns NIL and\n"
 "   NIL whenever FUNCTION returns T."
 msgstr ""
-"Uildsbay away ewnay unctionfay atthay eturnsray T eneverwhay FUNCTION eturnsray NIL andway\n"
+"Uildsbay away ewnay unctionfay atthay eturnsray T eneverwhay FUNCTION "
+"eturnsray NIL andway\n"
 "   NIL eneverwhay FUNCTION eturnsray T."
 
 #: src/code/list.lisp
 msgid "Builds a function that always returns VALUE, and posisbly MORE-VALUES."
-msgstr "Uildsbay away unctionfay atthay alwaysway eturnsray VALUE, andway osisblypay MORE-VALUES."
+msgstr ""
+"Uildsbay away unctionfay atthay alwaysway eturnsray VALUE, andway osisblypay "
+"MORE-VALUES."
 
 #: src/code/list.lisp
 msgid "Substitutes new for subtrees matching old."
@@ -3832,19 +4338,25 @@ msgstr "Ubstitutessay ewnay orfay ubtreessay atchingmay oldway."
 
 #: src/code/list.lisp
 msgid "Substitutes new for subtrees for which test is true."
-msgstr "Ubstitutessay ewnay orfay ubtreessay orfay ichwhay esttay isway uetray."
+msgstr ""
+"Ubstitutessay ewnay orfay ubtreessay orfay ichwhay esttay isway uetray."
 
 #: src/code/list.lisp
 msgid "Substitutes new for subtrees for which test is false."
-msgstr "Ubstitutessay ewnay orfay ubtreessay orfay ichwhay esttay isway alsefay."
+msgstr ""
+"Ubstitutessay ewnay orfay ubtreessay orfay ichwhay esttay isway alsefay."
 
 #: src/code/list.lisp
 msgid "Substitutes new for subtrees of tree for which test is true."
-msgstr "Ubstitutessay ewnay orfay ubtreessay ofway eetray orfay ichwhay esttay isway uetray."
+msgstr ""
+"Ubstitutessay ewnay orfay ubtreessay ofway eetray orfay ichwhay esttay isway "
+"uetray."
 
 #: src/code/list.lisp
 msgid "Substitutes new for subtrees of tree for which test is false."
-msgstr "Ubstitutessay ewnay orfay ubtreessay ofway eetray orfay ichwhay esttay isway alsefay."
+msgstr ""
+"Ubstitutessay ewnay orfay ubtreessay ofway eetray orfay ichwhay esttay isway "
+"alsefay."
 
 #: src/code/list.lisp
 msgid "Substitutes from alist into tree nondestructively."
@@ -3855,32 +4367,38 @@ msgid ""
 "Returns tail of list beginning with first element satisfying EQLity,\n"
 "   :test, or :test-not with a given item."
 msgstr ""
-"Eturnsray ailtay ofway istlay eginningbay ithway irstfay elementway atisfyingsay Eqlityway,\n"
+"Eturnsray ailtay ofway istlay eginningbay ithway irstfay elementway "
+"atisfyingsay Eqlityway,\n"
 "   :esttay, orway :esttay-otnay ithway away ivengay itemway."
 
 #: src/code/list.lisp
 msgid ""
 "Returns tail of list beginning with first element satisfying test(element)"
 msgstr ""
-"Eturnsray ailtay ofway istlay eginningbay ithway irstfay elementway atisfyingsay esttay(elementway)"
+"Eturnsray ailtay ofway istlay eginningbay ithway irstfay elementway "
+"atisfyingsay esttay(elementway)"
 
 #: src/code/list.lisp
 msgid ""
 "Returns tail of list beginning with first element not satisfying test(el)"
 msgstr ""
-"Eturnsray ailtay ofway istlay eginningbay ithway irstfay elementway otnay atisfyingsay esttay(elway)"
+"Eturnsray ailtay ofway istlay eginningbay ithway irstfay elementway otnay "
+"atisfyingsay esttay(elway)"
 
 #: src/code/list.lisp
 msgid ""
 "Returns true if Object is the same as some tail of List, otherwise\n"
 "   returns false. List must be a proper list or a dotted list."
 msgstr ""
-"Eturnsray uetray ifway Objectway isway ethay amesay asway omesay ailtay ofway Istlay, otherwiseway\n"
-"   eturnsray alsefay. Istlay ustmay ebay away operpray istlay orway away ottedday istlay."
+"Eturnsray uetray ifway Objectway isway ethay amesay asway omesay ailtay "
+"ofway Istlay, otherwiseway\n"
+"   eturnsray alsefay. Istlay ustmay ebay away operpray istlay orway away "
+"ottedday istlay."
 
 #: src/code/list.lisp
 msgid "Add item to list unless it is already a member"
-msgstr "Addway itemway otay istlay unlessway itway isway alreadyway away embermay"
+msgstr ""
+"Addway itemway otay istlay unlessway itway isway alreadyway away embermay"
 
 #: src/code/list.lisp
 msgid "Returns the union of list1 and list2."
@@ -3900,50 +4418,65 @@ msgstr "Eturnsray ethay intersectionway ofway istlay1 andway istlay2."
 
 #: src/code/list.lisp
 msgid "Destructively returns the intersection of list1 and list2."
-msgstr "Estructivelyday eturnsray ethay intersectionway ofway istlay1 andway istlay2."
+msgstr ""
+"Estructivelyday eturnsray ethay intersectionway ofway istlay1 andway istlay2."
 
 #: src/code/list.lisp
 msgid "Returns the elements of list1 which are not in list2."
-msgstr "Eturnsray ethay elementsway ofway istlay1 ichwhay areway otnay inway istlay2."
+msgstr ""
+"Eturnsray ethay elementsway ofway istlay1 ichwhay areway otnay inway istlay2."
 
 #: src/code/list.lisp
 msgid "Destructively returns the elements of list1 which are not in list2."
-msgstr "Estructivelyday eturnsray ethay elementsway ofway istlay1 ichwhay areway otnay inway istlay2."
+msgstr ""
+"Estructivelyday eturnsray ethay elementsway ofway istlay1 ichwhay areway "
+"otnay inway istlay2."
 
 #: src/code/list.lisp
 msgid "Return new list of elements appearing exactly once in LIST1 and LIST2."
-msgstr "Eturnray ewnay istlay ofway elementsway appearingway exactlyway onceway inway LIST1 andway LIST2."
+msgstr ""
+"Eturnray ewnay istlay ofway elementsway appearingway exactlyway onceway "
+"inway LIST1 andway LIST2."
 
 #: src/code/list.lisp
 msgid ""
 "Destructively return a list with elements which appear but once in LIST1\n"
 "   and LIST2."
 msgstr ""
-"Estructivelyday eturnray away istlay ithway elementsway ichwhay appearway utbay onceway inway LIST1\n"
+"Estructivelyday eturnray away istlay ithway elementsway ichwhay appearway "
+"utbay onceway inway LIST1\n"
 "   andway LIST2."
 
 #: src/code/list.lisp
 msgid "Returns T if every element in list1 is also in list2."
-msgstr "Eturnsray T ifway everyway elementway inway istlay1 isway alsoway inway istlay2."
+msgstr ""
+"Eturnsray T ifway everyway elementway inway istlay1 isway alsoway inway "
+"istlay2."
 
 #: src/code/list.lisp
 msgid "Construct a new alist by adding the pair (key . datum) to alist"
-msgstr "Onstructcay away ewnay alistway ybay addingway ethay airpay (eykay . atumday) otay alistway"
+msgstr ""
+"Onstructcay away ewnay alistway ybay addingway ethay airpay (eykay . "
+"atumday) otay alistway"
 
 #: src/code/list.lisp
 msgid "Construct an association list from keys and data (adding to alist)"
-msgstr "Onstructcay anway associationway istlay omfray eyskay andway ataday (addingway otay alistway)"
+msgstr ""
+"Onstructcay anway associationway istlay omfray eyskay andway ataday "
+"(addingway otay alistway)"
 
 #: src/code/list.lisp
 msgid "The lists of keys and data are of unequal length."
-msgstr "Ethay istslay ofway eyskay andway ataday areway ofway unequalway engthlay."
+msgstr ""
+"Ethay istslay ofway eyskay andway ataday areway ofway unequalway engthlay."
 
 #: src/code/list.lisp
 msgid ""
 "Returns the cons in alist whose car is equal (by a given test or EQL) to\n"
 "   the Item."
 msgstr ""
-"Eturnsray ethay onscay inway alistway osewhay arcay isway equalway (ybay away ivengay esttay orway EQL) otay\n"
+"Eturnsray ethay onscay inway alistway osewhay arcay isway equalway (ybay "
+"away ivengay esttay orway EQL) otay\n"
 "   ethay Itemway."
 
 #: src/code/list.lisp
@@ -3951,23 +4484,28 @@ msgid ""
 "Returns the first cons in alist whose car satisfies the Predicate.  If\n"
 "   key is supplied, apply it to the car of each cons before testing."
 msgstr ""
-"Eturnsray ethay irstfay onscay inway alistway osewhay arcay atisfiessay ethay Edicatepray.  Ifway\n"
-"   eykay isway uppliedsay, applyway itway otay ethay arcay ofway eachway onscay eforebay estingtay."
+"Eturnsray ethay irstfay onscay inway alistway osewhay arcay atisfiessay "
+"ethay Edicatepray.  Ifway\n"
+"   eykay isway uppliedsay, applyway itway otay ethay arcay ofway eachway "
+"onscay eforebay estingtay."
 
 #: src/code/list.lisp
 msgid ""
 "Returns the first cons in alist whose car does not satisfiy the Predicate.\n"
 "  If key is supplied, apply it to the car of each cons before testing."
 msgstr ""
-"Eturnsray ethay irstfay onscay inway alistway osewhay arcay oesday otnay atisfiysay ethay Edicatepray.\n"
-"  Ifway eykay isway uppliedsay, applyway itway otay ethay arcay ofway eachway onscay eforebay estingtay."
+"Eturnsray ethay irstfay onscay inway alistway osewhay arcay oesday otnay "
+"atisfiysay ethay Edicatepray.\n"
+"  Ifway eykay isway uppliedsay, applyway itway otay ethay arcay ofway "
+"eachway onscay eforebay estingtay."
 
 #: src/code/list.lisp
 msgid ""
 "Returns the cons in alist whose cdr is equal (by a given test or EQL) to\n"
 "   the Item."
 msgstr ""
-"Eturnsray ethay onscay inway alistway osewhay drcay isway equalway (ybay away ivengay esttay orway EQL) otay\n"
+"Eturnsray ethay onscay inway alistway osewhay drcay isway equalway (ybay "
+"away ivengay esttay orway EQL) otay\n"
 "   ethay Itemway."
 
 #: src/code/list.lisp
@@ -3975,46 +4513,56 @@ msgid ""
 "Returns the first cons in alist whose cdr satisfies the Predicate.  If key\n"
 "  is supplied, apply it to the cdr of each cons before testing."
 msgstr ""
-"Eturnsray ethay irstfay onscay inway alistway osewhay drcay atisfiessay ethay Edicatepray.  Ifway eykay\n"
-"  isway uppliedsay, applyway itway otay ethay drcay ofway eachway onscay eforebay estingtay."
+"Eturnsray ethay irstfay onscay inway alistway osewhay drcay atisfiessay "
+"ethay Edicatepray.  Ifway eykay\n"
+"  isway uppliedsay, applyway itway otay ethay drcay ofway eachway onscay "
+"eforebay estingtay."
 
 #: src/code/list.lisp
 msgid ""
 "Returns the first cons in alist whose cdr does not satisfy the Predicate.\n"
 "  If key is supplied, apply it to the cdr of each cons before testing."
 msgstr ""
-"Eturnsray ethay irstfay onscay inway alistway osewhay drcay oesday otnay atisfysay ethay Edicatepray.\n"
-"  Ifway eykay isway uppliedsay, applyway itway otay ethay drcay ofway eachway onscay eforebay estingtay."
+"Eturnsray ethay irstfay onscay inway alistway osewhay drcay oesday otnay "
+"atisfysay ethay Edicatepray.\n"
+"  Ifway eykay isway uppliedsay, applyway itway otay ethay drcay ofway "
+"eachway onscay eforebay estingtay."
 
 #: src/code/list.lisp
 msgid ""
 "This function is called by mapc, mapcar, mapcan, mapl, maplist, and mapcon.\n"
-"  It Maps function over the arglists in the appropriate way. It is done "
-"when any\n"
+"  It Maps function over the arglists in the appropriate way. It is done when "
+"any\n"
 "  of the arglists runs out.  Until then, it CDRs down the arglists calling "
 "the\n"
 "  function and accumulating results as desired."
 msgstr ""
-"Isthay unctionfay isway alledcay ybay apcmay, apcarmay, apcanmay, aplmay, aplistmay, andway apconmay.\n"
-"  Itway Apsmay unctionfay overway ethay arglistsway inway ethay appropriateway ayway. Itway isway oneday "
-"enwhay anyway\n"
-"  ofway ethay arglistsway unsray outway.  Untilway enthay, itway Drscay ownday ethay arglistsway allingcay "
-"ethay\n"
+"Isthay unctionfay isway alledcay ybay apcmay, apcarmay, apcanmay, aplmay, "
+"aplistmay, andway apconmay.\n"
+"  Itway Apsmay unctionfay overway ethay arglistsway inway ethay "
+"appropriateway ayway. Itway isway oneday enwhay anyway\n"
+"  ofway ethay arglistsway unsray outway.  Untilway enthay, itway Drscay "
+"ownday ethay arglistsway allingcay ethay\n"
 "  unctionfay andway accumulatingway esultsray asway esiredday."
 
 #: src/code/list.lisp
 msgid ""
 "Applies fn to successive elements of lists, returns its second argument."
 msgstr ""
-"Appliesway nfay otay uccessivesay elementsway ofway istslay, eturnsray itsway econdsay argumentway."
+"Appliesway nfay otay uccessivesay elementsway ofway istslay, eturnsray "
+"itsway econdsay argumentway."
 
 #: src/code/list.lisp
 msgid "Applies fn to successive elements of list, returns list of results."
-msgstr "Appliesway nfay otay uccessivesay elementsway ofway istlay, eturnsray istlay ofway esultsray."
+msgstr ""
+"Appliesway nfay otay uccessivesay elementsway ofway istlay, eturnsray istlay "
+"ofway esultsray."
 
 #: src/code/list.lisp
 msgid "Applies fn to successive elements of list, returns NCONC of results."
-msgstr "Appliesway nfay otay uccessivesay elementsway ofway istlay, eturnsray NCONC ofway esultsray."
+msgstr ""
+"Appliesway nfay otay uccessivesay elementsway ofway istlay, eturnsray NCONC "
+"ofway esultsray."
 
 #: src/code/list.lisp
 msgid "Applies fn to successive CDRs of list, returns ()."
@@ -4022,39 +4570,54 @@ msgstr "Appliesway nfay otay uccessivesay Drscay ofway istlay, eturnsray ()."
 
 #: src/code/list.lisp
 msgid "Applies fn to successive CDRs of list, returns list of results."
-msgstr "Appliesway nfay otay uccessivesay Drscay ofway istlay, eturnsray istlay ofway esultsray."
+msgstr ""
+"Appliesway nfay otay uccessivesay Drscay ofway istlay, eturnsray istlay "
+"ofway esultsray."
 
 #: src/code/list.lisp
 msgid "Applies fn to successive CDRs of lists, returns NCONC of results."
-msgstr "Appliesway nfay otay uccessivesay Drscay ofway istslay, eturnsray NCONC ofway esultsray."
+msgstr ""
+"Appliesway nfay otay uccessivesay Drscay ofway istslay, eturnsray NCONC "
+"ofway esultsray."
 
 #: src/code/list.lisp
 msgid "Returns tail of list beginning with first element eq to item"
-msgstr "Eturnsray ailtay ofway istlay eginningbay ithway irstfay elementway eqway otay itemway"
+msgstr ""
+"Eturnsray ailtay ofway istlay eginningbay ithway irstfay elementway eqway "
+"otay itemway"
 
 #: src/code/list.lisp
 msgid "Return the first pair of alist where item EQ the key of pair"
-msgstr "Eturnray ethay irstfay airpay ofway alistway erewhay itemway EQ ethay eykay ofway airpay"
+msgstr ""
+"Eturnray ethay irstfay airpay ofway alistway erewhay itemway EQ ethay eykay "
+"ofway airpay"
 
 #: src/code/list.lisp
 msgid "Returns list with all elements with all elements EQ to ITEM deleted."
-msgstr "Eturnsray istlay ithway allway elementsway ithway allway elementsway EQ otay ITEM eletedday."
+msgstr ""
+"Eturnsray istlay ithway allway elementsway ithway allway elementsway EQ otay "
+"ITEM eletedday."
 
 #: src/code/seq.lisp
 msgid ""
 "Returns a list of the Nth element of each of the sequences.  Used by MAP\n"
 "   and friends."
 msgstr ""
-"Eturnsray away istlay ofway ethay Thnay elementway ofway eachway ofway ethay equencessay.  Usedway ybay MAP\n"
+"Eturnsray away istlay ofway ethay Thnay elementway ofway eachway ofway ethay "
+"equencessay.  Usedway ybay MAP\n"
 "   andway iendsfray."
 
 #: src/code/seq.lisp
 msgid "Returns a sequence of the same type as SEQUENCE and the given LENGTH."
-msgstr "Eturnsray away equencesay ofway ethay amesay ypetay asway SEQUENCE andway ethay ivengay LENGTH."
+msgstr ""
+"Eturnsray away equencesay ofway ethay amesay ypetay asway SEQUENCE andway "
+"ethay ivengay LENGTH."
 
 #: src/code/seq.lisp
 msgid "Returns the broad class of which TYPE is a specific subclass."
-msgstr "Eturnsray ethay oadbray assclay ofway ichwhay TYPE isway away ecificspay ubclasssay."
+msgstr ""
+"Eturnsray ethay oadbray assclay ofway ichwhay TYPE isway away ecificspay "
+"ubclasssay."
 
 #: src/code/seq.lisp
 msgid "NIL output type invalid for this sequence function."
@@ -4082,7 +4645,8 @@ msgstr "Eturnsray ethay elementway ofway SEQUENCE ecifiedspay ybay INDEX."
 
 #: src/code/seq.lisp
 msgid "Store NEWVAL as the component of SEQUENCE specified by INDEX."
-msgstr "Toresay NEWVAL asway ethay omponentcay ofway SEQUENCE ecifiedspay ybay INDEX."
+msgstr ""
+"Toresay NEWVAL asway ethay omponentcay ofway SEQUENCE ecifiedspay ybay INDEX."
 
 #: src/code/seq.lisp
 msgid "Returns an integer that is the length of SEQUENCE."
@@ -4109,7 +4673,8 @@ msgid ""
 "Returns a sequence of the given Type and Length, with elements initialized\n"
 "  to :Initial-Element."
 msgstr ""
-"Eturnsray away equencesay ofway ethay ivengay Ypetay andway Engthlay, ithway elementsway initializedway\n"
+"Eturnsray away equencesay ofway ethay ivengay Ypetay andway Engthlay, ithway "
+"elementsway initializedway\n"
 "  otay :Initialway-Elementway."
 
 #: src/code/seq.lisp
@@ -4129,12 +4694,16 @@ msgid ""
 "Returns a copy of a subsequence of SEQUENCE starting with element number \n"
 "   START and continuing to the end of SEQUENCE or the optional END."
 msgstr ""
-"Eturnsray away opycay ofway away ubsequencesay ofway SEQUENCE tartingsay ithway elementway umbernay \n"
-"   START andway ontinuingcay otay ethay endway ofway SEQUENCE orway ethay optionalway END."
+"Eturnsray away opycay ofway away ubsequencesay ofway SEQUENCE tartingsay "
+"ithway elementway umbernay \n"
+"   START andway ontinuingcay otay ethay endway ofway SEQUENCE orway ethay "
+"optionalway END."
 
 #: src/code/seq.lisp
 msgid "Returns a copy of SEQUENCE which is EQUAL to SEQUENCE but not EQ."
-msgstr "Eturnsray away opycay ofway SEQUENCE ichwhay isway EQUAL otay SEQUENCE utbay otnay EQ."
+msgstr ""
+"Eturnsray away opycay ofway SEQUENCE ichwhay isway EQUAL otay SEQUENCE utbay "
+"otnay EQ."
 
 #: src/code/seq.lisp
 msgid "Replace the specified elements of SEQUENCE with ITEM."
@@ -4145,21 +4714,24 @@ msgid ""
 "The target sequence is destructively modified by copying successive\n"
 "   elements into it from the source sequence."
 msgstr ""
-"Ethay argettay equencesay isway estructivelyday odifiedmay ybay opyingcay uccessivesay\n"
+"Ethay argettay equencesay isway estructivelyday odifiedmay ybay opyingcay "
+"uccessivesay\n"
 "   elementsway intoway itway omfray ethay ourcesay equencesay."
 
 #: src/code/seq.lisp
 msgid ""
 "Returns a new sequence containing the same elements but in reverse order."
 msgstr ""
-"Eturnsray away ewnay equencesay ontainingcay ethay amesay elementsway utbay inway everseray orderway."
+"Eturnsray away ewnay equencesay ontainingcay ethay amesay elementsway utbay "
+"inway everseray orderway."
 
 #: src/code/seq.lisp
 msgid ""
 "Returns a sequence of the same elements in reverse order; the argument\n"
 "   is destroyed."
 msgstr ""
-"Eturnsray away equencesay ofway ethay amesay elementsway inway everseray orderway; ethay argumentway\n"
+"Eturnsray away equencesay ofway ethay amesay elementsway inway everseray "
+"orderway; ethay argumentway\n"
 "   isway estroyedday."
 
 #: src/code/seq.lisp
@@ -4168,8 +4740,10 @@ msgid ""
 "  which shares no structure with the original argument sequences of the\n"
 "  specified OUTPUT-TYPE-SPEC."
 msgstr ""
-"Eturnsray away ewnay equencesay ofway allway ethay argumentway equencessay oncatenatedcay ogethertay\n"
-"  ichwhay aresshay onay ucturestray ithway ethay originalway argumentway equencessay ofway ethay\n"
+"Eturnsray away ewnay equencesay ofway allway ethay argumentway equencessay "
+"oncatenatedcay ogethertay\n"
+"  ichwhay aresshay onay ucturestray ithway ethay originalway argumentway "
+"equencessay ofway ethay\n"
 "  ecifiedspay OUTPUT-TYPE-SPEC."
 
 #: src/code/seq.lisp
@@ -4179,9 +4753,10 @@ msgid ""
 "FUNCTION\n"
 "   to element i of each of the argument sequences."
 msgstr ""
-"FUNCTION ustmay aketay asway anymay argumentsway asway erethay areway equencessay ovidedpray.  Ethay \n"
-"   esultray isway away equencesay uchsay atthay elementway i isway ethay esultray ofway applyingway "
-"FUNCTION\n"
+"FUNCTION ustmay aketay asway anymay argumentsway asway erethay areway "
+"equencessay ovidedpray.  Ethay \n"
+"   esultray isway away equencesay uchsay atthay elementway i isway ethay "
+"esultray ofway applyingway FUNCTION\n"
 "   otay elementway i ofway eachway ofway ethay argumentway equencessay."
 
 #: src/code/seq.lisp
@@ -4190,9 +4765,12 @@ msgid ""
 "   possibly to those with index 1, and so on.  SOME returns the first \n"
 "   non-() value encountered, or () if the end of a sequence is reached."
 msgstr ""
-"PREDICATE isway appliedway otay ethay elementsway ithway indexway 0 ofway ethay equencessay, enthay \n"
-"   ossiblypay otay osethay ithway indexway 1, andway osay onway.  SOME eturnsray ethay irstfay \n"
-"   onnay-() aluevay encounteredway, orway () ifway ethay endway ofway away equencesay isway eachedray."
+"PREDICATE isway appliedway otay ethay elementsway ithway indexway 0 ofway "
+"ethay equencessay, enthay \n"
+"   ossiblypay otay osethay ithway indexway 1, andway osay onway.  SOME "
+"eturnsray ethay irstfay \n"
+"   onnay-() aluevay encounteredway, orway () ifway ethay endway ofway away "
+"equencesay isway eachedray."
 
 #: src/code/seq.lisp
 msgid ""
@@ -4201,9 +4779,12 @@ msgid ""
 "   as any invocation of PREDICATE returns (), or T if every invocation\n"
 "   is non-()."
 msgstr ""
-"PREDICATE isway appliedway otay ethay elementsway ithway indexway 0 ofway ethay equencessay, enthay\n"
-"   ossiblypay otay osethay ithway indexway 1, andway osay onway.  EVERY eturnsray () asway oonsay\n"
-"   asway anyway invocationway ofway PREDICATE eturnsray (), orway T ifway everyway invocationway\n"
+"PREDICATE isway appliedway otay ethay elementsway ithway indexway 0 ofway "
+"ethay equencessay, enthay\n"
+"   ossiblypay otay osethay ithway indexway 1, andway osay onway.  EVERY "
+"eturnsray () asway oonsay\n"
+"   asway anyway invocationway ofway PREDICATE eturnsray (), orway T ifway "
+"everyway invocationway\n"
 "   isway onnay-()."
 
 #: src/code/seq.lisp
@@ -4213,9 +4794,12 @@ msgid ""
 "   as any invocation of PREDICATE returns a non-() value, or T if the end\n"
 "   of a sequence is reached."
 msgstr ""
-"PREDICATE isway appliedway otay ethay elementsway ithway indexway 0 ofway ethay equencessay, enthay \n"
-"   ossiblypay otay osethay ithway indexway 1, andway osay onway.  NOTANY eturnsray () asway oonsay\n"
-"   asway anyway invocationway ofway PREDICATE eturnsray away onnay-() aluevay, orway T ifway ethay endway\n"
+"PREDICATE isway appliedway otay ethay elementsway ithway indexway 0 ofway "
+"ethay equencessay, enthay \n"
+"   ossiblypay otay osethay ithway indexway 1, andway osay onway.  NOTANY "
+"eturnsray () asway oonsay\n"
+"   asway anyway invocationway ofway PREDICATE eturnsray away onnay-() "
+"aluevay, orway T ifway ethay endway\n"
 "   ofway away equencesay isway eachedray."
 
 #: src/code/seq.lisp
@@ -4225,9 +4809,12 @@ msgid ""
 "   as any invocation of PREDICATE returns (), or () if every invocation\n"
 "   is non-()."
 msgstr ""
-"PREDICATE isway appliedway otay ethay elementsway ithway indexway 0 ofway ethay equencessay, enthay\n"
-"   ossiblypay otay osethay ithway indexway 1, andway osay onway.  NOTEVERY eturnsray T asway oonsay\n"
-"   asway anyway invocationway ofway PREDICATE eturnsray (), orway () ifway everyway invocationway\n"
+"PREDICATE isway appliedway otay ethay elementsway ithway indexway 0 ofway "
+"ethay equencessay, enthay\n"
+"   ossiblypay otay osethay ithway indexway 1, andway osay onway.  NOTEVERY "
+"eturnsray T asway oonsay\n"
+"   asway anyway invocationway ofway PREDICATE eturnsray (), orway () ifway "
+"everyway invocationway\n"
 "   isway onnay-()."
 
 #: src/code/seq.lisp
@@ -4235,12 +4822,15 @@ msgid ""
 "The specified Sequence is ``reduced'' using the given Function.\n"
 "  See manual for details."
 msgstr ""
-"Ethay ecifiedspay Equencesay isway ``educedray'' usingway ethay ivengay Unctionfay.\n"
+"Ethay ecifiedspay Equencesay isway ``educedray'' usingway ethay ivengay "
+"Unctionfay.\n"
 "  Eesay anualmay orfay etailsday."
 
 #: src/code/seq.lisp
 msgid "Coerces the Object to an object of type Output-Type-Spec."
-msgstr "Oercescay ethay Objectway otay anway objectway ofway ypetay Outputway-Ypetay-Ecspay."
+msgstr ""
+"Oercescay ethay Objectway otay anway objectway ofway ypetay Outputway-Ypetay-"
+"Ecspay."
 
 #: src/code/seq.lisp
 msgid "~S can't be converted to type ~S."
@@ -4251,7 +4841,8 @@ msgid ""
 "Returns a sequence formed by destructively removing the specified Item from\n"
 "  the given Sequence."
 msgstr ""
-"Eturnsray away equencesay ormedfay ybay estructivelyday emovingray ethay ecifiedspay Itemway omfray\n"
+"Eturnsray away equencesay ormedfay ybay estructivelyday emovingray ethay "
+"ecifiedspay Itemway omfray\n"
 "  ethay ivengay Equencesay."
 
 #: src/code/seq.lisp
@@ -4259,7 +4850,8 @@ msgid ""
 "Returns a sequence formed by destructively removing the elements satisfying\n"
 "  the specified Predicate from the given Sequence."
 msgstr ""
-"Eturnsray away equencesay ormedfay ybay estructivelyday emovingray ethay elementsway atisfyingsay\n"
+"Eturnsray away equencesay ormedfay ybay estructivelyday emovingray ethay "
+"elementsway atisfyingsay\n"
 "  ethay ecifiedspay Edicatepray omfray ethay ivengay Equencesay."
 
 #: src/code/seq.lisp
@@ -4267,7 +4859,8 @@ msgid ""
 "Returns a sequence formed by destructively removing the elements not\n"
 "  satisfying the specified Predicate from the given Sequence."
 msgstr ""
-"Eturnsray away equencesay ormedfay ybay estructivelyday emovingray ethay elementsway otnay\n"
+"Eturnsray away equencesay ormedfay ybay estructivelyday emovingray ethay "
+"elementsway otnay\n"
 "  atisfyingsay ethay ecifiedspay Edicatepray omfray ethay ivengay Equencesay."
 
 #: src/code/seq.lisp
@@ -4275,7 +4868,8 @@ msgid ""
 "Returns a copy of SEQUENCE with elements satisfying the test (default is\n"
 "   EQL) with ITEM removed."
 msgstr ""
-"Eturnsray away opycay ofway SEQUENCE ithway elementsway atisfyingsay ethay esttay (efaultday isway\n"
+"Eturnsray away opycay ofway SEQUENCE ithway elementsway atisfyingsay ethay "
+"esttay (efaultday isway\n"
 "   EQL) ithway ITEM emovedray."
 
 #: src/code/seq.lisp
@@ -4283,7 +4877,8 @@ msgid ""
 "Returns a copy of sequence with elements such that predicate(element)\n"
 "   is non-null are removed"
 msgstr ""
-"Eturnsray away opycay ofway equencesay ithway elementsway uchsay atthay edicatepray(elementway)\n"
+"Eturnsray away opycay ofway equencesay ithway elementsway uchsay atthay "
+"edicatepray(elementway)\n"
 "   isway onnay-ullnay areway emovedray"
 
 #: src/code/seq.lisp
@@ -4291,7 +4886,8 @@ msgid ""
 "Returns a copy of sequence with elements such that predicate(element)\n"
 "   is null are removed"
 msgstr ""
-"Eturnsray away opycay ofway equencesay ithway elementsway uchsay atthay edicatepray(elementway)\n"
+"Eturnsray away opycay ofway equencesay ithway elementsway uchsay atthay "
+"edicatepray(elementway)\n"
 "   isway ullnay areway emovedray"
 
 #: src/code/seq.lisp
@@ -4303,9 +4899,12 @@ msgid ""
 "\n"
 "   The :TEST-NOT argument is deprecated."
 msgstr ""
-"Ethay elementsway ofway Equencesay areway omparedcay airwisepay, andway ifway anyway wotay atchmay,\n"
-"   ethay oneway occuringway earlierway isway iscardedday, unlessway FROM-END isway uetray, inway\n"
-"   ichwhay asecay ethay oneway aterlay inway ethay equencesay isway iscardedday.  Ethay esultingray\n"
+"Ethay elementsway ofway Equencesay areway omparedcay airwisepay, andway "
+"ifway anyway wotay atchmay,\n"
+"   ethay oneway occuringway earlierway isway iscardedday, unlessway FROM-END "
+"isway uetray, inway\n"
+"   ichwhay asecay ethay oneway aterlay inway ethay equencesay isway "
+"iscardedday.  Ethay esultingray\n"
 "   equencesay isway eturnedray.\n"
 "\n"
 "   Ethay :TEST-NOT argumentway isway eprecatedday."
@@ -4319,9 +4918,10 @@ msgid ""
 "\n"
 "   The :TEST-NOT argument is deprecated."
 msgstr ""
-"Ethay elementsway ofway Equencesay areway examinedway, andway ifway anyway wotay atchmay, oneway isway\n"
-"   iscardedday.  Ethay esultingray equencesay, ichwhay aymay ebay ormedfay ybay estroyingday "
-"ethay\n"
+"Ethay elementsway ofway Equencesay areway examinedway, andway ifway anyway "
+"wotay atchmay, oneway isway\n"
+"   iscardedday.  Ethay esultingray equencesay, ichwhay aymay ebay ormedfay "
+"ybay estroyingday ethay\n"
 "   ivengay equencesay, isway eturnedray.\n"
 "\n"
 "   Ethay :TEST-NOT argumentway isway eprecatedday."
@@ -4332,8 +4932,10 @@ msgid ""
 "  except that all elements equal to Old are replaced with New.  See manual\n"
 "  for details."
 msgstr ""
-"Eturnsray away equencesay ofway ethay amesay indkay asway Equencesay ithway ethay amesay elementsway\n"
-"  exceptway atthay allway elementsway equalway otay Oldway areway eplacedray ithway Ewnay.  Eesay anualmay\n"
+"Eturnsray away equencesay ofway ethay amesay indkay asway Equencesay ithway "
+"ethay amesay elementsway\n"
+"  exceptway atthay allway elementsway equalway otay Oldway areway eplacedray "
+"ithway Ewnay.  Eesay anualmay\n"
 "  orfay etailsday."
 
 #: src/code/seq.lisp
@@ -4342,8 +4944,10 @@ msgid ""
 "  except that all elements satisfying the Test are replaced with New.  See\n"
 "  manual for details."
 msgstr ""
-"Eturnsray away equencesay ofway ethay amesay indkay asway Equencesay ithway ethay amesay elementsway\n"
-"  exceptway atthay allway elementsway atisfyingsay ethay Esttay areway eplacedray ithway Ewnay.  Eesay\n"
+"Eturnsray away equencesay ofway ethay amesay indkay asway Equencesay ithway "
+"ethay amesay elementsway\n"
+"  exceptway atthay allway elementsway atisfyingsay ethay Esttay areway "
+"eplacedray ithway Ewnay.  Eesay\n"
 "  anualmay orfay etailsday."
 
 #: src/code/seq.lisp
@@ -4352,20 +4956,23 @@ msgid ""
 "  except that all elements not satisfying the Test are replaced with New.\n"
 "  See manual for details."
 msgstr ""
-"Eturnsray away equencesay ofway ethay amesay indkay asway Equencesay ithway ethay amesay elementsway\n"
-"  exceptway atthay allway elementsway otnay atisfyingsay ethay Esttay areway eplacedray ithway Ewnay.\n"
+"Eturnsray away equencesay ofway ethay amesay indkay asway Equencesay ithway "
+"ethay amesay elementsway\n"
+"  exceptway atthay allway elementsway otnay atisfyingsay ethay Esttay areway "
+"eplacedray ithway Ewnay.\n"
 "  Eesay anualmay orfay etailsday."
 
 #: src/code/seq.lisp
 msgid ""
 "Returns a sequence of the same kind as Sequence with the same elements\n"
-"  except that all elements equal to Old are replaced with New.  The Sequence"
-"\n"
+"  except that all elements equal to Old are replaced with New.  The "
+"Sequence\n"
 "  may be destroyed.  See manual for details."
 msgstr ""
-"Eturnsray away equencesay ofway ethay amesay indkay asway Equencesay ithway ethay amesay elementsway\n"
-"  exceptway atthay allway elementsway equalway otay Oldway areway eplacedray ithway Ewnay.  Ethay Equencesay"
-"\n"
+"Eturnsray away equencesay ofway ethay amesay indkay asway Equencesay ithway "
+"ethay amesay elementsway\n"
+"  exceptway atthay allway elementsway equalway otay Oldway areway eplacedray "
+"ithway Ewnay.  Ethay Equencesay\n"
 "  aymay ebay estroyedday.  Eesay anualmay orfay etailsday."
 
 #: src/code/seq.lisp
@@ -4374,8 +4981,10 @@ msgid ""
 "   except that all elements satisfying the Test are replaced with New.  The\n"
 "   Sequence may be destroyed.  See manual for details."
 msgstr ""
-"Eturnsray away equencesay ofway ethay amesay indkay asway Equencesay ithway ethay amesay elementsway\n"
-"   exceptway atthay allway elementsway atisfyingsay ethay Esttay areway eplacedray ithway Ewnay.  Ethay\n"
+"Eturnsray away equencesay ofway ethay amesay indkay asway Equencesay ithway "
+"ethay amesay elementsway\n"
+"   exceptway atthay allway elementsway atisfyingsay ethay Esttay areway "
+"eplacedray ithway Ewnay.  Ethay\n"
 "   Equencesay aymay ebay estroyedday.  Eesay anualmay orfay etailsday."
 
 #: src/code/seq.lisp
@@ -4384,8 +4993,10 @@ msgid ""
 "   except that all elements not satisfying the Test are replaced with New.\n"
 "   The Sequence may be destroyed.  See manual for details."
 msgstr ""
-"Eturnsray away equencesay ofway ethay amesay indkay asway Equencesay ithway ethay amesay elementsway\n"
-"   exceptway atthay allway elementsway otnay atisfyingsay ethay Esttay areway eplacedray ithway Ewnay.\n"
+"Eturnsray away equencesay ofway ethay amesay indkay asway Equencesay ithway "
+"ethay amesay elementsway\n"
+"   exceptway atthay allway elementsway otnay atisfyingsay ethay Esttay "
+"areway eplacedray ithway Ewnay.\n"
 "   Ethay Equencesay aymay ebay estroyedday.  Eesay anualmay orfay etailsday."
 
 #: src/code/seq.lisp
@@ -4393,41 +5004,50 @@ msgid ""
 "Returns the zero-origin index of the first element in SEQUENCE\n"
 "   satisfying the test (default is EQL) with the given ITEM"
 msgstr ""
-"Eturnsray ethay erozay-originway indexway ofway ethay irstfay elementway inway SEQUENCE\n"
+"Eturnsray ethay erozay-originway indexway ofway ethay irstfay elementway "
+"inway SEQUENCE\n"
 "   atisfyingsay ethay esttay (efaultday isway EQL) ithway ethay ivengay ITEM"
 
 #: src/code/seq.lisp
 msgid "Returns the zero-origin index of the first element satisfying test(el)"
-msgstr "Eturnsray ethay erozay-originway indexway ofway ethay irstfay elementway atisfyingsay esttay(elway)"
+msgstr ""
+"Eturnsray ethay erozay-originway indexway ofway ethay irstfay elementway "
+"atisfyingsay esttay(elway)"
 
 #: src/code/seq.lisp
 msgid ""
 "Returns the zero-origin index of the first element not satisfying test(el)"
 msgstr ""
-"Eturnsray ethay erozay-originway indexway ofway ethay irstfay elementway otnay atisfyingsay esttay(elway)"
+"Eturnsray ethay erozay-originway indexway ofway ethay irstfay elementway "
+"otnay atisfyingsay esttay(elway)"
 
 #: src/code/seq.lisp
 msgid ""
 "Returns the first element in SEQUENCE satisfying the test (default\n"
 "   is EQL) with the given ITEM"
 msgstr ""
-"Eturnsray ethay irstfay elementway inway SEQUENCE atisfyingsay ethay esttay (efaultday\n"
+"Eturnsray ethay irstfay elementway inway SEQUENCE atisfyingsay ethay esttay "
+"(efaultday\n"
 "   isway EQL) ithway ethay ivengay ITEM"
 
 #: src/code/seq.lisp
 msgid "Returns the first element in SEQUENCE satisfying the test."
-msgstr "Eturnsray ethay irstfay elementway inway SEQUENCE atisfyingsay ethay esttay."
+msgstr ""
+"Eturnsray ethay irstfay elementway inway SEQUENCE atisfyingsay ethay esttay."
 
 #: src/code/seq.lisp
 msgid "Returns the first element in SEQUENCE not satisfying the test."
-msgstr "Eturnsray ethay irstfay elementway inway SEQUENCE otnay atisfyingsay ethay esttay."
+msgstr ""
+"Eturnsray ethay irstfay elementway inway SEQUENCE otnay atisfyingsay ethay "
+"esttay."
 
 #: src/code/seq.lisp
 msgid ""
 "Returns the number of elements in SEQUENCE satisfying a test with ITEM,\n"
 "   which defaults to EQL."
 msgstr ""
-"Eturnsray ethay umbernay ofway elementsway inway SEQUENCE atisfyingsay away esttay ithway ITEM,\n"
+"Eturnsray ethay umbernay ofway elementsway inway SEQUENCE atisfyingsay away "
+"esttay ithway ITEM,\n"
 "   ichwhay efaultsday otay EQL."
 
 #: src/code/seq.lisp
@@ -4436,7 +5056,9 @@ msgstr ":TEST andway :TEST-NOT areway othbay esentpray."
 
 #: src/code/seq.lisp
 msgid "Returns the number of elements in SEQUENCE satisfying TEST(el)."
-msgstr "Eturnsray ethay umbernay ofway elementsway inway SEQUENCE atisfyingsay TEST(elway)."
+msgstr ""
+"Eturnsray ethay umbernay ofway elementsway inway SEQUENCE atisfyingsay TEST"
+"(elway)."
 
 #: src/code/seq.lisp
 msgid ""
@@ -4453,31 +5075,37 @@ msgid ""
 "   :From-End keyword argument is given, then one plus the index of the\n"
 "   rightmost position in which the sequences differ is returned."
 msgstr ""
-"Ethay ecifiedspay ubsequencessay ofway Equencesay1 andway Equencesay2 areway omparedcay\n"
-"   elementway-iseway.  Ifway eythay areway ofway equalway engthlay andway atchmay inway everyway elementway, "
-"ethay\n"
-"   esultray isway NIL.  Otherwiseway, ethay esultray isway away onnay-egativenay integerway, ethay "
-"indexway\n"
-"   ithinway Equencesay1 ofway ethay eftmostlay ositionpay atway ichwhay eythay ailfay otay atchmay; "
-"orway,\n"
-"   ifway oneway isway ortershay anthay andway away atchingmay efixpray ofway ethay otherway, ethay indexway "
-"ithinway\n"
-"   Equencesay1 eyondbay ethay astlay ositionpay estedtay isway eturnedray.  Ifway away onnay-Ilnay\n"
-"   :Omfray-Endway eywordkay argumentway isway ivengay, enthay oneway usplay ethay indexway ofway ethay\n"
-"   ightmostray ositionpay inway ichwhay ethay equencessay ifferday isway eturnedray."
+"Ethay ecifiedspay ubsequencessay ofway Equencesay1 andway Equencesay2 areway "
+"omparedcay\n"
+"   elementway-iseway.  Ifway eythay areway ofway equalway engthlay andway "
+"atchmay inway everyway elementway, ethay\n"
+"   esultray isway NIL.  Otherwiseway, ethay esultray isway away onnay-"
+"egativenay integerway, ethay indexway\n"
+"   ithinway Equencesay1 ofway ethay eftmostlay ositionpay atway ichwhay "
+"eythay ailfay otay atchmay; orway,\n"
+"   ifway oneway isway ortershay anthay andway away atchingmay efixpray ofway "
+"ethay otherway, ethay indexway ithinway\n"
+"   Equencesay1 eyondbay ethay astlay ositionpay estedtay isway eturnedray.  "
+"Ifway away onnay-Ilnay\n"
+"   :Omfray-Endway eywordkay argumentway isway ivengay, enthay oneway usplay "
+"ethay indexway ofway ethay\n"
+"   ightmostray ositionpay inway ichwhay ethay equencessay ifferday isway "
+"eturnedray."
 
 #: src/code/seq.lisp
 msgid ""
 "A search is conducted using EQL for the first subsequence of sequence2 \n"
-"   which element-wise matches sequence1.  If there is such a subsequence in "
-"\n"
+"   which element-wise matches sequence1.  If there is such a subsequence "
+"in \n"
 "   sequence2, the index of the its leftmost element is returned; \n"
 "   otherwise () is returned."
 msgstr ""
-"Away earchsay isway onductedcay usingway EQL orfay ethay irstfay ubsequencesay ofway equencesay2 \n"
-"   ichwhay elementway-iseway atchesmay equencesay1.  Ifway erethay isway uchsay away ubsequencesay inway "
-"\n"
-"   equencesay2, ethay indexway ofway ethay itsway eftmostlay elementway isway eturnedray; \n"
+"Away earchsay isway onductedcay usingway EQL orfay ethay irstfay "
+"ubsequencesay ofway equencesay2 \n"
+"   ichwhay elementway-iseway atchesmay equencesay1.  Ifway erethay isway "
+"uchsay away ubsequencesay inway \n"
+"   equencesay2, ethay indexway ofway ethay itsway eftmostlay elementway "
+"isway eturnedray; \n"
 "   otherwiseway () isway eturnedray."
 
 #: src/code/string.lisp
@@ -4488,10 +5116,14 @@ msgid ""
 "  tests for the low (trailing surrogate).  A value of :Any or Nil\n"
 "  tests for any surrogate value (high or low)."
 msgstr ""
-"Esttay ifway C isway away urrogatesay.  C aymay ebay eitherway anway integerway orway away\n"
-"  aracterchay. Urrogatesay-ypetay indicatesway atwhay indkay ofway urrogatesay otay esttay\n"
-"  orfay.  :Ighhay eansmay otay esttay orfay ethay ighhay (eadinglay) urrogatesay; :Owlay\n"
-"  eststay orfay ethay owlay (ailingtray urrogatesay).  Away aluevay ofway :Anyway orway Ilnay\n"
+"Esttay ifway C isway away urrogatesay.  C aymay ebay eitherway anway "
+"integerway orway away\n"
+"  aracterchay. Urrogatesay-ypetay indicatesway atwhay indkay ofway "
+"urrogatesay otay esttay\n"
+"  orfay.  :Ighhay eansmay otay esttay orfay ethay ighhay (eadinglay) "
+"urrogatesay; :Owlay\n"
+"  eststay orfay ethay owlay (ailingtray urrogatesay).  Away aluevay ofway :"
+"Anyway orway Ilnay\n"
 "  eststay orfay anyway urrogatesay aluevay (ighhay orway owlay)."
 
 #: src/code/string.lisp
@@ -4499,7 +5131,8 @@ msgid ""
 "Convert the given Hi and Lo surrogate characters to the\n"
 "  corresponding codepoint value"
 msgstr ""
-"Onvertcay ethay ivengay Ihay andway Olay urrogatesay aracterschay otay ethay\n"
+"Onvertcay ethay ivengay Ihay andway Olay urrogatesay aracterschay otay "
+"ethay\n"
 "  orrespondingcay odepointcay aluevay"
 
 #: src/code/string.lisp
@@ -4511,11 +5144,16 @@ msgid ""
 "  Otherwise +1 or -1 is returned if the position is the high or low\n"
 "  surrogate value, respectively."
 msgstr ""
-"Eturnray ethay odepointcay aluevay omfray Ingstray atway ositionpay Iway.  Ifway atthay\n"
-"  ositionpay isway away urrogatesay, itway isway ombinedcay ithway eitherway ethay eviouspray orway\n"
-"  ollowingfay aracterchay (enwhay ossiblepay) otay omputecay ethay odepointcay.  Ethay\n"
-"  econdsay eturnray aluevay isway NIL ifway ethay ositionpay isway otnay away urrogatesay airpay.\n"
-"  Otherwiseway +1 orway -1 isway eturnedray ifway ethay ositionpay isway ethay ighhay orway owlay\n"
+"Eturnray ethay odepointcay aluevay omfray Ingstray atway ositionpay Iway.  "
+"Ifway atthay\n"
+"  ositionpay isway away urrogatesay, itway isway ombinedcay ithway eitherway "
+"ethay eviouspray orway\n"
+"  ollowingfay aracterchay (enwhay ossiblepay) otay omputecay ethay "
+"odepointcay.  Ethay\n"
+"  econdsay eturnray aluevay isway NIL ifway ethay ositionpay isway otnay "
+"away urrogatesay airpay.\n"
+"  Otherwiseway +1 orway -1 isway eturnedray ifway ethay ositionpay isway "
+"ethay ighhay orway owlay\n"
 "  urrogatesay aluevay, espectivelyray."
 
 #: src/code/string.lisp
@@ -4524,8 +5162,10 @@ msgid ""
 "  Codepoint is in the BMP, the first return value is the corresponding\n"
 "  character and the second is NIL."
 msgstr ""
-"Eturnray ethay ighhay andway owlay urrogatesay aracterschay orfay Odepointcay.  Ifway\n"
-"  Odepointcay isway inway ethay BMP, ethay irstfay eturnray aluevay isway ethay orrespondingcay\n"
+"Eturnray ethay ighhay andway owlay urrogatesay aracterschay orfay "
+"Odepointcay.  Ifway\n"
+"  Odepointcay isway inway ethay BMP, ethay irstfay eturnray aluevay isway "
+"ethay orrespondingcay\n"
 "  aracterchay andway ethay econdsay isway NIL."
 
 #: src/code/string.lisp
@@ -4535,9 +5175,12 @@ msgid ""
 "  stored at position I and the low (trailing) surrogate is stored at\n"
 "  I+1"
 msgstr ""
-"Etsay ethay odepointcay atway ingstray ositionpay Iway otay ethay Odepointcay.  Ifway ethay\n"
-"  odepointcay equiresray away urrogatesay airpay, ethay ighhay (eadinglay urrogatesay) isway\n"
-"  toredsay atway ositionpay Iway andway ethay owlay (ailingtray) urrogatesay isway toredsay atway\n"
+"Etsay ethay odepointcay atway ingstray ositionpay Iway otay ethay "
+"Odepointcay.  Ifway ethay\n"
+"  odepointcay equiresray away urrogatesay airpay, ethay ighhay (eadinglay "
+"urrogatesay) isway\n"
+"  toredsay atway ositionpay Iway andway ethay owlay (ailingtray) urrogatesay "
+"isway toredsay atway\n"
 "  Iway+1"
 
 #: src/code/string.lisp
@@ -4547,10 +5190,14 @@ msgid ""
 "  second value is the index into the string of the invalid character.\n"
 "  A string is also invalid if it contains any unassigned codepoints."
 msgstr ""
-"Eckchay ifway Ingstray isway away alidvay UTF-16 ingstray.  Ifway ethay ingstray isway alidvay,\n"
-"  T isway eturnedray.  Ifway ethay ingstray isway otnay alidvay, NIL isway eturnedray, andway ethay\n"
-"  econdsay aluevay isway ethay indexway intoway ethay ingstray ofway ethay invalidway aracterchay.\n"
-"  Away ingstray isway alsoway invalidway ifway itway ontainscay anyway unassignedway odepointscay."
+"Eckchay ifway Ingstray isway away alidvay UTF-16 ingstray.  Ifway ethay "
+"ingstray isway alidvay,\n"
+"  T isway eturnedray.  Ifway ethay ingstray isway otnay alidvay, NIL isway "
+"eturnedray, andway ethay\n"
+"  econdsay aluevay isway ethay indexway intoway ethay ingstray ofway ethay "
+"invalidway aracterchay.\n"
+"  Away ingstray isway alsoway invalidway ifway itway ontainscay anyway "
+"unassignedway odepointscay."
 
 #: src/code/string.lisp
 msgid ""
@@ -4559,9 +5206,12 @@ msgid ""
 "  string containing that character is returned.  If X cannot be coerced\n"
 "  into a string, an error occurs."
 msgstr ""
-"Oercescay X intoway away ingstray.  Ifway X isway away ingstray, X isway eturnedray.  Ifway X isway away\n"
-"  ymbolsay, X's namepay isway eturnedray.  Ifway X isway away aracterchay enthay away oneway elementway\n"
-"  ingstray ontainingcay atthay aracterchay isway eturnedray.  Ifway X annotcay ebay oercedcay\n"
+"Oercescay X intoway away ingstray.  Ifway X isway away ingstray, X isway "
+"eturnedray.  Ifway X isway away\n"
+"  ymbolsay, X's namepay isway eturnedray.  Ifway X isway away aracterchay "
+"enthay away oneway elementway\n"
+"  ingstray ontainingcay atthay aracterchay isway eturnedray.  Ifway X "
+"annotcay ebay oercedcay\n"
 "  intoway away ingstray, anway errorway occursway."
 
 #: src/code/string.lisp
@@ -4574,8 +5224,10 @@ msgid ""
 "  the string, returns the character object representing the character at\n"
 "  that position in the string."
 msgstr ""
-"Ivengay away ingstray andway away onnay-egativenay integerway indexway esslay anthay ethay engthlay ofway\n"
-"  ethay ingstray, eturnsray ethay aracterchay objectway epresentingray ethay aracterchay atway\n"
+"Ivengay away ingstray andway away onnay-egativenay integerway indexway "
+"esslay anthay ethay engthlay ofway\n"
+"  ethay ingstray, eturnsray ethay aracterchay objectway epresentingray ethay "
+"aracterchay atway\n"
 "  atthay ositionpay inway ethay ingstray."
 
 #: src/code/string.lisp
@@ -4583,8 +5235,10 @@ msgid ""
 "SCHAR returns the character object at an indexed position in a string\n"
 "  just as CHAR does, except the string must be a simple-string."
 msgstr ""
-"SCHAR eturnsray ethay aracterchay objectway atway anway indexedway ositionpay inway away ingstray\n"
-"  ustjay asway CHAR oesday, exceptway ethay ingstray ustmay ebay away implesay-ingstray."
+"SCHAR eturnsray ethay aracterchay objectway atway anway indexedway "
+"ositionpay inway away ingstray\n"
+"  ustjay asway CHAR oesday, exceptway ethay ingstray ustmay ebay away "
+"implesay-ingstray."
 
 #: src/code/string.lisp
 msgid ""
@@ -4592,8 +5246,10 @@ msgid ""
 "  the second string, returns the longest common prefix (using char=)\n"
 "  of the two strings. Otherwise, returns ()."
 msgstr ""
-"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway exicographicallylay esslay anthay\n"
-"  ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray (usingway archay=)\n"
+"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway "
+"exicographicallylay esslay anthay\n"
+"  ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray "
+"(usingway archay=)\n"
 "  ofway ethay wotay ingsstray. Otherwiseway, eturnsray ()."
 
 #: src/code/string.lisp
@@ -4602,8 +5258,10 @@ msgid ""
 "  the second string, returns the longest common prefix (using char=)\n"
 "  of the two strings. Otherwise, returns ()."
 msgstr ""
-"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway exicographicallylay eatergray anthay\n"
-"  ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray (usingway archay=)\n"
+"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway "
+"exicographicallylay eatergray anthay\n"
+"  ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray "
+"(usingway archay=)\n"
 "  ofway ethay wotay ingsstray. Otherwiseway, eturnsray ()."
 
 #: src/code/string.lisp
@@ -4612,8 +5270,10 @@ msgid ""
 "  or equal to the second string, returns the longest common prefix\n"
 "  (using char=) of the two strings. Otherwise, returns ()."
 msgstr ""
-"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway exicographicallylay esslay anthay\n"
-"  orway equalway otay ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray\n"
+"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway "
+"exicographicallylay esslay anthay\n"
+"  orway equalway otay ethay econdsay ingstray, eturnsray ethay ongestlay "
+"ommoncay efixpray\n"
 "  (usingway archay=) ofway ethay wotay ingsstray. Otherwiseway, eturnsray ()."
 
 #: src/code/string.lisp
@@ -4622,8 +5282,10 @@ msgid ""
 "  than or equal to the second string, returns the longest common prefix\n"
 "  (using char=) of the two strings. Otherwise, returns ()."
 msgstr ""
-"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway exicographicallylay eatergray\n"
-"  anthay orway equalway otay ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray\n"
+"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway "
+"exicographicallylay eatergray\n"
+"  anthay orway equalway otay ethay econdsay ingstray, eturnsray ethay "
+"ongestlay ommoncay efixpray\n"
 "  (usingway archay=) ofway ethay wotay ingsstray. Otherwiseway, eturnsray ()."
 
 #: src/code/string.lisp
@@ -4632,8 +5294,10 @@ msgid ""
 "  start2, end1 and end2, compares characters in string1 to characters in\n"
 "  string2 (using char=)."
 msgstr ""
-"Ivengay wotay ingsstray (ingstray1 andway ingstray2), andway optionalway integersway tartsay1,\n"
-"  tartsay2, endway1 andway endway2, omparescay aracterschay inway ingstray1 otay aracterschay inway\n"
+"Ivengay wotay ingsstray (ingstray1 andway ingstray2), andway optionalway "
+"integersway tartsay1,\n"
+"  tartsay2, endway1 andway endway2, omparescay aracterschay inway ingstray1 "
+"otay aracterschay inway\n"
 "  ingstray2 (usingway archay=)."
 
 #: src/code/string.lisp
@@ -4642,8 +5306,10 @@ msgid ""
 "  to the second string, returns the longest common prefix (using char=)\n"
 "  of the two strings. Otherwise, returns ()."
 msgstr ""
-"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway otnay exicographicallylay equalway\n"
-"  otay ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray (usingway archay=)\n"
+"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway otnay "
+"exicographicallylay equalway\n"
+"  otay ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray "
+"(usingway archay=)\n"
 "  ofway ethay wotay ingsstray. Otherwiseway, eturnsray ()."
 
 #: src/code/string.lisp
@@ -4655,10 +5321,12 @@ msgid ""
 "\n"
 "  Default Casing is :SIMPLE."
 msgstr ""
-"Eturnray away ewnay ingstray ithway ethay asecay oldedfay accordingway otay Asingcay asway ollowsfay:\n"
+"Eturnray away ewnay ingstray ithway ethay asecay oldedfay accordingway otay "
+"Asingcay asway ollowsfay:\n"
 "\n"
 "  :SIMPLE  Unicodeway implesay asecay oldingfay (eservingpray engthlay)\n"
-"  :FULL    Unicodeway ullfay asecay oldingfay (ossiblypay angingchay engthlay)\n"
+"  :FULL    Unicodeway ullfay asecay oldingfay (ossiblypay angingchay "
+"engthlay)\n"
 "\n"
 "  Efaultday Asingcay isway :SIMPLE."
 
@@ -4668,8 +5336,10 @@ msgid ""
 "  start2, end1 and end2, compares characters in string1 to characters in\n"
 "  string2 (using char-equal)."
 msgstr ""
-"Ivengay wotay ingsstray (ingstray1 andway ingstray2), andway optionalway integersway tartsay1,\n"
-"  tartsay2, endway1 andway endway2, omparescay aracterschay inway ingstray1 otay aracterschay inway\n"
+"Ivengay wotay ingsstray (ingstray1 andway ingstray2), andway optionalway "
+"integersway tartsay1,\n"
+"  tartsay2, endway1 andway endway2, omparescay aracterschay inway ingstray1 "
+"otay aracterschay inway\n"
 "  ingstray2 (usingway archay-equalway)."
 
 #: src/code/string.lisp
@@ -4679,13 +5349,14 @@ msgstr "Improperway oundsbay orfay ingstray omparisoncay."
 #: src/code/string.lisp
 msgid ""
 "Given two strings, if the first string is not lexicographically equal\n"
-"  to the second string, returns the longest common prefix (using char-equal)"
-"\n"
+"  to the second string, returns the longest common prefix (using char-"
+"equal)\n"
 "  of the two strings. Otherwise, returns ()."
 msgstr ""
-"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway otnay exicographicallylay equalway\n"
-"  otay ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray (usingway archay-equalway)"
-"\n"
+"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway otnay "
+"exicographicallylay equalway\n"
+"  otay ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray "
+"(usingway archay-equalway)\n"
 "  ofway ethay wotay ingsstray. Otherwiseway, eturnsray ()."
 
 #: src/code/string.lisp
@@ -4698,8 +5369,10 @@ msgid ""
 "  the second string, returns the longest common prefix (using char-equal)\n"
 "  of the two strings. Otherwise, returns ()."
 msgstr ""
-"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway exicographicallylay esslay anthay\n"
-"  ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray (usingway archay-equalway)\n"
+"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway "
+"exicographicallylay esslay anthay\n"
+"  ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray "
+"(usingway archay-equalway)\n"
 "  ofway ethay wotay ingsstray. Otherwiseway, eturnsray ()."
 
 #: src/code/string.lisp
@@ -4708,8 +5381,10 @@ msgid ""
 "  the second string, returns the longest common prefix (using char-equal)\n"
 "  of the two strings. Otherwise, returns ()."
 msgstr ""
-"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway exicographicallylay eatergray anthay\n"
-"  ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray (usingway archay-equalway)\n"
+"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway "
+"exicographicallylay eatergray anthay\n"
+"  ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray "
+"(usingway archay-equalway)\n"
 "  ofway ethay wotay ingsstray. Otherwiseway, eturnsray ()."
 
 #: src/code/string.lisp
@@ -4718,9 +5393,12 @@ msgid ""
 "  than or equal to the second string, returns the longest common prefix\n"
 "  (using char-equal) of the two strings. Otherwise, returns ()."
 msgstr ""
-"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway exicographicallylay eatergray\n"
-"  anthay orway equalway otay ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray\n"
-"  (usingway archay-equalway) ofway ethay wotay ingsstray. Otherwiseway, eturnsray ()."
+"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway "
+"exicographicallylay eatergray\n"
+"  anthay orway equalway otay ethay econdsay ingstray, eturnsray ethay "
+"ongestlay ommoncay efixpray\n"
+"  (usingway archay-equalway) ofway ethay wotay ingsstray. Otherwiseway, "
+"eturnsray ()."
 
 #: src/code/string.lisp
 msgid ""
@@ -4728,24 +5406,30 @@ msgid ""
 "  or equal to the second string, returns the longest common prefix\n"
 "  (using char-equal) of the two strings. Otherwise, returns ()."
 msgstr ""
-"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway exicographicallylay esslay anthay\n"
-"  orway equalway otay ethay econdsay ingstray, eturnsray ethay ongestlay ommoncay efixpray\n"
-"  (usingway archay-equalway) ofway ethay wotay ingsstray. Otherwiseway, eturnsray ()."
+"Ivengay wotay ingsstray, ifway ethay irstfay ingstray isway "
+"exicographicallylay esslay anthay\n"
+"  orway equalway otay ethay econdsay ingstray, eturnsray ethay ongestlay "
+"ommoncay efixpray\n"
+"  (usingway archay-equalway) ofway ethay wotay ingsstray. Otherwiseway, "
+"eturnsray ()."
 
 #: src/code/string.lisp
 msgid ""
 "Given a character count and an optional fill character, makes and returns\n"
 "  a new string Count long filled with the fill character."
 msgstr ""
-"Ivengay away aracterchay ountcay andway anway optionalway illfay aracterchay, akesmay andway eturnsray\n"
-"  away ewnay ingstray Ountcay onglay illedfay ithway ethay illfay aracterchay."
+"Ivengay away aracterchay ountcay andway anway optionalway illfay "
+"aracterchay, akesmay andway eturnsray\n"
+"  away ewnay ingstray Ountcay onglay illedfay ithway ethay illfay "
+"aracterchay."
 
 #: src/code/string.lisp
 msgid ""
 "Given a string, returns a new string that is a copy of it with all\n"
 "  lower case alphabetic characters converted to uppercase."
 msgstr ""
-"Ivengay away ingstray, eturnsray away ewnay ingstray atthay isway away opycay ofway itway ithway allway\n"
+"Ivengay away ingstray, eturnsray away ewnay ingstray atthay isway away "
+"opycay ofway itway ithway allway\n"
 "  owerlay asecay alphabeticway aracterschay onvertedcay otay uppercaseway."
 
 #: src/code/string.lisp
@@ -4754,16 +5438,20 @@ msgid ""
 "  lower case alphabetic characters converted to uppercase.  Casing is\n"
 "  :simple or :full for simple or full case conversion, respectively."
 msgstr ""
-"Ivengay away ingstray, eturnsray away ewnay ingstray atthay isway away opycay ofway itway ithway allway\n"
-"  owerlay asecay alphabeticway aracterschay onvertedcay otay uppercaseway.  Asingcay isway\n"
-"  :implesay orway :ullfay orfay implesay orway ullfay asecay onversioncay, espectivelyray."
+"Ivengay away ingstray, eturnsray away ewnay ingstray atthay isway away "
+"opycay ofway itway ithway allway\n"
+"  owerlay asecay alphabeticway aracterschay onvertedcay otay uppercaseway.  "
+"Asingcay isway\n"
+"  :implesay orway :ullfay orfay implesay orway ullfay asecay onversioncay, "
+"espectivelyray."
 
 #: src/code/string.lisp
 msgid ""
 "Given a string, returns a new string that is a copy of it with all\n"
 "  upper case alphabetic characters converted to lowercase."
 msgstr ""
-"Ivengay away ingstray, eturnsray away ewnay ingstray atthay isway away opycay ofway itway ithway allway\n"
+"Ivengay away ingstray, eturnsray away ewnay ingstray atthay isway away "
+"opycay ofway itway ithway allway\n"
 "  upperway asecay alphabeticway aracterschay onvertedcay otay owercaselay."
 
 #: src/code/string.lisp
@@ -4772,9 +5460,12 @@ msgid ""
 "  upper case alphabetic characters converted to lowercase.  Casing is\n"
 "  :simple or :full for simple or full case conversion, respectively."
 msgstr ""
-"Ivengay away ingstray, eturnsray away ewnay ingstray atthay isway away opycay ofway itway ithway allway\n"
-"  upperway asecay alphabeticway aracterschay onvertedcay otay owercaselay.  Asingcay isway\n"
-"  :implesay orway :ullfay orfay implesay orway ullfay asecay onversioncay, espectivelyray."
+"Ivengay away ingstray, eturnsray away ewnay ingstray atthay isway away "
+"opycay ofway itway ithway allway\n"
+"  upperway asecay alphabeticway aracterschay onvertedcay otay owercaselay.  "
+"Asingcay isway\n"
+"  :implesay orway :ullfay orfay implesay orway ullfay asecay onversioncay, "
+"espectivelyray."
 
 #: src/code/string.lisp
 msgid ""
@@ -4784,10 +5475,14 @@ msgid ""
 "  to be a string of case-modifiable characters delimited by\n"
 "  non-case-modifiable chars."
 msgstr ""
-"Ivengay away ingstray, eturnsray away opycay ofway ethay ingstray ithway ethay irstfay\n"
-"  aracterchay ofway eachway ``ordway'' onvertedcay otay upperway-asecay, andway emainingray\n"
-"  arschay inway ethay ordway onvertedcay otay owerlay asecay. Away ``ordway'' isway efinedday\n"
-"  otay ebay away ingstray ofway asecay-odifiablemay aracterschay elimitedday ybay\n"
+"Ivengay away ingstray, eturnsray away opycay ofway ethay ingstray ithway "
+"ethay irstfay\n"
+"  aracterchay ofway eachway ``ordway'' onvertedcay otay upperway-asecay, "
+"andway emainingray\n"
+"  arschay inway ethay ordway onvertedcay otay owerlay asecay. Away "
+"``ordway'' isway efinedday\n"
+"  otay ebay away ingstray ofway asecay-odifiablemay aracterschay elimitedday "
+"ybay\n"
 "  onnay-asecay-odifiablemay arschay."
 
 #: src/code/string.lisp
@@ -4799,11 +5494,16 @@ msgid ""
 "  non-case-modifiable chars.  Casing is :simple or :full for\n"
 "  simple or full case conversion, respectively."
 msgstr ""
-"Ivengay away ingstray, eturnsray away opycay ofway ethay ingstray ithway ethay irstfay\n"
-"  aracterchay ofway eachway ``ordway'' onvertedcay otay upperway-asecay, andway emainingray\n"
-"  arschay inway ethay ordway onvertedcay otay owerlay asecay. Away ``ordway'' isway efinedday\n"
-"  otay ebay away ingstray ofway asecay-odifiablemay aracterschay elimitedday ybay\n"
-"  onnay-asecay-odifiablemay arschay.  Asingcay isway :implesay orway :ullfay orfay\n"
+"Ivengay away ingstray, eturnsray away opycay ofway ethay ingstray ithway "
+"ethay irstfay\n"
+"  aracterchay ofway eachway ``ordway'' onvertedcay otay upperway-asecay, "
+"andway emainingray\n"
+"  arschay inway ethay ordway onvertedcay otay owerlay asecay. Away "
+"``ordway'' isway efinedday\n"
+"  otay ebay away ingstray ofway asecay-odifiablemay aracterschay elimitedday "
+"ybay\n"
+"  onnay-asecay-odifiablemay arschay.  Asingcay isway :implesay orway :ullfay "
+"orfay\n"
 "  implesay orway ullfay asecay onversioncay, espectivelyray."
 
 #: src/code/string.lisp
@@ -4811,7 +5511,8 @@ msgid ""
 "Given a string, returns that string with all lower case alphabetic\n"
 "  characters converted to uppercase."
 msgstr ""
-"Ivengay away ingstray, eturnsray atthay ingstray ithway allway owerlay asecay alphabeticway\n"
+"Ivengay away ingstray, eturnsray atthay ingstray ithway allway owerlay "
+"asecay alphabeticway\n"
 "  aracterschay onvertedcay otay uppercaseway."
 
 #: src/code/string.lisp
@@ -4819,7 +5520,8 @@ msgid ""
 "Given a string, returns that string with all upper case alphabetic\n"
 "  characters converted to lowercase."
 msgstr ""
-"Ivengay away ingstray, eturnsray atthay ingstray ithway allway upperway asecay alphabeticway\n"
+"Ivengay away ingstray, eturnsray atthay ingstray ithway allway upperway "
+"asecay alphabeticway\n"
 "  aracterschay onvertedcay otay owercaselay."
 
 #: src/code/string.lisp
@@ -4831,9 +5533,12 @@ msgid ""
 "  non-case-modifiable chars."
 msgstr ""
 "Ivengay away ingstray, eturnsray atthay ingstray ithway ethay irstfay\n"
-"  aracterchay ofway eachway ``ordway'' onvertedcay otay upperway-asecay, andway emainingray\n"
-"  arschay inway ethay ordway onvertedcay otay owerlay asecay. Away ``ordway'' isway efinedday\n"
-"  otay ebay away ingstray ofway asecay-odifiablemay aracterschay elimitedday ybay\n"
+"  aracterchay ofway eachway ``ordway'' onvertedcay otay upperway-asecay, "
+"andway emainingray\n"
+"  arschay inway ethay ordway onvertedcay otay owerlay asecay. Away "
+"``ordway'' isway efinedday\n"
+"  otay ebay away ingstray ofway asecay-odifiablemay aracterschay elimitedday "
+"ybay\n"
 "  onnay-asecay-odifiablemay arschay."
 
 #: src/code/string.lisp
@@ -4843,9 +5548,12 @@ msgid ""
 "  left end.  If the set of characters is a string, surrogates will be\n"
 "  properly handled."
 msgstr ""
-"Ivengay away etsay ofway aracterschay (away istlay orway ingstray) andway away ingstray, eturnsray\n"
-"  away opycay ofway ethay ingstray ithway ethay aracterschay inway ethay etsay emovedray omfray ethay\n"
-"  eftlay endway.  Ifway ethay etsay ofway aracterschay isway away ingstray, urrogatessay illway ebay\n"
+"Ivengay away etsay ofway aracterschay (away istlay orway ingstray) andway "
+"away ingstray, eturnsray\n"
+"  away opycay ofway ethay ingstray ithway ethay aracterschay inway ethay "
+"etsay emovedray omfray ethay\n"
+"  eftlay endway.  Ifway ethay etsay ofway aracterschay isway away ingstray, "
+"urrogatessay illway ebay\n"
 "  operlypray andledhay."
 
 #: src/code/string.lisp
@@ -4855,9 +5563,12 @@ msgid ""
 "  right end.  If the set of characters is a string, surrogates will be\n"
 "  properly handled."
 msgstr ""
-"Ivengay away etsay ofway aracterschay (away istlay orway ingstray) andway away ingstray, eturnsray\n"
-"  away opycay ofway ethay ingstray ithway ethay aracterschay inway ethay etsay emovedray omfray ethay\n"
-"  ightray endway.  Ifway ethay etsay ofway aracterschay isway away ingstray, urrogatessay illway ebay\n"
+"Ivengay away etsay ofway aracterschay (away istlay orway ingstray) andway "
+"away ingstray, eturnsray\n"
+"  away opycay ofway ethay ingstray ithway ethay aracterschay inway ethay "
+"etsay emovedray omfray ethay\n"
+"  ightray endway.  Ifway ethay etsay ofway aracterschay isway away ingstray, "
+"urrogatessay illway ebay\n"
 "  operlypray andledhay."
 
 #: src/code/string.lisp
@@ -4867,9 +5578,12 @@ msgid ""
 "  ends.  If the set of characters is a string, surrogates will be\n"
 "  properly handled."
 msgstr ""
-"Ivengay away etsay ofway aracterschay (away istlay orway ingstray) andway away ingstray, eturnsray away\n"
-"  opycay ofway ethay ingstray ithway ethay aracterschay inway ethay etsay emovedray omfray othbay\n"
-"  endsway.  Ifway ethay etsay ofway aracterschay isway away ingstray, urrogatessay illway ebay\n"
+"Ivengay away etsay ofway aracterschay (away istlay orway ingstray) andway "
+"away ingstray, eturnsray away\n"
+"  opycay ofway ethay ingstray ithway ethay aracterschay inway ethay etsay "
+"emovedray omfray othbay\n"
+"  endsway.  Ifway ethay etsay ofway aracterschay isway away ingstray, "
+"urrogatessay illway ebay\n"
 "  operlypray andledhay."
 
 #: src/code/string.lisp
@@ -4878,8 +5592,10 @@ msgid ""
 "  a copy of the string with the characters in the set removed from the\n"
 "  left end."
 msgstr ""
-"Ivengay away etsay ofway aracterschay (away istlay orway ingstray) andway away ingstray, eturnsray\n"
-"  away opycay ofway ethay ingstray ithway ethay aracterschay inway ethay etsay emovedray omfray ethay\n"
+"Ivengay away etsay ofway aracterschay (away istlay orway ingstray) andway "
+"away ingstray, eturnsray\n"
+"  away opycay ofway ethay ingstray ithway ethay aracterschay inway ethay "
+"etsay emovedray omfray ethay\n"
 "  eftlay endway."
 
 #: src/code/string.lisp
@@ -4888,8 +5604,10 @@ msgid ""
 "  a copy of the string with the characters in the set removed from the\n"
 "  right end."
 msgstr ""
-"Ivengay away etsay ofway aracterschay (away istlay orway ingstray) andway away ingstray, eturnsray\n"
-"  away opycay ofway ethay ingstray ithway ethay aracterschay inway ethay etsay emovedray omfray ethay\n"
+"Ivengay away etsay ofway aracterschay (away istlay orway ingstray) andway "
+"away ingstray, eturnsray\n"
+"  away opycay ofway ethay ingstray ithway ethay aracterschay inway ethay "
+"etsay emovedray omfray ethay\n"
 "  ightray endway."
 
 #: src/code/string.lisp
@@ -4898,8 +5616,10 @@ msgid ""
 "  copy of the string with the characters in the set removed from both\n"
 "  ends."
 msgstr ""
-"Ivengay away etsay ofway aracterschay (away istlay orway ingstray) andway away ingstray, eturnsray away\n"
-"  opycay ofway ethay ingstray ithway ethay aracterschay inway ethay etsay emovedray omfray othbay\n"
+"Ivengay away etsay ofway aracterschay (away istlay orway ingstray) andway "
+"away ingstray, eturnsray away\n"
+"  opycay ofway ethay ingstray ithway ethay aracterschay inway ethay etsay "
+"emovedray omfray othbay\n"
 "  endsway."
 
 #: src/code/string.lisp
@@ -4909,9 +5629,12 @@ msgid ""
 "  a substring consisting of the character at INDEX followed by all\n"
 "  subsequent combining characters."
 msgstr ""
-"GLYPH eturnsray ethay yphglay atway ethay indexedway ositionpay inway away ingstray, andway ethay\n"
-"  ositionpay ofway ethay extnay yphglay (orway NIL) asway away econdsay aluevay.  Away yphglay isway\n"
-"  away ubstringsay onsistingcay ofway ethay aracterchay atway INDEX ollowedfay ybay allway\n"
+"GLYPH eturnsray ethay yphglay atway ethay indexedway ositionpay inway away "
+"ingstray, andway ethay\n"
+"  ositionpay ofway ethay extnay yphglay (orway NIL) asway away econdsay "
+"aluevay.  Away yphglay isway\n"
+"  away ubstringsay onsistingcay ofway ethay aracterchay atway INDEX "
+"ollowedfay ybay allway\n"
 "  ubsequentsay ombiningcay aracterschay."
 
 #: src/code/string.lisp
@@ -4919,7 +5642,8 @@ msgid ""
 "SGLYPH returns the glyph at the indexed position, the same as GLYPH,\n"
 "  except that the string must be a simple-string"
 msgstr ""
-"SGLYPH eturnsray ethay yphglay atway ethay indexedway ositionpay, ethay amesay asway GLYPH,\n"
+"SGLYPH eturnsray ethay yphglay atway ethay indexedway ositionpay, ethay "
+"amesay asway GLYPH,\n"
 "  exceptway atthay ethay ingstray ustmay ebay away implesay-ingstray"
 
 #: src/code/string.lisp
@@ -4927,7 +5651,8 @@ msgid ""
 "Convert String to Unicode Normalization Form D (NFD) using the\n"
 "  canonical decomposition.  The NFD string is returned"
 msgstr ""
-"Onvertcay Ingstray otay Unicodeway Ormalizationnay Ormfay D (NFD) usingway ethay\n"
+"Onvertcay Ingstray otay Unicodeway Ormalizationnay Ormfay D (NFD) usingway "
+"ethay\n"
 "  anonicalcay ecompositionday.  Ethay NFD ingstray isway eturnedray"
 
 #: src/code/string.lisp
@@ -4935,7 +5660,8 @@ msgid ""
 "Convert String to Unicode Normalization Form KD (NFKD) uisng the\n"
 "  compatible decomposition form.  The NFKD string is returned."
 msgstr ""
-"Onvertcay Ingstray otay Unicodeway Ormalizationnay Ormfay KD (NFKD) uisngway ethay\n"
+"Onvertcay Ingstray otay Unicodeway Ormalizationnay Ormfay KD (NFKD) uisngway "
+"ethay\n"
 "  ompatiblecay ecompositionday ormfay.  Ethay NFKD ingstray isway eturnedray."
 
 #: src/code/string.lisp
@@ -4944,8 +5670,10 @@ msgid ""
 "  string a simple string and is already normalized, the original\n"
 "  string is returned."
 msgstr ""
-"Onvertcay Ingstray otay Unicodeway Ormalizationnay Ormfay C (NFC).  Ifway ethay\n"
-"  ingstray away implesay ingstray andway isway alreadyway ormalizednay, ethay originalway\n"
+"Onvertcay Ingstray otay Unicodeway Ormalizationnay Ormfay C (NFC).  Ifway "
+"ethay\n"
+"  ingstray away implesay ingstray andway isway alreadyway ormalizednay, "
+"ethay originalway\n"
 "  ingstray isway eturnedray."
 
 #: src/code/string.lisp
@@ -4954,8 +5682,10 @@ msgid ""
 "  string is a simple string and is already normalized, the original\n"
 "  string is returned."
 msgstr ""
-"Onvertcay Ingstray otay Unicodeway Ormalizationnay Ormfay KC (NFKC).  Ifway ethay\n"
-"  ingstray isway away implesay ingstray andway isway alreadyway ormalizednay, ethay originalway\n"
+"Onvertcay Ingstray otay Unicodeway Ormalizationnay Ormfay KC (NFKC).  Ifway "
+"ethay\n"
+"  ingstray isway away implesay ingstray andway isway alreadyway "
+"ormalizednay, ethay originalway\n"
 "  ingstray isway eturnedray."
 
 #: src/code/string.lisp
@@ -4964,8 +5694,10 @@ msgid ""
 "  the basic multilingual plane (BMP) are converted into the\n"
 "  corresponding surrogate pairs."
 msgstr ""
-"Onvertcay away equencesay ofway odepointscay otay away ingstray.  Odepointscay outsideway\n"
-"  ethay asicbay ultilingualmay aneplay (BMP) areway onvertedcay intoway ethay\n"
+"Onvertcay away equencesay ofway odepointscay otay away ingstray.  "
+"Odepointscay outsideway\n"
+"  ethay asicbay ultilingualmay aneplay (BMP) areway onvertedcay intoway "
+"ethay\n"
 "  orrespondingcay urrogatesay airspay."
 
 #: src/code/string.lisp
@@ -4974,8 +5706,10 @@ msgid ""
 "  pairs in the string are converted into the correspoinding\n"
 "  codepoint."
 msgstr ""
-"Onvertcay away ingstray otay away istlay ofway orrespondingcay odecay ointspay.  Urrogatesay\n"
-"  airspay inway ethay ingstray areway onvertedcay intoway ethay orrespoindingcay\n"
+"Onvertcay away ingstray otay away istlay ofway orrespondingcay odecay "
+"ointspay.  Urrogatesay\n"
+"  airspay inway ethay ingstray areway onvertedcay intoway ethay "
+"orrespoindingcay\n"
 "  odepointcay."
 
 #: src/code/mipsstrops.lisp
@@ -4987,11 +5721,16 @@ msgid ""
 "returned. This would be done on the Vax with CMPC3. The arguments must\n"
 "be simple strings."
 msgstr ""
-"Omparescay ethay ubstringssay ecifiedspay ybay Ingstray1 andway Ingstray2 andway eturnsray\n"
-"NIL ifway ethay ingsstray areway Ingstray=, orway ethay owestlay indexway ofway Ingstray1 inway\n"
-"ichwhay ethay wotay ifferday. Ifway oneway ingstray isway ongerlay anthay ethay otherway andway ethay\n"
-"ortershay isway away efixpray ofway ethay ongerlay, ethay engthlay ofway ethay ortershay + tartsay1 isway\n"
-"eturnedray. Isthay ouldway ebay oneday onway ethay Axvay ithway CMPC3. Ethay argumentsway ustmay\n"
+"Omparescay ethay ubstringssay ecifiedspay ybay Ingstray1 andway Ingstray2 "
+"andway eturnsray\n"
+"NIL ifway ethay ingsstray areway Ingstray=, orway ethay owestlay indexway "
+"ofway Ingstray1 inway\n"
+"ichwhay ethay wotay ifferday. Ifway oneway ingstray isway ongerlay anthay "
+"ethay otherway andway ethay\n"
+"ortershay isway away efixpray ofway ethay ongerlay, ethay engthlay ofway "
+"ethay ortershay + tartsay1 isway\n"
+"eturnedray. Isthay ouldway ebay oneday onway ethay Axvay ithway CMPC3. Ethay "
+"argumentsway ustmay\n"
 "ebay implesay ingsstray."
 
 #: src/code/mipsstrops.lisp
@@ -5008,17 +5747,21 @@ msgid ""
 "  up from the table bitwise ANDed with Mask is non-zero, the current\n"
 "  index into the String is returned. The corresponds to SCANC on the Vax."
 msgstr ""
-"%SP-Indfay-Aracterchay-Ithway-Attributeway  Ingstray, Tartsay, Endway, Abletay, Askmay\n"
-"  Ethay odescay ofway ethay aracterschay ofway Ingstray omfray Tartsay otay Endway areway usedway asway "
-"indicesway\n"
-"  intoway ethay Abletay, ichwhay isway away U-Ectorvay ofway 8-itbay ytesbay. Enwhay ethay umbernay "
-"ickedpay\n"
-"  upway omfray ethay abletay itwisebay Andedway ithway Askmay isway onnay-erozay, ethay urrentcay\n"
-"  indexway intoway ethay Ingstray isway eturnedray. Ethay orrespondscay otay SCANC onway ethay Axvay."
+"%SP-Indfay-Aracterchay-Ithway-Attributeway  Ingstray, Tartsay, Endway, "
+"Abletay, Askmay\n"
+"  Ethay odescay ofway ethay aracterschay ofway Ingstray omfray Tartsay otay "
+"Endway areway usedway asway indicesway\n"
+"  intoway ethay Abletay, ichwhay isway away U-Ectorvay ofway 8-itbay "
+"ytesbay. Enwhay ethay umbernay ickedpay\n"
+"  upway omfray ethay abletay itwisebay Andedway ithway Askmay isway onnay-"
+"erozay, ethay urrentcay\n"
+"  indexway intoway ethay Ingstray isway eturnedray. Ethay orrespondscay otay "
+"SCANC onway ethay Axvay."
 
 #: src/code/mipsstrops.lisp
 msgid "Like %SP-Find-Character-With-Attribute, only sdrawkcaB."
-msgstr "Ikelay %SP-Indfay-Aracterchay-Ithway-Attributeway, onlyway drawkcabsay."
+msgstr ""
+"Ikelay %SP-Indfay-Aracterchay-Ithway-Attributeway, onlyway drawkcabsay."
 
 #: src/code/mipsstrops.lisp
 msgid ""
@@ -5028,8 +5771,10 @@ msgid ""
 "  returned."
 msgstr ""
 "%SP-Indfay-Aracterchay  Ingstray, Tartsay, Endway, Aracterchay\n"
-"  Earchessay Ingstray orfay ethay Aracterchay omfray Tartsay otay Endway.  Ifway ethay aracterchay isway\n"
-"  oundfay, ethay orrespondingcay indexway intoway Ingstray isway eturnedray, otherwiseway NIL isway\n"
+"  Earchessay Ingstray orfay ethay Aracterchay omfray Tartsay otay Endway.  "
+"Ifway ethay aracterchay isway\n"
+"  oundfay, ethay orrespondingcay indexway intoway Ingstray isway eturnedray, "
+"otherwiseway NIL isway\n"
 "  eturnedray."
 
 #: src/code/mipsstrops.lisp
@@ -5040,8 +5785,10 @@ msgid ""
 "  returned."
 msgstr ""
 "%SP-Everseray-Indfay-Aracterchay  Ingstray, Tartsay, Endway, Aracterchay\n"
-"  Earchessay Ingstray orfay Aracterchay omfray Endway otay Tartsay.  Ifway ethay aracterchay isway\n"
-"  oundfay, ethay orrespondingcay indexway intoway Ingstray isway eturnedray, otherwiseway NIL isway\n"
+"  Earchessay Ingstray orfay Aracterchay omfray Endway otay Tartsay.  Ifway "
+"ethay aracterchay isway\n"
+"  oundfay, ethay orrespondingcay indexway intoway Ingstray isway eturnedray, "
+"otherwiseway NIL isway\n"
 "  eturnedray."
 
 #: src/code/mipsstrops.lisp
@@ -5051,8 +5798,10 @@ msgid ""
 "  is not Char=  to Character, or NIL if there is no such character."
 msgstr ""
 "%SP-Kipsay-Aracterchay  Ingstray, Tartsay, Endway, Aracterchay\n"
-"  Eturnsray ethay indexway ofway ethay irstfay aracterchay etweenbay Tartsay andway Endway ichwhay\n"
-"  isway otnay Archay=  otay Aracterchay, orway NIL ifway erethay isway onay uchsay aracterchay."
+"  Eturnsray ethay indexway ofway ethay irstfay aracterchay etweenbay Tartsay "
+"andway Endway ichwhay\n"
+"  isway otnay Archay=  otay Aracterchay, orway NIL ifway erethay isway onay "
+"uchsay aracterchay."
 
 #: src/code/mipsstrops.lisp
 msgid ""
@@ -5061,8 +5810,10 @@ msgid ""
 "  is not Char=  to Character, or NIL if there is no such character."
 msgstr ""
 "%SP-Kipsay-Aracterchay  Ingstray, Tartsay, Endway, Aracterchay\n"
-"  Eturnsray ethay indexway ofway ethay astlay aracterchay etweenbay Tartsay andway Endway ichwhay\n"
-"  isway otnay Archay=  otay Aracterchay, orway NIL ifway erethay isway onay uchsay aracterchay."
+"  Eturnsray ethay indexway ofway ethay astlay aracterchay etweenbay Tartsay "
+"andway Endway ichwhay\n"
+"  isway otnay Archay=  otay Aracterchay, orway NIL ifway erethay isway onay "
+"uchsay aracterchay."
 
 #: src/code/mipsstrops.lisp
 msgid ""
@@ -5071,9 +5822,12 @@ msgid ""
 "   Returns an index into String2 or NIL if the substring wasn't\n"
 "   found."
 msgstr ""
-"%SP-Ingstray-Earchsay  Ingstray1, Tartsay1, Endway1, Ingstray2, Tartsay2, Endway2\n"
-"   Earchessay orfay ethay ubstringsay ofway Ingstray1 ecifiedspay inway Ingstray2.\n"
-"   Eturnsray anway indexway intoway Ingstray2 orway NIL ifway ethay ubstringsay asnway't\n"
+"%SP-Ingstray-Earchsay  Ingstray1, Tartsay1, Endway1, Ingstray2, Tartsay2, "
+"Endway2\n"
+"   Earchessay orfay ethay ubstringsay ofway Ingstray1 ecifiedspay inway "
+"Ingstray2.\n"
+"   Eturnsray anway indexway intoway Ingstray2 orway NIL ifway ethay "
+"ubstringsay asnway't\n"
 "   oundfay."
 
 #: src/code/symbol.lisp
@@ -5081,7 +5835,8 @@ msgid ""
 "VARIABLE must evaluate to a symbol.  This symbol's current special\n"
 "  value is returned."
 msgstr ""
-"VARIABLE ustmay evaluateway otay away ymbolsay.  Isthay ymbolsay's urrentcay ecialspay\n"
+"VARIABLE ustmay evaluateway otay away ymbolsay.  Isthay ymbolsay's urrentcay "
+"ecialspay\n"
 "  aluevay isway eturnedray."
 
 #: src/code/symbol.lisp
@@ -5089,7 +5844,8 @@ msgid ""
 "VARIABLE must evaluate to a symbol.  Return NIL if this symbol is\n"
 "  unbound, T if it has a value."
 msgstr ""
-"VARIABLE ustmay evaluateway otay away ymbolsay.  Eturnray NIL ifway isthay ymbolsay isway\n"
+"VARIABLE ustmay evaluateway otay away ymbolsay.  Eturnray NIL ifway isthay "
+"ymbolsay isway\n"
 "  unboundway, T ifway itway ashay away aluevay."
 
 #: src/code/symbol.lisp
@@ -5097,7 +5853,8 @@ msgid ""
 "VARIABLE must evaluate to a symbol.  This symbol's special value cell is\n"
 "  set to the specified new value."
 msgstr ""
-"VARIABLE ustmay evaluateway otay away ymbolsay.  Isthay ymbolsay's ecialspay aluevay ellcay isway\n"
+"VARIABLE ustmay evaluateway otay away ymbolsay.  Isthay ymbolsay's ecialspay "
+"aluevay ellcay isway\n"
 "  etsay otay ethay ecifiedspay ewnay aluevay."
 
 #: src/code/symbol.lisp
@@ -5117,7 +5874,8 @@ msgid ""
 "VARIABLE must evaluate to a symbol.  This symbol is made unbound,\n"
 "  removing any value it may currently have."
 msgstr ""
-"VARIABLE ustmay evaluateway otay away ymbolsay.  Isthay ymbolsay isway ademay unboundway,\n"
+"VARIABLE ustmay evaluateway otay away ymbolsay.  Isthay ymbolsay isway "
+"ademay unboundway,\n"
 "  emovingray anyway aluevay itway aymay urrentlycay avehay."
 
 #: src/code/symbol.lisp
@@ -5125,24 +5883,32 @@ msgid ""
 "VARIABLE must evaluate to a symbol.  This symbol's current definition\n"
 "   is returned.  Settable with SETF."
 msgstr ""
-"VARIABLE ustmay evaluateway otay away ymbolsay.  Isthay ymbolsay's urrentcay efinitionday\n"
+"VARIABLE ustmay evaluateway otay away ymbolsay.  Isthay ymbolsay's urrentcay "
+"efinitionday\n"
 "   isway eturnedray.  Ettablesay ithway SETF."
 
 #: src/code/symbol.lisp
 msgid "VARIABLE must evaluate to a symbol.  Return its property list."
-msgstr "VARIABLE ustmay evaluateway otay away ymbolsay.  Eturnray itsway opertypray istlay."
+msgstr ""
+"VARIABLE ustmay evaluateway otay away ymbolsay.  Eturnray itsway opertypray "
+"istlay."
 
 #: src/code/symbol.lisp
 msgid "VARIABLE must evaluate to a symbol.  Return its print name."
-msgstr "VARIABLE ustmay evaluateway otay away ymbolsay.  Eturnray itsway intpray amenay."
+msgstr ""
+"VARIABLE ustmay evaluateway otay away ymbolsay.  Eturnray itsway intpray "
+"amenay."
 
 #: src/code/symbol.lisp
 msgid "VARIABLE must evaluate to a symbol.  Return its package."
-msgstr "VARIABLE ustmay evaluateway otay away ymbolsay.  Eturnray itsway ackagepay."
+msgstr ""
+"VARIABLE ustmay evaluateway otay away ymbolsay.  Eturnray itsway ackagepay."
 
 #: src/code/symbol.lisp
 msgid "Make and return a new symbol with the STRING as its print name."
-msgstr "Akemay andway eturnray away ewnay ymbolsay ithway ethay STRING asway itsway intpray amenay."
+msgstr ""
+"Akemay andway eturnray away ewnay ymbolsay ithway ethay STRING asway itsway "
+"intpray amenay."
 
 #: src/code/symbol.lisp
 msgid "Return the hash value for symbol."
@@ -5153,19 +5919,23 @@ msgid ""
 "Look on the property list of SYMBOL for the specified INDICATOR.  If this\n"
 "  is found, return the associated value, else return DEFAULT."
 msgstr ""
-"Ooklay onway ethay opertypray istlay ofway SYMBOL orfay ethay ecifiedspay INDICATOR.  Ifway isthay\n"
-"  isway oundfay, eturnray ethay associatedway aluevay, elseway eturnray DEFAULT."
+"Ooklay onway ethay opertypray istlay ofway SYMBOL orfay ethay ecifiedspay "
+"INDICATOR.  Ifway isthay\n"
+"  isway oundfay, eturnray ethay associatedway aluevay, elseway eturnray "
+"DEFAULT."
 
 #: src/code/symbol.lisp
 msgid "~S has an odd number of items in its property list."
-msgstr "~S ashay anway oddway umbernay ofway itemsway inway itsway opertypray istlay."
+msgstr ""
+"~S ashay anway oddway umbernay ofway itemsway inway itsway opertypray istlay."
 
 #: src/code/symbol.lisp
 msgid ""
 "The VALUE is added as a property of SYMBOL under the specified INDICATOR.\n"
 "  Returns VALUE."
 msgstr ""
-"Ethay VALUE isway addedway asway away opertypray ofway SYMBOL underway ethay ecifiedspay INDICATOR.\n"
+"Ethay VALUE isway addedway asway away opertypray ofway SYMBOL underway ethay "
+"ecifiedspay INDICATOR.\n"
 "  Eturnsray VALUE."
 
 #: src/code/symbol.lisp
@@ -5179,14 +5949,19 @@ msgid ""
 "  or false (the symbol NIL). Portable code should not rely on any other "
 "value."
 msgstr ""
-"Ooklay onway opertypray istlay ofway SYMBOL orfay opertypray ithway ecifiedspay\n"
-"  INDICATOR.  Ifway oundfay, licespay isthay indicatorway andway itsway aluevay outway ofway\n"
-"  ethay istplay, andway eturnray ethay ailtay ofway ethay originalway istlay tartingsay ithway\n"
-"  INDICATOR.  Ifway otnay oundfay, eturnray () ithway onay idesay effectsway.\n"
+"Ooklay onway opertypray istlay ofway SYMBOL orfay opertypray ithway "
+"ecifiedspay\n"
+"  INDICATOR.  Ifway oundfay, licespay isthay indicatorway andway itsway "
+"aluevay outway ofway\n"
+"  ethay istplay, andway eturnray ethay ailtay ofway ethay originalway istlay "
+"tartingsay ithway\n"
+"  INDICATOR.  Ifway otnay oundfay, eturnray () ithway onay idesay "
+"effectsway.\n"
 "\n"
-"  NOTE: Ethay ANSI ecificationspay equiresray REMPROP otay eturnray uetray (otnay alsefay)\n"
-"  orway alsefay (ethay ymbolsay NIL). Ortablepay odecay ouldshay otnay elyray onway anyway otherway "
-"aluevay."
+"  NOTE: Ethay ANSI ecificationspay equiresray REMPROP otay eturnray uetray "
+"(otnay alsefay)\n"
+"  orway alsefay (ethay ymbolsay NIL). Ortablepay odecay ouldshay otnay "
+"elyray onway anyway otherway aluevay."
 
 #: src/code/symbol.lisp
 msgid ""
@@ -5195,9 +5970,10 @@ msgid ""
 "  If one is found, the corresponding value is returned, else the Default is\n"
 "  returned."
 msgstr ""
-"Earchessay ethay opertypray istlay toredsay inway Aceplay orfay anway indicatorway EQ otay "
-"Indicatorway.\n"
-"  Ifway oneway isway oundfay, ethay orrespondingcay aluevay isway eturnedray, elseway ethay Efaultday isway\n"
+"Earchessay ethay opertypray istlay toredsay inway Aceplay orfay anway "
+"indicatorway EQ otay Indicatorway.\n"
+"  Ifway oneway isway oundfay, ethay orrespondingcay aluevay isway "
+"eturnedray, elseway ethay Efaultday isway\n"
 "  eturnedray."
 
 #: src/code/symbol.lisp
@@ -5210,8 +5986,10 @@ msgid ""
 "  be looked for in the property list stored in Place.  Three values are\n"
 "  returned, see manual for details."
 msgstr ""
-"Ikelay GETF, exceptway atthay Indicatorway-Istlay isway away istlay ofway indicatorsway ichwhay illway\n"
-"  ebay ookedlay orfay inway ethay opertypray istlay toredsay inway Aceplay.  Reethay aluesvay areway\n"
+"Ikelay GETF, exceptway atthay Indicatorway-Istlay isway away istlay ofway "
+"indicatorsway ichwhay illway\n"
+"  ebay ookedlay orfay inway ethay opertypray istlay toredsay inway Aceplay.  "
+"Reethay aluesvay areway\n"
 "  eturnedray, eesay anualmay orfay etailsday."
 
 #: src/code/symbol.lisp
@@ -5221,14 +5999,19 @@ msgid ""
 "  nor fbound and has no properties, else it has a copy of SYMBOL's\n"
 "  function, value and property list."
 msgstr ""
-"Akemay andway eturnray away ewnay uninternedway ymbolsay ithway ethay amesay intpray amenay\n"
-"  asway SYMBOL.  Ifway COPY-PROPS isway alsefay, ethay ewnay ymbolsay isway eithernay oundbay\n"
-"  ornay boundfay andway ashay onay opertiespray, elseway itway ashay away opycay ofway SYMBOL's\n"
+"Akemay andway eturnray away ewnay uninternedway ymbolsay ithway ethay amesay "
+"intpray amenay\n"
+"  asway SYMBOL.  Ifway COPY-PROPS isway alsefay, ethay ewnay ymbolsay isway "
+"eithernay oundbay\n"
+"  ornay boundfay andway ashay onay opertiespray, elseway itway ashay away "
+"opycay ofway SYMBOL's\n"
 "  unctionfay, aluevay andway opertypray istlay."
 
 #: src/code/symbol.lisp
 msgid "Returns true if Object is a symbol in the keyword package."
-msgstr "Eturnsray uetray ifway Objectway isway away ymbolsay inway ethay eywordkay ackagepay."
+msgstr ""
+"Eturnsray uetray ifway Objectway isway away ymbolsay inway ethay eywordkay "
+"ackagepay."
 
 #: src/code/symbol.lisp
 msgid "Counter for generating unique GENSYM symbols."
@@ -5243,18 +6026,23 @@ msgid ""
 "   the current value of *gensym-counter* which is incremented each time\n"
 "   it is used."
 msgstr ""
-"Eatescray away ewnay uninternedway ymbolsay osewhay amenay isway away efixpray ingstray (efaultsday\n"
-"   otay \"G\"), ollowedfay ybay away ecimalday umbernay.  Ingthay, enwhay uppliedsay, illway\n"
-"   alterway ethay efixpray ifway itway isway away ingstray, orway ebay usedway orfay ethay ecimalday umbernay\n"
-"   ifway itway isway away umbernay, ofway isthay ymbolsay. Ethay efaultday aluevay ofway ethay umbernay isway\n"
-"   ethay urrentcay aluevay ofway *gensym-counter* ichwhay isway incrementedway eachway imetay\n"
+"Eatescray away ewnay uninternedway ymbolsay osewhay amenay isway away "
+"efixpray ingstray (efaultsday\n"
+"   otay \"G\"), ollowedfay ybay away ecimalday umbernay.  Ingthay, enwhay "
+"uppliedsay, illway\n"
+"   alterway ethay efixpray ifway itway isway away ingstray, orway ebay "
+"usedway orfay ethay ecimalday umbernay\n"
+"   ifway itway isway away umbernay, ofway isthay ymbolsay. Ethay efaultday "
+"aluevay ofway ethay umbernay isway\n"
+"   ethay urrentcay aluevay ofway *gensym-counter* ichwhay isway "
+"incrementedway eachway imetay\n"
 "   itway isway usedway."
 
 #: src/code/symbol.lisp
-msgid ""
-"Creates a new symbol interned in package Package with the given Prefix."
+msgid "Creates a new symbol interned in package Package with the given Prefix."
 msgstr ""
-"Eatescray away ewnay ymbolsay internedway inway ackagepay Ackagepay ithway ethay ivengay Efixpray."
+"Eatescray away ewnay ymbolsay internedway inway ackagepay Ackagepay ithway "
+"ethay ivengay Efixpray."
 
 #: src/code/bignum.lisp
 msgid ""
@@ -5262,13 +6050,17 @@ msgid ""
 "classical multiplication algorithm instead of recursing all the way\n"
 "down to individual words."
 msgstr ""
-"Enwhay ethay ignumbay iecespay areway mallersay anthay isthay anymay ordsway, eway useway ethay\n"
-"assicalclay ultiplicationmay algorithmway insteadway ofway ecursingray allway ethay ayway\n"
+"Enwhay ethay ignumbay iecespay areway mallersay anthay isthay anymay "
+"ordsway, eway useway ethay\n"
+"assicalclay ultiplicationmay algorithmway insteadway ofway ecursingray "
+"allway ethay ayway\n"
 "ownday otay individualway ordsway."
 
 #: src/code/bignum.lisp
 msgid "Use Karatsuba if the bignums have at least this many bits"
-msgstr "Useway Aratsubakay ifway ethay ignumsbay avehay atway eastlay isthay anymay itsbay"
+msgstr ""
+"Useway Aratsubakay ifway ethay ignumsbay avehay atway eastlay isthay anymay "
+"itsbay"
 
 #: src/code/bignum.lisp
 msgid "WITH-BIGNUM-BUFFERS ({(var size [init])}*) Form*"
@@ -5304,48 +6096,54 @@ msgid ""
 "  A vaguely case-like macro that does number cross-product dispatches.  The\n"
 "  Vars are the variables we are dispatching off of.  The Type paired with "
 "each\n"
-"  Var is used in the error message when no case matches.  Each case specifie"
-"s a\n"
+"  Var is used in the error message when no case matches.  Each case "
+"specifies a\n"
 "  Type for each var, and is executed when that signature holds.  A type may "
 "be\n"
-"  a list (FOREACH Each-Type*), causing that case to be repeatedly instantiat"
-"ed\n"
+"  a list (FOREACH Each-Type*), causing that case to be repeatedly "
+"instantiated\n"
 "  for every Each-Type.  In the body of each case, any list of the form\n"
 "  (DISPATCH-TYPE Var-Name) is substituted with the type of that var in that\n"
 "  instance of the case.\n"
 "\n"
 "  As an alternate to a case spec, there may be a form whose CAR is a "
 "symbol.\n"
-"  In this case, we apply the CAR of the form to the CDR and treat the "
-"result of\n"
+"  In this case, we apply the CAR of the form to the CDR and treat the result "
+"of\n"
 "  the call as a list of cases.  This process is not applied recursively."
 msgstr ""
-"NUMBER-DISPATCH ({(Arvay Ypetay)}*) {((Ype*Tay) Orm*Fay) | (Ymbolsay Arg*Way)}*\n"
-"  Away aguelyvay asecay-ikelay acromay atthay oesday umbernay osscray-oductpray ispatchesday.  Ethay\n"
-"  Arsvay areway ethay ariablesvay eway areway ispatchingday offway ofway.  Ethay Ypetay airedpay ithway "
-"eachway\n"
-"  Arvay isway usedway inway ethay errorway essagemay enwhay onay asecay atchesmay.  Eachway asecay ecifiespay"
-"s away\n"
-"  Ypetay orfay eachway arvay, andway isway executedway enwhay atthay ignaturesay oldshay.  Away ypetay aymay "
-"ebay\n"
-"  away istlay (FOREACH Eachway-Ype*Tay), ausingcay atthay asecay otay ebay epeatedlyray instantiatway"
-"edway\n"
-"  orfay everyway Eachway-Ypetay.  Inway ethay odybay ofway eachway asecay, anyway istlay ofway ethay ormfay\n"
-"  (DISPATCH-TYPE Arvay-Amenay) isway ubstitutedsay ithway ethay ypetay ofway atthay arvay inway atthay\n"
+"NUMBER-DISPATCH ({(Arvay Ypetay)}*) {((Ype*Tay) Orm*Fay) | (Ymbolsay "
+"Arg*Way)}*\n"
+"  Away aguelyvay asecay-ikelay acromay atthay oesday umbernay osscray-"
+"oductpray ispatchesday.  Ethay\n"
+"  Arsvay areway ethay ariablesvay eway areway ispatchingday offway ofway.  "
+"Ethay Ypetay airedpay ithway eachway\n"
+"  Arvay isway usedway inway ethay errorway essagemay enwhay onay asecay "
+"atchesmay.  Eachway asecay ecifiespays away\n"
+"  Ypetay orfay eachway arvay, andway isway executedway enwhay atthay "
+"ignaturesay oldshay.  Away ypetay aymay ebay\n"
+"  away istlay (FOREACH Eachway-Ype*Tay), ausingcay atthay asecay otay ebay "
+"epeatedlyray instantiatwayedway\n"
+"  orfay everyway Eachway-Ypetay.  Inway ethay odybay ofway eachway asecay, "
+"anyway istlay ofway ethay ormfay\n"
+"  (DISPATCH-TYPE Arvay-Amenay) isway ubstitutedsay ithway ethay ypetay ofway "
+"atthay arvay inway atthay\n"
 "  instanceway ofway ethay asecay.\n"
 "\n"
-"  Asway anway alternateway otay away asecay ecspay, erethay aymay ebay away ormfay osewhay CAR isway away "
-"ymbolsay.\n"
-"  Inway isthay asecay, eway applyway ethay CAR ofway ethay ormfay otay ethay CDR andway eattray ethay "
-"esultray ofway\n"
-"  ethay allcay asway away istlay ofway asescay.  Isthay ocesspray isway otnay appliedway ecursivelyray."
+"  Asway anway alternateway otay away asecay ecspay, erethay aymay ebay away "
+"ormfay osewhay CAR isway away ymbolsay.\n"
+"  Inway isthay asecay, eway applyway ethay CAR ofway ethay ormfay otay ethay "
+"CDR andway eattray ethay esultray ofway\n"
+"  ethay allcay asway away istlay ofway asescay.  Isthay ocesspray isway "
+"otnay appliedway ecursivelyray."
 
 #: src/code/numbers.lisp
 msgid ""
 "Returns the element type of the most specialized COMPLEX number type that\n"
 "   can hold parts of type Spec."
 msgstr ""
-"Eturnsray ethay elementway ypetay ofway ethay ostmay ecializedspay COMPLEX umbernay ypetay atthay\n"
+"Eturnsray ethay elementway ypetay ofway ethay ostmay ecializedspay COMPLEX "
+"umbernay ypetay atthay\n"
 "   ancay oldhay artspay ofway ypetay Ecspay."
 
 #: src/code/numbers.lisp
@@ -5362,7 +6160,8 @@ msgstr "Omplexcay umbersnay annotcay avehay omponentscay ofway ypetay ~S."
 
 #: src/code/numbers.lisp
 msgid "Builds a complex number from the specified components."
-msgstr "Uildsbay away omplexcay umbernay omfray ethay ecifiedspay omponentscay."
+msgstr ""
+"Uildsbay away omplexcay umbernay omfray ethay ecifiedspay omponentscay."
 
 #: src/code/numbers.lisp
 msgid "Extracts the real part of a number."
@@ -5377,35 +6176,45 @@ msgid ""
 "Returns the complex conjugate of NUMBER.  For non-complex numbers, this is\n"
 "  an identity."
 msgstr ""
-"Eturnsray ethay omplexcay onjugatecay ofway NUMBER.  Orfay onnay-omplexcay umbersnay, isthay isway\n"
+"Eturnsray ethay omplexcay onjugatecay ofway NUMBER.  Orfay onnay-omplexcay "
+"umbersnay, isthay isway\n"
 "  anway identityway."
 
 #: src/code/numbers.lisp
 msgid "If NUMBER is zero, return NUMBER, else return (/ NUMBER (ABS NUMBER))."
-msgstr "Ifway NUMBER isway erozay, eturnray NUMBER, elseway eturnray (/ NUMBER (ABS NUMBER))."
+msgstr ""
+"Ifway NUMBER isway erozay, eturnray NUMBER, elseway eturnray (/ NUMBER (ABS "
+"NUMBER))."
 
 #: src/code/numbers.lisp
 msgid "Return the numerator of NUMBER, which must be rational."
-msgstr "Eturnray ethay umeratornay ofway NUMBER, ichwhay ustmay ebay ationalray."
+msgstr ""
+"Eturnray ethay umeratornay ofway NUMBER, ichwhay ustmay ebay ationalray."
 
 #: src/code/numbers.lisp
 msgid "Return the denominator of NUMBER, which must be rational."
-msgstr "Eturnray ethay enominatorday ofway NUMBER, ichwhay ustmay ebay ationalray."
+msgstr ""
+"Eturnray ethay enominatorday ofway NUMBER, ichwhay ustmay ebay ationalray."
 
 #: src/code/numbers.lisp
 msgid "Returns the sum of its arguments.  With no args, returns 0."
-msgstr "Eturnsray ethay umsay ofway itsway argumentsway.  Ithway onay argsway, eturnsray 0."
+msgstr ""
+"Eturnsray ethay umsay ofway itsway argumentsway.  Ithway onay argsway, "
+"eturnsray 0."
 
 #: src/code/numbers.lisp
 msgid "Returns the product of its arguments.  With no args, returns 1."
-msgstr "Eturnsray ethay oductpray ofway itsway argumentsway.  Ithway onay argsway, eturnsray 1."
+msgstr ""
+"Eturnsray ethay oductpray ofway itsway argumentsway.  Ithway onay argsway, "
+"eturnsray 1."
 
 #: src/code/numbers.lisp
 msgid ""
 "Subtracts the second and all subsequent arguments from the first.\n"
 "  With one arg, negates it."
 msgstr ""
-"Ubtractssay ethay econdsay andway allway ubsequentsay argumentsway omfray ethay irstfay.\n"
+"Ubtractssay ethay econdsay andway allway ubsequentsay argumentsway omfray "
+"ethay irstfay.\n"
 "  Ithway oneway argway, egatesnay itway."
 
 #: src/code/numbers.lisp
@@ -5413,7 +6222,8 @@ msgid ""
 "Divides the first arg by each of the following arguments, in turn.\n"
 "  With one arg, returns reciprocal."
 msgstr ""
-"Ividesday ethay irstfay argway ybay eachway ofway ethay ollowingfay argumentsway, inway urntay.\n"
+"Ividesday ethay irstfay argway ybay eachway ofway ethay ollowingfay "
+"argumentsway, inway urntay.\n"
 "  Ithway oneway argway, eturnsray eciprocalray."
 
 #: src/code/numbers.lisp
@@ -5429,7 +6239,8 @@ msgid ""
 "Returns number (or number/divisor) as an integer, rounded toward 0.\n"
 "  The second returned value is the remainder."
 msgstr ""
-"Eturnsray umbernay (orway umbernay/ivisorday) asway anway integerway, oundedray owardtay 0.\n"
+"Eturnsray umbernay (orway umbernay/ivisorday) asway anway integerway, "
+"oundedray owardtay 0.\n"
 "  Ethay econdsay eturnedray aluevay isway ethay emainderray."
 
 #: src/code/numbers.lisp
@@ -5437,7 +6248,8 @@ msgid ""
 "Returns the greatest integer not greater than number, or number/divisor.\n"
 "  The second returned value is (mod number divisor)."
 msgstr ""
-"Eturnsray ethay eatestgray integerway otnay eatergray anthay umbernay, orway umbernay/ivisorday.\n"
+"Eturnsray ethay eatestgray integerway otnay eatergray anthay umbernay, orway "
+"umbernay/ivisorday.\n"
 "  Ethay econdsay eturnedray aluevay isway (odmay umbernay ivisorday)."
 
 #: src/code/numbers.lisp
@@ -5445,7 +6257,8 @@ msgid ""
 "Returns the smallest integer not less than number, or number/divisor.\n"
 "  The second returned value is the remainder."
 msgstr ""
-"Eturnsray ethay mallestsay integerway otnay esslay anthay umbernay, orway umbernay/ivisorday.\n"
+"Eturnsray ethay mallestsay integerway otnay esslay anthay umbernay, orway "
+"umbernay/ivisorday.\n"
 "  Ethay econdsay eturnedray aluevay isway ethay emainderray."
 
 #: src/code/numbers.lisp
@@ -5466,55 +6279,64 @@ msgstr "Eturnsray econdsay esultray ofway FLOOR."
 
 #: src/code/numbers.lisp
 msgid "Same as TRUNCATE, but returns first value as a float."
-msgstr "Amesay asway TRUNCATE, utbay eturnsray irstfay aluevay asway away oatflay."
+msgstr ""
+"Amesay asway TRUNCATE, utbay eturnsray irstfay aluevay asway away oatflay."
 
 #: src/code/numbers.lisp
 msgid "Same as FLOOR, but returns first value as a float."
-msgstr "Amesay asway FLOOR, utbay eturnsray irstfay aluevay asway away oatflay."
+msgstr ""
+"Amesay asway FLOOR, utbay eturnsray irstfay aluevay asway away oatflay."
 
 #: src/code/numbers.lisp
 msgid "Same as CEILING, but returns first value as a float."
-msgstr "Amesay asway CEILING, utbay eturnsray irstfay aluevay asway away oatflay."
+msgstr ""
+"Amesay asway CEILING, utbay eturnsray irstfay aluevay asway away oatflay."
 
 #: src/code/numbers.lisp
 msgid "Same as ROUND, but returns first value as a float."
-msgstr "Amesay asway ROUND, utbay eturnsray irstfay aluevay asway away oatflay."
+msgstr ""
+"Amesay asway ROUND, utbay eturnsray irstfay aluevay asway away oatflay."
 
 #: src/code/numbers.lisp
-msgid ""
-"Returns T if all of its arguments are numerically equal, NIL otherwise."
+msgid "Returns T if all of its arguments are numerically equal, NIL otherwise."
 msgstr ""
-"Eturnsray T ifway allway ofway itsway argumentsway areway umericallynay equalway, NIL otherwiseway."
+"Eturnsray T ifway allway ofway itsway argumentsway areway umericallynay "
+"equalway, NIL otherwiseway."
 
 #: src/code/numbers.lisp
 msgid ""
 "Returns T if no two of its arguments are numerically equal, NIL otherwise."
 msgstr ""
-"Eturnsray T ifway onay wotay ofway itsway argumentsway areway umericallynay equalway, NIL otherwiseway."
+"Eturnsray T ifway onay wotay ofway itsway argumentsway areway umericallynay "
+"equalway, NIL otherwiseway."
 
 #: src/code/numbers.lisp
 msgid ""
 "Returns T if its arguments are in strictly increasing order, NIL otherwise."
 msgstr ""
-"Eturnsray T ifway itsway argumentsway areway inway ictlystray increasingway orderway, NIL otherwiseway."
+"Eturnsray T ifway itsway argumentsway areway inway ictlystray increasingway "
+"orderway, NIL otherwiseway."
 
 #: src/code/numbers.lisp
 msgid ""
 "Returns T if its arguments are in strictly decreasing order, NIL otherwise."
 msgstr ""
-"Eturnsray T ifway itsway argumentsway areway inway ictlystray ecreasingday orderway, NIL otherwiseway."
+"Eturnsray T ifway itsway argumentsway areway inway ictlystray ecreasingday "
+"orderway, NIL otherwiseway."
 
 #: src/code/numbers.lisp
 msgid ""
 "Returns T if arguments are in strictly non-decreasing order, NIL otherwise."
 msgstr ""
-"Eturnsray T ifway argumentsway areway inway ictlystray onnay-ecreasingday orderway, NIL otherwiseway."
+"Eturnsray T ifway argumentsway areway inway ictlystray onnay-ecreasingday "
+"orderway, NIL otherwiseway."
 
 #: src/code/numbers.lisp
 msgid ""
 "Returns T if arguments are in strictly non-increasing order, NIL otherwise."
 msgstr ""
-"Eturnsray T ifway argumentsway areway inway ictlystray onnay-increasingway orderway, NIL otherwiseway."
+"Eturnsray T ifway argumentsway areway inway ictlystray onnay-increasingway "
+"orderway, NIL otherwiseway."
 
 #: src/code/numbers.lisp
 msgid "Returns the greatest of its arguments."
@@ -5526,51 +6348,67 @@ msgstr "Eturnsray ethay eastlay ofway itsway argumentsway."
 
 #: src/code/numbers.lisp
 msgid "Return T if OBJ1 and OBJ2 represent the same object, otherwise NIL."
-msgstr "Eturnray T ifway OBJ1 andway OBJ2 epresentray ethay amesay objectway, otherwiseway NIL."
+msgstr ""
+"Eturnray T ifway OBJ1 andway OBJ2 epresentray ethay amesay objectway, "
+"otherwiseway NIL."
 
 #: src/code/numbers.lisp
 msgid "Returns the bit-wise or of its arguments.  Args must be integers."
-msgstr "Eturnsray ethay itbay-iseway orway ofway itsway argumentsway.  Argsway ustmay ebay integersway."
+msgstr ""
+"Eturnsray ethay itbay-iseway orway ofway itsway argumentsway.  Argsway "
+"ustmay ebay integersway."
 
 #: src/code/numbers.lisp
 msgid ""
 "Returns the bit-wise exclusive or of its arguments.  Args must be integers."
 msgstr ""
-"Eturnsray ethay itbay-iseway exclusiveway orway ofway itsway argumentsway.  Argsway ustmay ebay integersway."
+"Eturnsray ethay itbay-iseway exclusiveway orway ofway itsway argumentsway.  "
+"Argsway ustmay ebay integersway."
 
 #: src/code/numbers.lisp
 msgid "Returns the bit-wise and of its arguments.  Args must be integers."
-msgstr "Eturnsray ethay itbay-iseway andway ofway itsway argumentsway.  Argsway ustmay ebay integersway."
+msgstr ""
+"Eturnsray ethay itbay-iseway andway ofway itsway argumentsway.  Argsway "
+"ustmay ebay integersway."
 
 #: src/code/numbers.lisp
 msgid ""
 "Returns the bit-wise equivalence of its arguments.  Args must be integers."
 msgstr ""
-"Eturnsray ethay itbay-iseway equivalenceway ofway itsway argumentsway.  Argsway ustmay ebay integersway."
+"Eturnsray ethay itbay-iseway equivalenceway ofway itsway argumentsway.  "
+"Argsway ustmay ebay integersway."
 
 #: src/code/numbers.lisp
 msgid "Returns the complement of the logical AND of integer1 and integer2."
-msgstr "Eturnsray ethay omplementcay ofway ethay ogicallay AND ofway integerway1 andway integerway2."
+msgstr ""
+"Eturnsray ethay omplementcay ofway ethay ogicallay AND ofway integerway1 "
+"andway integerway2."
 
 #: src/code/numbers.lisp
 msgid "Returns the complement of the logical OR of integer1 and integer2."
-msgstr "Eturnsray ethay omplementcay ofway ethay ogicallay OR ofway integerway1 andway integerway2."
+msgstr ""
+"Eturnsray ethay omplementcay ofway ethay ogicallay OR ofway integerway1 "
+"andway integerway2."
 
 #: src/code/numbers.lisp
 msgid "Returns the logical AND of (LOGNOT integer1) and integer2."
-msgstr "Eturnsray ethay ogicallay AND ofway (LOGNOT integerway1) andway integerway2."
+msgstr ""
+"Eturnsray ethay ogicallay AND ofway (LOGNOT integerway1) andway integerway2."
 
 #: src/code/numbers.lisp
 msgid "Returns the logical AND of integer1 and (LOGNOT integer2)."
-msgstr "Eturnsray ethay ogicallay AND ofway integerway1 andway (LOGNOT integerway2)."
+msgstr ""
+"Eturnsray ethay ogicallay AND ofway integerway1 andway (LOGNOT integerway2)."
 
 #: src/code/numbers.lisp
 msgid "Returns the logical OR of (LOGNOT integer1) and integer2."
-msgstr "Eturnsray ethay ogicallay OR ofway (LOGNOT integerway1) andway integerway2."
+msgstr ""
+"Eturnsray ethay ogicallay OR ofway (LOGNOT integerway1) andway integerway2."
 
 #: src/code/numbers.lisp
 msgid "Returns the logical OR of integer1 and (LOGNOT integer2)."
-msgstr "Eturnsray ethay ogicallay OR ofway integerway1 andway (LOGNOT integerway2)."
+msgstr ""
+"Eturnsray ethay ogicallay OR ofway integerway1 andway (LOGNOT integerway2)."
 
 #: src/code/numbers.lisp
 msgid "Returns the bit-wise logical not of integer."
@@ -5578,11 +6416,15 @@ msgstr "Eturnsray ethay itbay-iseway ogicallay otnay ofway integerway."
 
 #: src/code/numbers.lisp
 msgid "Returns the complement of the AND of integer1 and integer2"
-msgstr "Eturnsray ethay omplementcay ofway ethay AND ofway integerway1 andway integerway2"
+msgstr ""
+"Eturnsray ethay omplementcay ofway ethay AND ofway integerway1 andway "
+"integerway2"
 
 #: src/code/numbers.lisp
 msgid "Returns the complement of the OR of integer1 and integer2"
-msgstr "Eturnsray ethay omplementcay ofway ethay OR ofway integerway1 andway integerway2"
+msgstr ""
+"Eturnsray ethay omplementcay ofway ethay OR ofway integerway1 andway "
+"integerway2"
 
 #: src/code/numbers.lisp
 msgid "Returns the AND of (LOGNOT integer1) and integer2"
@@ -5605,76 +6447,90 @@ msgid ""
 "Count the number of 1 bits if INTEGER is positive, and the number of 0 bits\n"
 "  if INTEGER is negative."
 msgstr ""
-"Ountcay ethay umbernay ofway 1 itsbay ifway INTEGER isway ositivepay, andway ethay umbernay ofway 0 itsbay\n"
+"Ountcay ethay umbernay ofway 1 itsbay ifway INTEGER isway ositivepay, andway "
+"ethay umbernay ofway 0 itsbay\n"
 "  ifway INTEGER isway egativenay."
 
 #: src/code/numbers.lisp
 msgid ""
 "Predicate which returns T if logand of integer1 and integer2 is not zero."
 msgstr ""
-"Edicatepray ichwhay eturnsray T ifway ogandlay ofway integerway1 andway integerway2 isway otnay erozay."
+"Edicatepray ichwhay eturnsray T ifway ogandlay ofway integerway1 andway "
+"integerway2 isway otnay erozay."
 
 #: src/code/numbers.lisp
 msgid ""
 "Predicate returns T if bit index of integer is a 1.  The least\n"
 "significant bit of INTEGER is bit 0."
 msgstr ""
-"Edicatepray eturnsray T ifway itbay indexway ofway integerway isway away 1.  Ethay eastlay\n"
+"Edicatepray eturnsray T ifway itbay indexway ofway integerway isway away 1.  "
+"Ethay eastlay\n"
 "ignificantsay itbay ofway INTEGER isway itbay 0."
 
 #: src/code/numbers.lisp
 msgid ""
 "Shifts integer left by count places preserving sign.  - count shifts right."
 msgstr ""
-"Iftsshay integerway eftlay ybay ountcay acesplay eservingpray ignsay.  - ountcay iftsshay ightray."
+"Iftsshay integerway eftlay ybay ountcay acesplay eservingpray ignsay.  - "
+"ountcay iftsshay ightray."
 
 #: src/code/numbers.lisp
 msgid ""
 "Returns the number of significant bits in the absolute value of integer."
 msgstr ""
-"Eturnsray ethay umbernay ofway ignificantsay itsbay inway ethay absoluteway aluevay ofway integerway."
+"Eturnsray ethay umbernay ofway ignificantsay itsbay inway ethay absoluteway "
+"aluevay ofway integerway."
 
 #: src/code/numbers.lisp
 msgid "Returns a byte specifier which may be used by other byte functions."
-msgstr "Eturnsray away ytebay ecifierspay ichwhay aymay ebay usedway ybay otherway ytebay unctionsfay."
+msgstr ""
+"Eturnsray away ytebay ecifierspay ichwhay aymay ebay usedway ybay otherway "
+"ytebay unctionsfay."
 
 #: src/code/numbers.lisp
 msgid "Returns the size part of the byte specifier bytespec."
-msgstr "Eturnsray ethay izesay artpay ofway ethay ytebay ecifierspay ytespecbay."
+msgstr ""
+"Eturnsray ethay izesay artpay ofway ethay ytebay ecifierspay ytespecbay."
 
 #: src/code/numbers.lisp
 msgid "Returns the position part of the byte specifier bytespec."
-msgstr "Eturnsray ethay ositionpay artpay ofway ethay ytebay ecifierspay ytespecbay."
+msgstr ""
+"Eturnsray ethay ositionpay artpay ofway ethay ytebay ecifierspay ytespecbay."
 
 #: src/code/numbers.lisp
 msgid "Extract the specified byte from integer, and right justify result."
-msgstr "Extractway ethay ecifiedspay ytebay omfray integerway, andway ightray ustifyjay esultray."
+msgstr ""
+"Extractway ethay ecifiedspay ytebay omfray integerway, andway ightray "
+"ustifyjay esultray."
 
 #: src/code/numbers.lisp
 msgid "Returns T if any of the specified bits in integer are 1's."
-msgstr "Eturnsray T ifway anyway ofway ethay ecifiedspay itsbay inway integerway areway 1's."
+msgstr ""
+"Eturnsray T ifway anyway ofway ethay ecifiedspay itsbay inway integerway "
+"areway 1's."
 
 #: src/code/numbers.lisp
 msgid ""
 "Extract the specified byte from integer,  but do not right justify result."
 msgstr ""
-"Extractway ethay ecifiedspay ytebay omfray integerway,  utbay oday otnay ightray ustifyjay esultray."
+"Extractway ethay ecifiedspay ytebay omfray integerway,  utbay oday otnay "
+"ightray ustifyjay esultray."
 
 #: src/code/numbers.lisp
 msgid ""
 "Returns new integer with newbyte in specified position, newbyte is right "
 "justified."
 msgstr ""
-"Eturnsray ewnay integerway ithway ewbytenay inway ecifiedspay ositionpay, ewbytenay isway ightray "
-"ustifiedjay."
+"Eturnsray ewnay integerway ithway ewbytenay inway ecifiedspay ositionpay, "
+"ewbytenay isway ightray ustifiedjay."
 
 #: src/code/numbers.lisp
 msgid ""
-"Returns new integer with newbyte in specified position, newbyte is not "
-"right justified."
+"Returns new integer with newbyte in specified position, newbyte is not right "
+"justified."
 msgstr ""
-"Eturnsray ewnay integerway ithway ewbytenay inway ecifiedspay ositionpay, ewbytenay isway otnay "
-"ightray ustifiedjay."
+"Eturnsray ewnay integerway ithway ewbytenay inway ecifiedspay ositionpay, "
+"ewbytenay isway otnay ightray ustifiedjay."
 
 #: src/code/numbers.lisp
 msgid "Boole function op, makes BOOLE return 0."
@@ -5694,106 +6550,125 @@ msgstr "Oolebay unctionfay opway, akesmay BOOLE eturnray integerway2."
 
 #: src/code/numbers.lisp
 msgid "Boole function op, makes BOOLE return complement of integer1."
-msgstr "Oolebay unctionfay opway, akesmay BOOLE eturnray omplementcay ofway integerway1."
+msgstr ""
+"Oolebay unctionfay opway, akesmay BOOLE eturnray omplementcay ofway "
+"integerway1."
 
 #: src/code/numbers.lisp
 msgid "Boole function op, makes BOOLE return complement of integer2."
-msgstr "Oolebay unctionfay opway, akesmay BOOLE eturnray omplementcay ofway integerway2."
+msgstr ""
+"Oolebay unctionfay opway, akesmay BOOLE eturnray omplementcay ofway "
+"integerway2."
 
 #: src/code/numbers.lisp
 msgid "Boole function op, makes BOOLE return logand of integer1 and integer2."
-msgstr "Oolebay unctionfay opway, akesmay BOOLE eturnray ogandlay ofway integerway1 andway integerway2."
+msgstr ""
+"Oolebay unctionfay opway, akesmay BOOLE eturnray ogandlay ofway integerway1 "
+"andway integerway2."
 
 #: src/code/numbers.lisp
 msgid "Boole function op, makes BOOLE return logior of integer1 and integer2."
-msgstr "Oolebay unctionfay opway, akesmay BOOLE eturnray ogiorlay ofway integerway1 andway integerway2."
+msgstr ""
+"Oolebay unctionfay opway, akesmay BOOLE eturnray ogiorlay ofway integerway1 "
+"andway integerway2."
 
 #: src/code/numbers.lisp
 msgid "Boole function op, makes BOOLE return logxor of integer1 and integer2."
-msgstr "Oolebay unctionfay opway, akesmay BOOLE eturnray ogxorlay ofway integerway1 andway integerway2."
+msgstr ""
+"Oolebay unctionfay opway, akesmay BOOLE eturnray ogxorlay ofway integerway1 "
+"andway integerway2."
 
 #: src/code/numbers.lisp
 msgid "Boole function op, makes BOOLE return logeqv of integer1 and integer2."
-msgstr "Oolebay unctionfay opway, akesmay BOOLE eturnray ogeqvlay ofway integerway1 andway integerway2."
+msgstr ""
+"Oolebay unctionfay opway, akesmay BOOLE eturnray ogeqvlay ofway integerway1 "
+"andway integerway2."
 
 #: src/code/numbers.lisp
 msgid ""
 "Boole function op, makes BOOLE return log nand of integer1 and integer2."
 msgstr ""
-"Oolebay unctionfay opway, akesmay BOOLE eturnray oglay andnay ofway integerway1 andway integerway2."
+"Oolebay unctionfay opway, akesmay BOOLE eturnray oglay andnay ofway "
+"integerway1 andway integerway2."
 
 #: src/code/numbers.lisp
 msgid "Boole function op, makes BOOLE return lognor of integer1 and integer2."
-msgstr "Oolebay unctionfay opway, akesmay BOOLE eturnray ognorlay ofway integerway1 andway integerway2."
+msgstr ""
+"Oolebay unctionfay opway, akesmay BOOLE eturnray ognorlay ofway integerway1 "
+"andway integerway2."
 
 #: src/code/numbers.lisp
 msgid ""
 "Boole function op, makes BOOLE return logandc1 of integer1 and integer2."
 msgstr ""
-"Oolebay unctionfay opway, akesmay BOOLE eturnray ogandclay1 ofway integerway1 andway integerway2."
+"Oolebay unctionfay opway, akesmay BOOLE eturnray ogandclay1 ofway "
+"integerway1 andway integerway2."
 
 #: src/code/numbers.lisp
 msgid ""
 "Boole function op, makes BOOLE return logandc2 of integer1 and integer2."
 msgstr ""
-"Oolebay unctionfay opway, akesmay BOOLE eturnray ogandclay2 ofway integerway1 andway integerway2."
+"Oolebay unctionfay opway, akesmay BOOLE eturnray ogandclay2 ofway "
+"integerway1 andway integerway2."
 
 #: src/code/numbers.lisp
-msgid ""
-"Boole function op, makes BOOLE return logorc1 of integer1 and integer2."
+msgid "Boole function op, makes BOOLE return logorc1 of integer1 and integer2."
 msgstr ""
-"Oolebay unctionfay opway, akesmay BOOLE eturnray ogorclay1 ofway integerway1 andway integerway2."
+"Oolebay unctionfay opway, akesmay BOOLE eturnray ogorclay1 ofway integerway1 "
+"andway integerway2."
 
 #: src/code/numbers.lisp
-msgid ""
-"Boole function op, makes BOOLE return logorc2 of integer1 and integer2."
+msgid "Boole function op, makes BOOLE return logorc2 of integer1 and integer2."
 msgstr ""
-"Oolebay unctionfay opway, akesmay BOOLE eturnray ogorclay2 ofway integerway1 andway integerway2."
+"Oolebay unctionfay opway, akesmay BOOLE eturnray ogorclay2 ofway integerway1 "
+"andway integerway2."
 
 #: src/code/numbers.lisp
 msgid ""
 "Bit-wise boolean function on two integers.  Function chosen by OP:\n"
-"	0	BOOLE-CLR\n"
-"	1	BOOLE-SET\n"
-"	2	BOOLE-1\n"
-"  	3	BOOLE-2\n"
-"	4	BOOLE-C1\n"
-"	5	BOOLE-C2\n"
-"	6	BOOLE-AND\n"
-"	7	BOOLE-IOR\n"
-" 	8	BOOLE-XOR\n"
-"	9	BOOLE-EQV\n"
-"	10	BOOLE-NAND\n"
-"	11	BOOLE-NOR\n"
-"	12	BOOLE-ANDC1\n"
-"	13	BOOLE-ANDC2\n"
-"	14	BOOLE-ORC1\n"
-"	15	BOOLE-ORC2"
-msgstr ""
-"Itbay-iseway ooleanbay unctionfay onway wotay integersway.  Unctionfay osenchay ybay OP:\n"
-"	0	BOOLE-CLR\n"
-"	1	BOOLE-SET\n"
-"	2	BOOLE-1\n"
-"  	3	BOOLE-2\n"
-"	4	BOOLE-C1\n"
-"	5	BOOLE-C2\n"
-"	6	BOOLE-AND\n"
-"	7	BOOLE-IOR\n"
-" 	8	BOOLE-XOR\n"
-"	9	BOOLE-EQV\n"
-"	10	BOOLE-NAND\n"
-"	11	BOOLE-NOR\n"
-"	12	BOOLE-ANDC1\n"
-"	13	BOOLE-ANDC2\n"
-"	14	BOOLE-ORC1\n"
-"	15	BOOLE-ORC2"
+"\t0\tBOOLE-CLR\n"
+"\t1\tBOOLE-SET\n"
+"\t2\tBOOLE-1\n"
+"  \t3\tBOOLE-2\n"
+"\t4\tBOOLE-C1\n"
+"\t5\tBOOLE-C2\n"
+"\t6\tBOOLE-AND\n"
+"\t7\tBOOLE-IOR\n"
+" \t8\tBOOLE-XOR\n"
+"\t9\tBOOLE-EQV\n"
+"\t10\tBOOLE-NAND\n"
+"\t11\tBOOLE-NOR\n"
+"\t12\tBOOLE-ANDC1\n"
+"\t13\tBOOLE-ANDC2\n"
+"\t14\tBOOLE-ORC1\n"
+"\t15\tBOOLE-ORC2"
+msgstr ""
+"Itbay-iseway ooleanbay unctionfay onway wotay integersway.  Unctionfay "
+"osenchay ybay OP:\n"
+"\t0\tBOOLE-CLR\n"
+"\t1\tBOOLE-SET\n"
+"\t2\tBOOLE-1\n"
+"  \t3\tBOOLE-2\n"
+"\t4\tBOOLE-C1\n"
+"\t5\tBOOLE-C2\n"
+"\t6\tBOOLE-AND\n"
+"\t7\tBOOLE-IOR\n"
+" \t8\tBOOLE-XOR\n"
+"\t9\tBOOLE-EQV\n"
+"\t10\tBOOLE-NAND\n"
+"\t11\tBOOLE-NOR\n"
+"\t12\tBOOLE-ANDC1\n"
+"\t13\tBOOLE-ANDC2\n"
+"\t14\tBOOLE-ORC1\n"
+"\t15\tBOOLE-ORC2"
 
 #: src/code/numbers.lisp
 msgid ""
 "Returns the greatest common divisor of the arguments, which must be\n"
 "  integers.  Gcd with no arguments is defined to be 0."
 msgstr ""
-"Eturnsray ethay eatestgray ommoncay ivisorday ofway ethay argumentsway, ichwhay ustmay ebay\n"
+"Eturnsray ethay eatestgray ommoncay ivisorday ofway ethay argumentsway, "
+"ichwhay ustmay ebay\n"
 "  integersway.  Cdgay ithway onay argumentsway isway efinedday otay ebay 0."
 
 #: src/code/numbers.lisp
@@ -5801,7 +6676,8 @@ msgid ""
 "Returns the least common multiple of one or more integers.  LCM of no\n"
 "  arguments is defined to be 1."
 msgstr ""
-"Eturnsray ethay eastlay ommoncay ultiplemay ofway oneway orway oremay integersway.  LCM ofway onay\n"
+"Eturnsray ethay eastlay ommoncay ultiplemay ofway oneway orway oremay "
+"integersway.  LCM ofway onay\n"
 "  argumentsway isway efinedday otay ebay 1."
 
 #: src/code/numbers.lisp
@@ -5813,7 +6689,8 @@ msgid ""
 "Returns the root of the nearest integer less than n which is a perfect\n"
 "   square."
 msgstr ""
-"Eturnsray ethay ootray ofway ethay earestnay integerway esslay anthay n ichwhay isway away erfectpay\n"
+"Eturnsray ethay ootray ofway ethay earestnay integerway esslay anthay n "
+"ichwhay isway away erfectpay\n"
 "   quaresay."
 
 #: src/code/numbers.lisp
@@ -5847,8 +6724,8 @@ msgid ""
 "  keywords:\n"
 "\n"
 "   :TRAPS\n"
-"       A list of the exception conditions that should cause traps.  Possible"
-"\n"
+"       A list of the exception conditions that should cause traps.  "
+"Possible\n"
 "       exceptions are :UNDERFLOW, :OVERFLOW, :INEXACT, :INVALID,\n"
 "       :DIVIDE-BY-ZERO, and on the X86 :DENORMALIZED-OPERAND. Initially\n"
 "       all traps except :INEXACT are enabled.\n"
@@ -5873,35 +6750,44 @@ msgid ""
 "   GET-FLOATING-POINT-MODES may be used to find the floating point modes\n"
 "   currently in effect."
 msgstr ""
-"Isthay unctionfay etssay optionsway ontrollingcay ethay oatingflay-ointpay ardwarehay.  Ifway away\n"
-"  eywordkay isway otnay uppliedsay, enthay ethay urrentcay aluevay isway eservedpray.  Ossiblepay\n"
+"Isthay unctionfay etssay optionsway ontrollingcay ethay oatingflay-ointpay "
+"ardwarehay.  Ifway away\n"
+"  eywordkay isway otnay uppliedsay, enthay ethay urrentcay aluevay isway "
+"eservedpray.  Ossiblepay\n"
 "  eywordskay:\n"
 "\n"
 "   :TRAPS\n"
-"       Away istlay ofway ethay exceptionway onditionscay atthay ouldshay ausecay apstray.  Ossiblepay"
-"\n"
+"       Away istlay ofway ethay exceptionway onditionscay atthay ouldshay "
+"ausecay apstray.  Ossiblepay\n"
 "       exceptionsway areway :UNDERFLOW, :OVERFLOW, :INEXACT, :INVALID,\n"
-"       :DIVIDE-BY-ZERO, andway onway ethay X86 :DENORMALIZED-OPERAND. Initiallyway\n"
+"       :DIVIDE-BY-ZERO, andway onway ethay X86 :DENORMALIZED-OPERAND. "
+"Initiallyway\n"
 "       allway apstray exceptway :INEXACT areway enabledway.\n"
 "\n"
 "   :ROUNDING-MODE\n"
-"       Ethay oundingray odemay otay useway enwhay ethay esultray isway otnay exactway.  Ossiblepay "
-"aluesvay\n"
-"       areway :NEAREST, :POSITIVE-INFINITY, :NEGATIVE-INFINITY andway :ZERO.\n"
+"       Ethay oundingray odemay otay useway enwhay ethay esultray isway otnay "
+"exactway.  Ossiblepay aluesvay\n"
+"       areway :NEAREST, :POSITIVE-INFINITY, :NEGATIVE-INFINITY andway :"
+"ZERO.\n"
 "       Initiallyway, ethay oundingray odemay isway :NEAREST.\n"
 "\n"
 "   :CURRENT-EXCEPTIONS\n"
 "   :ACCRUED-EXCEPTIONS\n"
-"       Esethay argumentsway allowway ettingsay ofway ethay exceptionway agsflay.  Ethay ainmay useway "
-"isway\n"
-"       ettingsay ethay accruedway exceptionsway otay NIL otay earclay emthay.\n"
+"       Esethay argumentsway allowway ettingsay ofway ethay exceptionway "
+"agsflay.  Ethay ainmay useway isway\n"
+"       ettingsay ethay accruedway exceptionsway otay NIL otay earclay "
+"emthay.\n"
 "\n"
 "   :FAST-MODE\n"
-"       Etsay ethay ardwarehay's \"astfay odemay\" agflay, ifway anyway.  Enwhay etsay, IEEE\n"
-"       onformancecay orway ebuggabilityday aymay ebay impairedway.  Omesay achinesmay aymay otnay\n"
-"       avehay isthay eaturefay, inway ichwhay asecay ethay aluevay isway alwaysway NIL.\n"
-"\n"
-"   GET-FLOATING-POINT-MODES aymay ebay usedway otay indfay ethay oatingflay ointpay odesmay\n"
+"       Etsay ethay ardwarehay's \"astfay odemay\" agflay, ifway anyway.  "
+"Enwhay etsay, IEEE\n"
+"       onformancecay orway ebuggabilityday aymay ebay impairedway.  Omesay "
+"achinesmay aymay otnay\n"
+"       avehay isthay eaturefay, inway ichwhay asecay ethay aluevay isway "
+"alwaysway NIL.\n"
+"\n"
+"   GET-FLOATING-POINT-MODES aymay ebay usedway otay indfay ethay oatingflay "
+"ointpay odesmay\n"
 "   urrentlycay inway effectway."
 
 #: src/code/float-trap.lisp
@@ -5915,16 +6801,19 @@ msgid ""
 "  SET-FLOATING-POINT-MODES, i.e. \n"
 "      (apply #'set-floating-point-modes (get-floating-point-modes))\n"
 "\n"
-"  sets the floating point modes to their current values (and thus is a "
-"no-op)."
+"  sets the floating point modes to their current values (and thus is a no-"
+"op)."
 msgstr ""
-"Isthay unctionfay eturnsray away istlay epresentingray ethay tatesay ofway ethay oatingflay ointpay\n"
-"  odesmay.  Ethay istlay isway inway ethay amesay ormatfay asway ethay eywordkay argumentsway otay\n"
+"Isthay unctionfay eturnsray away istlay epresentingray ethay tatesay ofway "
+"ethay oatingflay ointpay\n"
+"  odesmay.  Ethay istlay isway inway ethay amesay ormatfay asway ethay "
+"eywordkay argumentsway otay\n"
 "  SET-FLOATING-POINT-MODES, i.e. \n"
-"      (applyway #'etsay-oatingflay-ointpay-odesmay (etgay-oatingflay-ointpay-odesmay))\n"
+"      (applyway #'etsay-oatingflay-ointpay-odesmay (etgay-oatingflay-ointpay-"
+"odesmay))\n"
 "\n"
-"  etssay ethay oatingflay ointpay odesmay otay eirthay urrentcay aluesvay (andway usthay isway away "
-"onay-opway)."
+"  etssay ethay oatingflay ointpay odesmay otay eirthay urrentcay aluesvay "
+"(andway usthay isway away onay-opway)."
 
 #: src/code/float-trap.lisp
 msgid ""
@@ -5933,7 +6822,8 @@ msgid ""
 "  otherwise."
 msgstr ""
 "Urrentcay-Oatflay-Aptray Aptray-Ame*Nay\n"
-"  Eturnray uetray ifway anyway ofway ethay amednay apstray areway urrentlycay appedtray, alsefay\n"
+"  Eturnray uetray ifway anyway ofway ethay amednay apstray areway "
+"urrentlycay appedtray, alsefay\n"
 "  otherwiseway."
 
 #: src/code/float-trap.lisp
@@ -5949,11 +6839,15 @@ msgid ""
 "  accrued exceptions are cleared at the start of the body to support\n"
 "  their testing within, and restored on exit."
 msgstr ""
-"Executeway BODY ithway ethay oatingflay ointpay exceptionsway istedlay inway TRAPS\n"
-"  askedmay (isabledday).  TRAPS ouldshay ebay away istlay ofway ossiblepay exceptionsway\n"
+"Executeway BODY ithway ethay oatingflay ointpay exceptionsway istedlay inway "
+"TRAPS\n"
+"  askedmay (isabledday).  TRAPS ouldshay ebay away istlay ofway ossiblepay "
+"exceptionsway\n"
 "  ichwhay includesway :UNDERFLOW, :OVERFLOW, :INEXACT, :INVALID andway\n"
-"  :DIVIDE-BY-ZERO andway onway ethay X86 :DENORMALIZED-OPERAND. Ethay espectiveray\n"
-"  accruedway exceptionsway areway earedclay atway ethay tartsay ofway ethay odybay otay upportsay\n"
+"  :DIVIDE-BY-ZERO andway onway ethay X86 :DENORMALIZED-OPERAND. Ethay "
+"espectiveray\n"
+"  accruedway exceptionsway areway earedclay atway ethay tartsay ofway ethay "
+"odybay otay upportsay\n"
 "  eirthay estingtay ithinway, andway estoredray onway exitway."
 
 #: src/code/float.lisp
@@ -5962,22 +6856,27 @@ msgstr "Eturnray uetray ifway ethay oatflay X isway enormalizedday."
 
 #: src/code/float.lisp
 msgid "Return true if the float X is an infinity (+ or -)."
-msgstr "Eturnray uetray ifway ethay oatflay X isway anway infinityway (+ orway -)."
+msgstr ""
+"Eturnray uetray ifway ethay oatflay X isway anway infinityway (+ orway -)."
 
 #: src/code/float.lisp
 msgid "Return true if the float X is a NaN (Not a Number)."
-msgstr "Eturnray uetray ifway ethay oatflay X isway away Annay (Otnay away Umbernay)."
+msgstr ""
+"Eturnray uetray ifway ethay oatflay X isway away Annay (Otnay away Umbernay)."
 
 #: src/code/float.lisp
 msgid "Return true if the float X is a trapping NaN (Not a Number)."
-msgstr "Eturnray uetray ifway ethay oatflay X isway away appingtray Annay (Otnay away Umbernay)."
+msgstr ""
+"Eturnray uetray ifway ethay oatflay X isway away appingtray Annay (Otnay "
+"away Umbernay)."
 
 #: src/code/float.lisp
 msgid ""
 "Returns a non-negative number of significant digits in it's float argument.\n"
 "  Will be less than FLOAT-DIGITS if denormalized or zero."
 msgstr ""
-"Eturnsray away onnay-egativenay umbernay ofway ignificantsay igitsday inway itway's oatflay argumentway.\n"
+"Eturnsray away onnay-egativenay umbernay ofway ignificantsay igitsday inway "
+"itway's oatflay argumentway.\n"
 "  Illway ebay esslay anthay FLOAT-DIGITS ifway enormalizedday orway erozay."
 
 #: src/code/float.lisp
@@ -5986,8 +6885,10 @@ msgid ""
 "   float1 and, if float2 is given, has the same absolute value\n"
 "   as float2."
 msgstr ""
-"Eturnsray away oatingflay-ointpay umbernay atthay ashay ethay amesay ignsay asway\n"
-"   oatflay1 andway, ifway oatflay2 isway ivengay, ashay ethay amesay absoluteway aluevay\n"
+"Eturnsray away oatingflay-ointpay umbernay atthay ashay ethay amesay ignsay "
+"asway\n"
+"   oatflay1 andway, ifway oatflay2 isway ivengay, ashay ethay amesay "
+"absoluteway aluevay\n"
 "   asway oatflay2."
 
 #: src/code/float.lisp
@@ -5996,14 +6897,19 @@ msgid ""
 "   representation of it's argument.  See Common Lisp: The Language\n"
 "   by Guy Steele for more details."
 msgstr ""
-"Eturnsray away onnay-egativenay umbernay ofway adixray-b igitsday usedway inway ethay\n"
-"   epresentationray ofway itway's argumentway.  Eesay Ommoncay Isplay: Ethay Anguagelay\n"
+"Eturnsray away onnay-egativenay umbernay ofway adixray-b igitsday usedway "
+"inway ethay\n"
+"   epresentationray ofway itway's argumentway.  Eesay Ommoncay Isplay: Ethay "
+"Anguagelay\n"
 "   ybay Uygay Teelesay orfay oremay etailsday."
 
 #: src/code/float.lisp
-msgid "Returns (as an integer) the radix b of its floating-point\n"
+msgid ""
+"Returns (as an integer) the radix b of its floating-point\n"
 "   argument."
-msgstr "Eturnsray (asway anway integerway) ethay adixray b ofway itsway oatingflay-ointpay\n"
+msgstr ""
+"Eturnsray (asway anway integerway) ethay adixray b ofway itsway oatingflay-"
+"ointpay\n"
 "   argumentway."
 
 #: src/code/irrat.lisp src/code/float.lisp
@@ -6014,8 +6920,8 @@ msgstr "Ancay't ecodeday NAN orway infinityway: ~S."
 msgid ""
 "Returns three values:\n"
 "   1) an integer representation of the significand.\n"
-"   2) the exponent for the power of 2 that the significand must be multiplie"
-"d\n"
+"   2) the exponent for the power of 2 that the significand must be "
+"multiplied\n"
 "      by to get the actual value.  This differs from the DECODE-FLOAT "
 "exponent\n"
 "      by FLOAT-DIGITS, since the significand has been scaled to have all "
@@ -6025,12 +6931,12 @@ msgid ""
 msgstr ""
 "Eturnsray reethay aluesvay:\n"
 "   1) anway integerway epresentationray ofway ethay ignificandsay.\n"
-"   2) ethay exponentway orfay ethay owerpay ofway 2 atthay ethay ignificandsay ustmay ebay ultipliemay"
-"d\n"
-"      ybay otay etgay ethay actualway aluevay.  Isthay iffersday omfray ethay DECODE-FLOAT "
-"exponentway\n"
-"      ybay FLOAT-DIGITS, incesay ethay ignificandsay ashay eenbay aledscay otay avehay allway "
-"itsway\n"
+"   2) ethay exponentway orfay ethay owerpay ofway 2 atthay ethay "
+"ignificandsay ustmay ebay ultipliemayd\n"
+"      ybay otay etgay ethay actualway aluevay.  Isthay iffersday omfray "
+"ethay DECODE-FLOAT exponentway\n"
+"      ybay FLOAT-DIGITS, incesay ethay ignificandsay ashay eenbay aledscay "
+"otay avehay allway itsway\n"
 "      igitsday eforebay ethay adixray ointpay.\n"
 "   3) -1 orway 1 (i.e. ethay ignsay ofway ethay argumentway.)"
 
@@ -6043,7 +6949,8 @@ msgid ""
 "   3) -1.0 or 1.0 (i.e. the sign of the argument.)"
 msgstr ""
 "Eturnsray reethay aluesvay:\n"
-"   1) away oatingflay-ointpay umbernay epresentingray ethay ignificandsay.  Isthay isway alwaysway\n"
+"   1) away oatingflay-ointpay umbernay epresentingray ethay ignificandsay.  "
+"Isthay isway alwaysway\n"
 "      etweenbay 0.5 (inclusiveway) andway 1.0 (exclusiveway).\n"
 "   2) anway integerway epresentingray ethay exponentway.\n"
 "   3) -1.0 orway 1.0 (i.e. ethay ignsay ofway ethay argumentway.)"
@@ -6053,7 +6960,8 @@ msgid ""
 "Returns the value (* f (expt (float 2 f) ex)), but with no unnecessary loss\n"
 "  of precision or overflow."
 msgstr ""
-"Eturnsray ethay aluevay (* f (exptway (oatflay 2 f) exway)), utbay ithway onay unnecessaryway osslay\n"
+"Eturnsray ethay aluevay (* f (exptway (oatflay 2 f) exway)), utbay ithway "
+"onay unnecessaryway osslay\n"
 "  ofway ecisionpray orway overflowway."
 
 #: src/code/float.lisp
@@ -6062,8 +6970,10 @@ msgid ""
 "  SINGLE-FLOAT if NUMBER is not already a FLOAT.  If OTHER is provided, the\n"
 "  result is the same float format as OTHER."
 msgstr ""
-"Onvertscay anyway REAL otay away oatflay.  Ifway OTHER isway otnay ovidedpray, itway eturnsray away\n"
-"  SINGLE-FLOAT ifway NUMBER isway otnay alreadyway away FLOAT.  Ifway OTHER isway ovidedpray, ethay\n"
+"Onvertscay anyway REAL otay away oatflay.  Ifway OTHER isway otnay "
+"ovidedpray, itway eturnsray away\n"
+"  SINGLE-FLOAT ifway NUMBER isway otnay alreadyway away FLOAT.  Ifway OTHER "
+"isway ovidedpray, ethay\n"
 "  esultray isway ethay amesay oatflay ormatfay asway OTHER."
 
 #: src/code/float.lisp
@@ -6072,9 +6982,12 @@ msgid ""
 "  more efficient than RATIONALIZE, but it assumes that floating-point is\n"
 "  completely accurate, giving a result that isn't as pretty."
 msgstr ""
-"RATIONAL oducespray away ationalray umbernay orfay anyway ealray umericnay argumentway.  Isthay isway\n"
-"  oremay efficientway anthay RATIONALIZE, utbay itway assumesway atthay oatingflay-ointpay isway\n"
-"  ompletelycay accurateway, ivinggay away esultray atthay isnway't asway ettypray."
+"RATIONAL oducespray away ationalray umbernay orfay anyway ealray umericnay "
+"argumentway.  Isthay isway\n"
+"  oremay efficientway anthay RATIONALIZE, utbay itway assumesway atthay "
+"oatingflay-ointpay isway\n"
+"  ompletelycay accurateway, ivinggay away esultray atthay isnway't asway "
+"ettypray."
 
 #: src/code/float.lisp
 msgid ""
@@ -6083,9 +6996,12 @@ msgid ""
 "  their precision.  RATIONALIZE (and also RATIONAL) preserve the invariant:\n"
 "      (= x (float (rationalize x) x))"
 msgstr ""
-"Onvertscay anyway REAL otay away RATIONAL.  Oatsflay areway onvertedcay otay away implesay ationalray\n"
-"  epresentationray exploitingway ethay assumptionway atthay oatsflay areway onlyway accurateway otay\n"
-"  eirthay ecisionpray.  RATIONALIZE (andway alsoway RATIONAL) eservepray ethay invariantway:\n"
+"Onvertscay anyway REAL otay away RATIONAL.  Oatsflay areway onvertedcay otay "
+"away implesay ationalray\n"
+"  epresentationray exploitingway ethay assumptionway atthay oatsflay areway "
+"onlyway accurateway otay\n"
+"  eirthay ecisionpray.  RATIONALIZE (andway alsoway RATIONAL) eservepray "
+"ethay invariantway:\n"
 "      (= x (oatflay (ationalizeray x) x))"
 
 #: src/code/irrat.lisp
@@ -6110,7 +7026,9 @@ msgstr "Eturnsray BASE aisedray otay ethay POWER."
 
 #: src/code/irrat.lisp
 msgid "Return the logarithm of NUMBER in the base BASE, which defaults to e."
-msgstr "Eturnray ethay ogarithmlay ofway NUMBER inway ethay asebay BASE, ichwhay efaultsday otay e."
+msgstr ""
+"Eturnray ethay ogarithmlay ofway NUMBER inway ethay asebay BASE, ichwhay "
+"efaultsday otay e."
 
 #: src/code/irrat.lisp
 msgid "Return the square root of NUMBER."
@@ -6127,9 +7045,12 @@ msgid ""
 "  For non-complex positive numbers, this is 0.  For non-complex negative\n"
 "  numbers this is PI."
 msgstr ""
-"Eturnsray ethay angleway artpay ofway ethay olarpay epresentationray ofway away omplexcay umbernay.\n"
-"  Orfay omplexcay umbersnay, isthay isway (atanway (imagpartway umbernay) (ealpartray umbernay)).\n"
-"  Orfay onnay-omplexcay ositivepay umbersnay, isthay isway 0.  Orfay onnay-omplexcay egativenay\n"
+"Eturnsray ethay angleway artpay ofway ethay olarpay epresentationray ofway "
+"away omplexcay umbernay.\n"
+"  Orfay omplexcay umbersnay, isthay isway (atanway (imagpartway umbernay) "
+"(ealpartray umbernay)).\n"
+"  Orfay onnay-omplexcay ositivepay umbersnay, isthay isway 0.  Orfay onnay-"
+"omplexcay egativenay\n"
 "  umbersnay isthay isway PI."
 
 #: src/code/irrat.lisp
@@ -6162,7 +7083,9 @@ msgstr "Eturnray ethay arcway osinecay ofway NUMBER."
 
 #: src/code/irrat.lisp
 msgid "Return the arc tangent of Y if X is omitted or Y/X if X is supplied."
-msgstr "Eturnray ethay arcway angenttay ofway Y ifway X isway omittedway orway Y/X ifway X isway uppliedsay."
+msgstr ""
+"Eturnray ethay arcway angenttay ofway Y ifway X isway omittedway orway Y/X "
+"ifway X isway uppliedsay."
 
 #: src/code/irrat.lisp
 msgid "Return the hyperbolic sine of NUMBER."
@@ -6193,7 +7116,8 @@ msgid ""
 "Compute 2^N * X without compute 2^N first (use properties of the\n"
 "underlying floating-point format"
 msgstr ""
-"Omputecay 2^N * X ithoutway omputecay 2^N irstfay (useway opertiespray ofway ethay\n"
+"Omputecay 2^N * X ithoutway omputecay 2^N irstfay (useway opertiespray ofway "
+"ethay\n"
 "underlyingway oatingflay-ointpay ormatfay"
 
 #: src/code/irrat.lisp
@@ -6201,7 +7125,8 @@ msgid ""
 "Same as logb but X is not infinity and non-zero and not a NaN, so\n"
 "that we can always return an integer"
 msgstr ""
-"Amesay asway ogblay utbay X isway otnay infinityway andway onnay-erozay andway otnay away Annay, osay\n"
+"Amesay asway ogblay utbay X isway otnay infinityway andway onnay-erozay "
+"andway otnay away Annay, osay\n"
 "atthay eway ancay alwaysway eturnray anway integerway"
 
 #: src/code/irrat.lisp
@@ -6213,7 +7138,6 @@ msgid ""
 "   NaN            NaN\n"
 "   +/- infinity   +infinity\n"
 "   0              -infinity\n"
-""
 msgstr ""
 "Omputecay anway integerway N uchsay atthay 1 <= |2^(-N) * x| < 2.\n"
 "Orfay ethay ecialspay asescay, ethay ollowingfay aluesvay areway usedway:\n"
@@ -6222,7 +7146,6 @@ msgstr ""
 "   Annay            Annay\n"
 "   +/- infinityway   +infinityway\n"
 "   0              -infinityway\n"
-""
 
 #: src/code/irrat.lisp
 msgid ""
@@ -6230,8 +7153,10 @@ msgid ""
 "it has the same type as Z.  If Z has type (complex rational), the X\n"
 "and Y are coerced to single-float."
 msgstr ""
-"Eatecray omplexcay umbernay ithway ealray artpay X andway imaginaryway artpay Y uchsay atthay\n"
-"itway ashay ethay amesay ypetay asway Z.  Ifway Z ashay ypetay (omplexcay ationalray), ethay X\n"
+"Eatecray omplexcay umbernay ithway ealray artpay X andway imaginaryway "
+"artpay Y uchsay atthay\n"
+"itway ashay ethay amesay ypetay asway Z.  Ifway Z ashay ypetay (omplexcay "
+"ationalray), ethay X\n"
 "andway Y areway oercedcay otay inglesay-oatflay."
 
 #: src/code/irrat-dd.lisp src/code/irrat.lisp
@@ -6242,7 +7167,8 @@ msgid ""
 msgstr ""
 "Inciplepray quaresay ootray ofway Z\n"
 "\n"
-"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away omplexcay."
+"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away "
+"omplexcay."
 
 #: src/code/irrat-dd.lisp src/code/irrat.lisp
 msgid ""
@@ -6262,7 +7188,8 @@ msgid ""
 msgstr ""
 "Oglay ofway Z = oglay |Z| + i * argway Z\n"
 "\n"
-"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away omplexcay."
+"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away "
+"omplexcay."
 
 #: src/code/irrat-dd.lisp src/code/irrat.lisp
 msgid "Compute atanh z = (log(1+z) - log(1-z))/2"
@@ -6280,7 +7207,8 @@ msgid ""
 msgstr ""
 "Omputecay acosway z = ipay/2 - asinway z\n"
 "\n"
-"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away omplexcay."
+"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away "
+"omplexcay."
 
 #: src/code/irrat-dd.lisp src/code/irrat.lisp
 msgid ""
@@ -6290,7 +7218,8 @@ msgid ""
 msgstr ""
 "Omputecay acoshway z = 2 * oglay(qrtsay((z+1)/2) + qrtsay((z-1)/2))\n"
 "\n"
-"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away omplexcay."
+"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away "
+"omplexcay."
 
 #: src/code/irrat-dd.lisp src/code/irrat.lisp
 msgid ""
@@ -6300,7 +7229,8 @@ msgid ""
 msgstr ""
 "Omputecay asinway z = asinhway(i*zway)/i\n"
 "\n"
-"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away omplexcay."
+"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away "
+"omplexcay."
 
 #: src/code/irrat-dd.lisp src/code/irrat.lisp
 msgid ""
@@ -6310,7 +7240,8 @@ msgid ""
 msgstr ""
 "Omputecay asinhway z = oglay(z + qrtsay(1 + *zzay))\n"
 "\n"
-"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away omplexcay."
+"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away "
+"omplexcay."
 
 #: src/code/irrat-dd.lisp src/code/irrat.lisp
 msgid ""
@@ -6320,7 +7251,8 @@ msgid ""
 msgstr ""
 "Omputecay atanway z = atanhway (i*zway) / i\n"
 "\n"
-"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away omplexcay."
+"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away "
+"omplexcay."
 
 #: src/code/irrat-dd.lisp src/code/irrat.lisp
 msgid ""
@@ -6330,7 +7262,8 @@ msgid ""
 msgstr ""
 "Omputecay antay z = -i * anhtay(i * z)\n"
 "\n"
-"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away omplexcay."
+"Z aymay ebay anyway umbernay, utbay ethay esultray isway alwaysway away "
+"omplexcay."
 
 #: src/code/irrat-dd.lisp
 msgid "log(most-positive-double-double-float)"
@@ -6385,8 +7318,8 @@ msgid ""
 "~S uses lambda-list keyword naming convention, but is not a recognized "
 "lambda-list keyword."
 msgstr ""
-"~S usesway ambdalay-istlay eywordkay amingnay onventioncay, utbay isway otnay away ecognizedray "
-"ambdalay-istlay eywordkay."
+"~S usesway ambdalay-istlay eywordkay amingnay onventioncay, utbay isway "
+"otnay away ecognizedray ambdalay-istlay eywordkay."
 
 #: src/compiler/proclaim.lisp
 msgid "Misplaced &optional in lambda-list: ~S."
@@ -6414,7 +7347,9 @@ msgstr "Isplacedmay &auxway inway ambdalay-istlay: ~S."
 
 #: src/compiler/proclaim.lisp
 msgid "Found garbage in lambda-list when expecting a keyword: ~S."
-msgstr "Oundfay arbagegay inway ambdalay-istlay enwhay expectingway away eywordkay: ~S."
+msgstr ""
+"Oundfay arbagegay inway ambdalay-istlay enwhay expectingway away eywordkay: "
+"~S."
 
 #: src/compiler/proclaim.lisp
 msgid "&rest not followed by required variable."
@@ -6433,7 +7368,8 @@ msgid ""
 "Defining as a SETF function a name that already has a SETF macro:~\n"
 "       ~%  ~S"
 msgstr ""
-"Efiningday asway away SETF unctionfay away amenay atthay alreadyway ashay away SETF acromay:~\n"
+"Efiningday asway away SETF unctionfay away amenay atthay alreadyway ashay "
+"away SETF acromay:~\n"
 "       ~%  ~S"
 
 #: src/compiler/proclaim.lisp
@@ -6457,9 +7393,11 @@ msgid "Malformed optimization quality specifier ~S in ~S."
 msgstr "Alformedmay optimizationway alityquay ecifierspay ~S inway ~S."
 
 #: src/compiler/proclaim.lisp
-msgid "DECLAIM Declaration*\n"
+msgid ""
+"DECLAIM Declaration*\n"
 "  Do a declaration for the global environment."
-msgstr "DECLAIM Eclaration*Day\n"
+msgstr ""
+"DECLAIM Eclaration*Day\n"
 "  Oday away eclarationday orfay ethay obalglay environmentway."
 
 #: src/compiler/ir1tran.lisp src/compiler/proclaim.lisp
@@ -6532,12 +7470,16 @@ msgid ""
 "  that continues the string..  The second value is the length of the\n"
 "  substring of string that matches the codebook. "
 msgstr ""
-"Earchsay ethay Unicodeway amenay ictionaryday orfay ethay ongestlay entryway atthay\n"
-"  atchesmay STRING.  STRING ustmay ebay inway Unicodeway amenay ormatfay.  Atthay isway, itway\n"
+"Earchsay ethay Unicodeway amenay ictionaryday orfay ethay ongestlay entryway "
+"atthay\n"
+"  atchesmay STRING.  STRING ustmay ebay inway Unicodeway amenay ormatfay.  "
+"Atthay isway, itway\n"
 "  ustmay ebay upperway asecay ithway acesspay eparatingsay eachway ordway.\n"
 "\n"
-"  Wotay aluesvay areway eturnedray.  Ethay irstfay aluevay isway indexway intoway ethay odebookcay\n"
-"  atthay ontinuescay ethay ingstray..  Ethay econdsay aluevay isway ethay engthlay ofway ethay\n"
+"  Wotay aluesvay areway eturnedray.  Ethay irstfay aluevay isway indexway "
+"intoway ethay odebookcay\n"
+"  atthay ontinuescay ethay ingstray..  Ethay econdsay aluevay isway ethay "
+"engthlay ofway ethay\n"
 "  ubstringsay ofway ingstray atthay atchesmay ethay odebookcay. "
 
 #: src/code/unidata.lisp
@@ -6567,9 +7509,12 @@ msgid ""
 "  of possible completions, (3) a boolean indicating whether the best\n"
 "  match is a complete unicode name. "
 msgstr ""
-"Ytray otay ompletecay ethay ingstray Efixpray usingway ethay ictionaryday inway Ictday.\n"
-"  Reethay aluesvay areway eturnedray: (1) Ethay estbay atchmay ofway efixpray, (2) away istlay\n"
-"  ofway ossiblepay ompletionscay, (3) away ooleanbay indicatingway etherwhay ethay estbay\n"
+"Ytray otay ompletecay ethay ingstray Efixpray usingway ethay ictionaryday "
+"inway Ictday.\n"
+"  Reethay aluesvay areway eturnedray: (1) Ethay estbay atchmay ofway "
+"efixpray, (2) away istlay\n"
+"  ofway ossiblepay ompletionscay, (3) away ooleanbay indicatingway etherwhay "
+"ethay estbay\n"
 "  atchmay isway away ompletecay unicodeway amenay. "
 
 #: src/code/unidata.lisp
@@ -6578,8 +7523,10 @@ msgid ""
 "  completions starting with Prefix.  If there is no match, NIL is\n"
 "  returned."
 msgstr ""
-"Earchsay ethay ictionaryday inway Ictday andway eturnray away istlay ofway ethay ossiblepay\n"
-"  ompletionscay tartingsay ithway Efixpray.  Ifway erethay isway onay atchmay, NIL isway\n"
+"Earchsay ethay ictionaryday inway Ictday andway eturnray away istlay ofway "
+"ethay ossiblepay\n"
+"  ompletionscay tartingsay ithway Efixpray.  Ifway erethay isway onay "
+"atchmay, NIL isway\n"
 "  eturnedray."
 
 #: src/code/unidata.lisp
@@ -6590,13 +7537,24 @@ msgstr "Uildbay ethay ictionaryday orfay Angulhay yllablessay"
 msgid "Build the dictionary for CJK Unified Ideographs"
 msgstr "Uildbay ethay ictionaryday orfay CJK Unifiedway Ideographsway"
 
+#: src/code/unidata.lisp
+msgid ""
+"Load all unicode data and set *UNIDATA-PATH* to NIL.\n"
+"Normally, the unicode data is loaded as needed.  This loads all of the\n"
+"data, which is useful for creating a core that no longer needs\n"
+"unidata.bin."
+msgstr ""
+
 #: src/code/char.lisp
 msgid "The upper exclusive bound on values produced by CHAR-CODE."
-msgstr "Ethay upperway exclusiveway oundbay onway aluesvay oducedpray ybay CHAR-CODE."
+msgstr ""
+"Ethay upperway exclusiveway oundbay onway aluesvay oducedpray ybay CHAR-CODE."
 
 #: src/code/char.lisp
 msgid "The upper exclusive bound on the value of a Unicode codepoint"
-msgstr "Ethay upperway exclusiveway oundbay onway ethay aluevay ofway away Unicodeway odepointcay"
+msgstr ""
+"Ethay upperway exclusiveway oundbay onway ethay aluevay ofway away "
+"Unicodeway odepointcay"
 
 #: src/code/char.lisp
 msgid ""
@@ -6604,8 +7562,10 @@ msgid ""
 "  long names.  The first name in this list for a given character is used\n"
 "  on typeout and is the preferred form for input."
 msgstr ""
-"Isthay isway ethay alistway ofway (aracterchay-amenay . aracterchay) orfay aracterschay ithway\n"
-"  onglay amesnay.  Ethay irstfay amenay inway isthay istlay orfay away ivengay aracterchay isway usedway\n"
+"Isthay isway ethay alistway ofway (aracterchay-amenay . aracterchay) orfay "
+"aracterschay ithway\n"
+"  onglay amesnay.  Ethay irstfay amenay inway isthay istlay orfay away "
+"ivengay aracterchay isway usedway\n"
 "  onway ypeouttay andway isway ethay eferredpray ormfay orfay inputway."
 
 #: src/code/char.lisp
@@ -6617,8 +7577,10 @@ msgid ""
 "Returns the integer code of CHAR.  This is the same as char-code, as\n"
 "   CMU Common Lisp does not implement character bits or fonts."
 msgstr ""
-"Eturnsray ethay integerway odecay ofway CHAR.  Isthay isway ethay amesay asway archay-odecay, asway\n"
-"   CMU Ommoncay Isplay oesday otnay implementway aracterchay itsbay orway ontsfay."
+"Eturnsray ethay integerway odecay ofway CHAR.  Isthay isway ethay amesay "
+"asway archay-odecay, asway\n"
+"   CMU Ommoncay Isplay oesday otnay implementway aracterchay itsbay orway "
+"ontsfay."
 
 #: src/code/char.lisp
 msgid "Returns the character with the code CODE."
@@ -6629,7 +7591,8 @@ msgid ""
 "Coerces its argument into a character object if possible.  Accepts\n"
 "  characters, strings and symbols of length 1."
 msgstr ""
-"Oercescay itsway argumentway intoway away aracterchay objectway ifway ossiblepay.  Acceptsway\n"
+"Oercescay itsway argumentway intoway away aracterchay objectway ifway "
+"ossiblepay.  Acceptsway\n"
 "  aracterschay, ingsstray andway ymbolssay ofway engthlay 1."
 
 #: src/code/char.lisp
@@ -6649,7 +7612,8 @@ msgid ""
 "Given a character object, char-name returns the name for that\n"
 "  object (a symbol)."
 msgstr ""
-"Ivengay away aracterchay objectway, archay-amenay eturnsray ethay amenay orfay atthay\n"
+"Ivengay away aracterchay objectway, archay-amenay eturnsray ethay amenay "
+"orfay atthay\n"
 "  objectway (away ymbolsay)."
 
 #: src/code/char.lisp
@@ -6657,19 +7621,22 @@ msgid ""
 "Given an argument acceptable to string, name-char returns a character\n"
 "  object whose name is that symbol, if one exists, otherwise NIL."
 msgstr ""
-"Ivengay anway argumentway acceptableway otay ingstray, amenay-archay eturnsray away aracterchay\n"
-"  objectway osewhay amenay isway atthay ymbolsay, ifway oneway existsway, otherwiseway NIL."
+"Ivengay anway argumentway acceptableway otay ingstray, amenay-archay "
+"eturnsray away aracterchay\n"
+"  objectway osewhay amenay isway atthay ymbolsay, ifway oneway existsway, "
+"otherwiseway NIL."
 
 #: src/code/char.lisp
 msgid ""
 "The argument must be a character object.  Standard-char-p returns T if the\n"
-"   argument is a standard character -- one of the 95 ASCII printing characte"
-"rs\n"
+"   argument is a standard character -- one of the 95 ASCII printing "
+"characters\n"
 "   or <return>."
 msgstr ""
-"Ethay argumentway ustmay ebay away aracterchay objectway.  Tandardsay-archay-p eturnsray T ifway ethay\n"
-"   argumentway isway away tandardsay aracterchay -- oneway ofway ethay 95 ASCII intingpray aractechay"
-"sray\n"
+"Ethay argumentway ustmay ebay away aracterchay objectway.  Tandardsay-archay-"
+"p eturnsray T ifway ethay\n"
+"   argumentway isway away tandardsay aracterchay -- oneway ofway ethay 95 "
+"ASCII intingpray aractechaysray\n"
 "   orway <eturnray>."
 
 #: src/code/char.lisp
@@ -6677,15 +7644,18 @@ msgid ""
 "Return T if and only if THING is a standard-char.  Differs from\n"
 "  standard-char-p in that THING doesn't have to be a character."
 msgstr ""
-"Eturnray T ifway andway onlyway ifway THING isway away tandardsay-archay.  Iffersday omfray\n"
-"  tandardsay-archay-p inway atthay THING oesnday't avehay otay ebay away aracterchay."
+"Eturnray T ifway andway onlyway ifway THING isway away tandardsay-archay.  "
+"Iffersday omfray\n"
+"  tandardsay-archay-p inway atthay THING oesnday't avehay otay ebay away "
+"aracterchay."
 
 #: src/code/char.lisp
 msgid ""
 "The argument must be a character object.  Graphic-char-p returns T if the\n"
 "  argument is a printing character, otherwise returns NIL."
 msgstr ""
-"Ethay argumentway ustmay ebay away aracterchay objectway.  Aphicgray-archay-p eturnsray T ifway ethay\n"
+"Ethay argumentway ustmay ebay away aracterchay objectway.  Aphicgray-archay-"
+"p eturnsray T ifway ethay\n"
 "  argumentway isway away intingpray aracterchay, otherwiseway eturnsray NIL."
 
 #: src/code/char.lisp
@@ -6693,7 +7663,8 @@ msgid ""
 "The argument must be a character object.  Alpha-char-p returns T if the\n"
 "  argument is an alphabetic character; otherwise NIL."
 msgstr ""
-"Ethay argumentway ustmay ebay away aracterchay objectway.  Alphaway-archay-p eturnsray T ifway ethay\n"
+"Ethay argumentway ustmay ebay away aracterchay objectway.  Alphaway-archay-p "
+"eturnsray T ifway ethay\n"
 "  argumentway isway anway alphabeticway aracterchay; otherwiseway NIL."
 
 #: src/code/char.lisp
@@ -6701,7 +7672,8 @@ msgid ""
 "The argument must be a character object; upper-case-p returns T if the\n"
 "  argument is an upper-case character, NIL otherwise."
 msgstr ""
-"Ethay argumentway ustmay ebay away aracterchay objectway; upperway-asecay-p eturnsray T ifway ethay\n"
+"Ethay argumentway ustmay ebay away aracterchay objectway; upperway-asecay-p "
+"eturnsray T ifway ethay\n"
 "  argumentway isway anway upperway-asecay aracterchay, NIL otherwiseway."
 
 #: src/code/char.lisp
@@ -6709,7 +7681,8 @@ msgid ""
 "The argument must be a character object; lower-case-p returns T if the \n"
 "  argument is a lower-case character, NIL otherwise."
 msgstr ""
-"Ethay argumentway ustmay ebay away aracterchay objectway; owerlay-asecay-p eturnsray T ifway ethay \n"
+"Ethay argumentway ustmay ebay away aracterchay objectway; owerlay-asecay-p "
+"eturnsray T ifway ethay \n"
 "  argumentway isway away owerlay-asecay aracterchay, NIL otherwiseway."
 
 #: src/code/char.lisp
@@ -6717,7 +7690,8 @@ msgid ""
 "The argument must be a character object; title-case-p returns T if the\n"
 "  argument is a title-case character, NIL otherwise."
 msgstr ""
-"Ethay argumentway ustmay ebay away aracterchay objectway; itletay-asecay-p eturnsray T ifway ethay\n"
+"Ethay argumentway ustmay ebay away aracterchay objectway; itletay-asecay-p "
+"eturnsray T ifway ethay\n"
 "  argumentway isway away itletay-asecay aracterchay, NIL otherwiseway."
 
 #: src/code/char.lisp
@@ -6726,9 +7700,12 @@ msgid ""
 "  argument is an alphabetic character and if the character exists in\n"
 "  both upper and lower case.  For ASCII, this is the same as Alpha-char-p."
 msgstr ""
-"Ethay argumentway ustmay ebay away aracterchay objectway.  Othbay-asecay-p eturnsray T ifway ethay\n"
-"  argumentway isway anway alphabeticway aracterchay andway ifway ethay aracterchay existsway inway\n"
-"  othbay upperway andway owerlay asecay.  Orfay ASCII, isthay isway ethay amesay asway Alphaway-archay-p."
+"Ethay argumentway ustmay ebay away aracterchay objectway.  Othbay-asecay-p "
+"eturnsray T ifway ethay\n"
+"  argumentway isway anway alphabeticway aracterchay andway ifway ethay "
+"aracterchay existsway inway\n"
+"  othbay upperway andway owerlay asecay.  Orfay ASCII, isthay isway ethay "
+"amesay asway Alphaway-archay-p."
 
 #: src/code/char.lisp
 msgid ""
@@ -6736,8 +7713,10 @@ msgid ""
 "  which that digit stands, else returns NIL.  Radix defaults to 10\n"
 "  (decimal)."
 msgstr ""
-"Ifway archay isway away igitday inway ethay ecifiedspay adixray, eturnsray ethay ixnumfay orfay\n"
-"  ichwhay atthay igitday tandssay, elseway eturnsray NIL.  Adixray efaultsday otay 10\n"
+"Ifway archay isway away igitday inway ethay ecifiedspay adixray, eturnsray "
+"ethay ixnumfay orfay\n"
+"  ichwhay atthay igitday tandssay, elseway eturnsray NIL.  Adixray "
+"efaultsday otay 10\n"
 "  (ecimalday)."
 
 #: src/code/char.lisp
@@ -6745,47 +7724,55 @@ msgid ""
 "Given a character-object argument, alphanumericp returns T if the\n"
 "  argument is either numeric or alphabetic."
 msgstr ""
-"Ivengay away aracterchay-objectway argumentway, alphanumericpway eturnsray T ifway ethay\n"
+"Ivengay away aracterchay-objectway argumentway, alphanumericpway eturnsray T "
+"ifway ethay\n"
 "  argumentway isway eitherway umericnay orway alphabeticway."
 
 #: src/code/char.lisp
 msgid "Returns T if all of its arguments are the same character."
-msgstr "Eturnsray T ifway allway ofway itsway argumentsway areway ethay amesay aracterchay."
+msgstr ""
+"Eturnsray T ifway allway ofway itsway argumentsway areway ethay amesay "
+"aracterchay."
 
 #: src/code/char.lisp
 msgid "Returns T if no two of its arguments are the same character."
-msgstr "Eturnsray T ifway onay wotay ofway itsway argumentsway areway ethay amesay aracterchay."
+msgstr ""
+"Eturnsray T ifway onay wotay ofway itsway argumentsway areway ethay amesay "
+"aracterchay."
 
 #: src/code/char.lisp
-msgid ""
-"Returns T if its arguments are in strictly increasing alphabetic order."
+msgid "Returns T if its arguments are in strictly increasing alphabetic order."
 msgstr ""
-"Eturnsray T ifway itsway argumentsway areway inway ictlystray increasingway alphabeticway orderway."
+"Eturnsray T ifway itsway argumentsway areway inway ictlystray increasingway "
+"alphabeticway orderway."
 
 #: src/code/char.lisp
-msgid ""
-"Returns T if its arguments are in strictly decreasing alphabetic order."
+msgid "Returns T if its arguments are in strictly decreasing alphabetic order."
 msgstr ""
-"Eturnsray T ifway itsway argumentsway areway inway ictlystray ecreasingday alphabeticway orderway."
+"Eturnsray T ifway itsway argumentsway areway inway ictlystray ecreasingday "
+"alphabeticway orderway."
 
 #: src/code/char.lisp
 msgid ""
 "Returns T if its arguments are in strictly non-decreasing alphabetic order."
 msgstr ""
-"Eturnsray T ifway itsway argumentsway areway inway ictlystray onnay-ecreasingday alphabeticway orderway."
+"Eturnsray T ifway itsway argumentsway areway inway ictlystray onnay-"
+"ecreasingday alphabeticway orderway."
 
 #: src/code/char.lisp
 msgid ""
 "Returns T if its arguments are in strictly non-increasing alphabetic order."
 msgstr ""
-"Eturnsray T ifway itsway argumentsway areway inway ictlystray onnay-increasingway alphabeticway orderway."
+"Eturnsray T ifway itsway argumentsway areway inway ictlystray onnay-"
+"increasingway alphabeticway orderway."
 
 #: src/code/char.lisp
 msgid ""
 "Returns T if all of its arguments are the same character.\n"
 "   Case is ignored."
 msgstr ""
-"Eturnsray T ifway allway ofway itsway argumentsway areway ethay amesay aracterchay.\n"
+"Eturnsray T ifway allway ofway itsway argumentsway areway ethay amesay "
+"aracterchay.\n"
 "   Asecay isway ignoredway."
 
 #: src/code/char.lisp
@@ -6793,7 +7780,8 @@ msgid ""
 "Returns T if no two of its arguments are the same character.\n"
 "   Case is ignored."
 msgstr ""
-"Eturnsray T ifway onay wotay ofway itsway argumentsway areway ethay amesay aracterchay.\n"
+"Eturnsray T ifway onay wotay ofway itsway argumentsway areway ethay amesay "
+"aracterchay.\n"
 "   Asecay isway ignoredway."
 
 #: src/code/char.lisp
@@ -6801,7 +7789,8 @@ msgid ""
 "Returns T if its arguments are in strictly increasing alphabetic order.\n"
 "   Case is ignored."
 msgstr ""
-"Eturnsray T ifway itsway argumentsway areway inway ictlystray increasingway alphabeticway orderway.\n"
+"Eturnsray T ifway itsway argumentsway areway inway ictlystray increasingway "
+"alphabeticway orderway.\n"
 "   Asecay isway ignoredway."
 
 #: src/code/char.lisp
@@ -6809,7 +7798,8 @@ msgid ""
 "Returns T if its arguments are in strictly decreasing alphabetic order.\n"
 "   Case is ignored."
 msgstr ""
-"Eturnsray T ifway itsway argumentsway areway inway ictlystray ecreasingday alphabeticway orderway.\n"
+"Eturnsray T ifway itsway argumentsway areway inway ictlystray ecreasingday "
+"alphabeticway orderway.\n"
 "   Asecay isway ignoredway."
 
 #: src/code/char.lisp
@@ -6817,7 +7807,8 @@ msgid ""
 "Returns T if its arguments are in strictly non-decreasing alphabetic order.\n"
 "   Case is ignored."
 msgstr ""
-"Eturnsray T ifway itsway argumentsway areway inway ictlystray onnay-ecreasingday alphabeticway orderway.\n"
+"Eturnsray T ifway itsway argumentsway areway inway ictlystray onnay-"
+"ecreasingday alphabeticway orderway.\n"
 "   Asecay isway ignoredway."
 
 #: src/code/char.lisp
@@ -6825,20 +7816,25 @@ msgid ""
 "Returns T if its arguments are in strictly non-increasing alphabetic order.\n"
 "   Case is ignored."
 msgstr ""
-"Eturnsray T ifway itsway argumentsway areway inway ictlystray onnay-increasingway alphabeticway orderway.\n"
+"Eturnsray T ifway itsway argumentsway areway inway ictlystray onnay-"
+"increasingway alphabeticway orderway.\n"
 "   Asecay isway ignoredway."
 
 #: src/code/char.lisp
 msgid "Returns CHAR converted to upper-case if that is possible."
-msgstr "Eturnsray CHAR onvertedcay otay upperway-asecay ifway atthay isway ossiblepay."
+msgstr ""
+"Eturnsray CHAR onvertedcay otay upperway-asecay ifway atthay isway "
+"ossiblepay."
 
 #: src/code/char.lisp
 msgid "Returns CHAR converted to title-case if that is possible."
-msgstr "Eturnsray CHAR onvertedcay otay itletay-asecay ifway atthay isway ossiblepay."
+msgstr ""
+"Eturnsray CHAR onvertedcay otay itletay-asecay ifway atthay isway ossiblepay."
 
 #: src/code/char.lisp
 msgid "Returns CHAR converted to lower-case if that is possible."
-msgstr "Eturnsray CHAR onvertedcay otay owerlay-asecay ifway atthay isway ossiblepay."
+msgstr ""
+"Eturnsray CHAR onvertedcay otay owerlay-asecay ifway atthay isway ossiblepay."
 
 #: src/code/char.lisp
 msgid ""
@@ -6846,8 +7842,10 @@ msgid ""
 "  represents a digit of the given weight in the specified radix.  Returns\n"
 "  NIL if no such character exists."
 msgstr ""
-"Allway argumentsway ustmay ebay integersway.  Eturnsray away aracterchay objectway atthay\n"
-"  epresentsray away igitday ofway ethay ivengay eightway inway ethay ecifiedspay adixray.  Eturnsray\n"
+"Allway argumentsway ustmay ebay integersway.  Eturnsray away aracterchay "
+"objectway atthay\n"
+"  epresentsray away igitday ofway ethay ivengay eightway inway ethay "
+"ecifiedspay adixray.  Eturnsray\n"
 "  NIL ifway onay uchsay aracterchay existsway."
 
 #: src/code/misc.lisp
@@ -6856,8 +7854,10 @@ msgid ""
 "  none exists.  System doc-types are VARIABLE, FUNCTION, STRUCTURE, TYPE,\n"
 "  SETF, and T."
 msgstr ""
-"Eturnsray ethay ocumentationday ingstray ofway Ocday-Ypetay orfay X, orway NIL ifway\n"
-"  onenay existsway.  Ystemsay ocday-ypestay areway VARIABLE, FUNCTION, STRUCTURE, TYPE,\n"
+"Eturnsray ethay ocumentationday ingstray ofway Ocday-Ypetay orfay X, orway "
+"NIL ifway\n"
+"  onenay existsway.  Ystemsay ocday-ypestay areway VARIABLE, FUNCTION, "
+"STRUCTURE, TYPE,\n"
 "  SETF, andway T."
 
 #: src/code/misc.lisp
@@ -6869,7 +7869,8 @@ msgid ""
 "If X is an atom, see if it is present in *FEATURES*.  Also\n"
 "  handle arbitrary combinations of atoms using NOT, AND, OR."
 msgstr ""
-"Ifway X isway anway atomway, eesay ifway itway isway esentpray inway *FEATURES*.  Alsoway\n"
+"Ifway X isway anway atomway, eesay ifway itway isway esentpray inway "
+"*FEATURES*.  Alsoway\n"
 "  andlehay arbitraryway ombinationscay ofway atomsway usingway NOT, AND, OR."
 
 #: src/code/misc.lisp
@@ -6886,11 +7887,13 @@ msgstr " Unicodeway"
 
 #: src/code/misc.lisp
 msgid "Returns a string describing the implementation version."
-msgstr "Eturnsray away ingstray escribingday ethay implementationway ersionvay."
+msgstr ""
+"Eturnsray away ingstray escribingday ethay implementationway ersionvay."
 
 #: src/code/misc.lisp
 msgid "Returns a string giving the name of the local machine."
-msgstr "Eturnsray away ingstray ivinggay ethay amenay ofway ethay ocallay achinemay."
+msgstr ""
+"Eturnsray away ingstray ivinggay ethay amenay ofway ethay ocallay achinemay."
 
 #: src/code/misc.lisp
 msgid "The value of SOFTWARE-TYPE.  Set in FOO-os.lisp."
@@ -6902,7 +7905,9 @@ msgstr "Eturnsray away ingstray escribingday ethay upportingsay oftwaresay."
 
 #: src/code/misc.lisp
 msgid "The value of SHORT-SITE-NAME.  Set in library:site-init.lisp."
-msgstr "Ethay aluevay ofway SHORT-SITE-NAME.  Etsay inway ibrarylay:itesay-initway.isplay."
+msgstr ""
+"Ethay aluevay ofway SHORT-SITE-NAME.  Etsay inway ibrarylay:itesay-initway."
+"isplay."
 
 #: src/code/misc.lisp
 msgid "Unknown"
@@ -6914,7 +7919,9 @@ msgstr "Eturnsray away ingstray ithway ethay abbreviatedway itesay amenay."
 
 #: src/code/misc.lisp
 msgid "The value of LONG-SITE-NAME.  Set in library:site-init.lisp."
-msgstr "Ethay aluevay ofway LONG-SITE-NAME.  Etsay inway ibrarylay:itesay-initway.isplay."
+msgstr ""
+"Ethay aluevay ofway LONG-SITE-NAME.  Etsay inway ibrarylay:itesay-initway."
+"isplay."
 
 #: src/code/misc.lisp
 msgid "Site name not initialized"
@@ -6922,7 +7929,8 @@ msgstr "Itesay amenay otnay initializedway"
 
 #: src/code/misc.lisp
 msgid "Returns a string with the long form of the site name."
-msgstr "Eturnsray away ingstray ithway ethay onglay ormfay ofway ethay itesay amenay."
+msgstr ""
+"Eturnsray away ingstray ithway ethay onglay ormfay ofway ethay itesay amenay."
 
 #: src/code/misc.lisp
 msgid ""
@@ -6930,9 +7938,12 @@ msgid ""
 "   sends a record of further I/O to that file.  Without an\n"
 "   argument, it closes the dribble file, and quits logging."
 msgstr ""
-"Ithway away ilefay amenay asway anway argumentway, ibbledray opensway ethay ilefay andway\n"
-"   endssay away ecordray ofway urtherfay Iway/O otay atthay ilefay.  Ithoutway anway\n"
-"   argumentway, itway osesclay ethay ibbledray ilefay, andway itsquay ogginglay."
+"Ithway away ilefay amenay asway anway argumentway, ibbledray opensway ethay "
+"ilefay andway\n"
+"   endssay away ecordray ofway urtherfay Iway/O otay atthay ilefay.  "
+"Ithoutway anway\n"
+"   argumentway, itway osesclay ethay ibbledray ilefay, andway itsquay "
+"ogginglay."
 
 #: src/code/misc.lisp
 msgid "Not currently dribbling."
@@ -6943,7 +7954,8 @@ msgid ""
 "Default implementation of ed.  This does nothing.  If hemlock is\n"
 "  loaded, ed can be used to edit a file"
 msgstr ""
-"Efaultday implementationway ofway edway.  Isthay oesday othingnay.  Ifway emlockhay isway\n"
+"Efaultday implementationway ofway edway.  Isthay oesday othingnay.  Ifway "
+"emlockhay isway\n"
 "  oadedlay, edway ancay ebay usedway otay editway away ilefay"
 
 #: src/code/extensions.lisp
@@ -6958,14 +7970,18 @@ msgid ""
 "  not supplied.  This function is also useful for DEFSTRUCT slot defaults\n"
 "  corresponding to required arguments."
 msgstr ""
-"Isthay unctionfay ancay ebay usedway asway ethay efaultday aluevay orfay eywordkay argumentsway atthay\n"
-"  ustmay ebay alwaysway ebay uppliedsay.  Incesay itway isway nownkay ybay ethay ompilercay otay evernay\n"
-"  eturnray, itway illway avoidway anyway ompilecay-imetay ypetay arningsway atthay ouldway esultray "
-"omfray away\n"
-"  efaultday aluevay inconsistentway ithway ethay eclaredday ypetay.  Enwhay isthay unctionfay isway\n"
-"  alledcay, itway ignalssay anway errorway indicatingway atthay away equiredray eywordkay argumentway "
-"asway\n"
-"  otnay uppliedsay.  Isthay unctionfay isway alsoway usefulway orfay DEFSTRUCT otslay efaultsday\n"
+"Isthay unctionfay ancay ebay usedway asway ethay efaultday aluevay orfay "
+"eywordkay argumentsway atthay\n"
+"  ustmay ebay alwaysway ebay uppliedsay.  Incesay itway isway nownkay ybay "
+"ethay ompilercay otay evernay\n"
+"  eturnray, itway illway avoidway anyway ompilecay-imetay ypetay arningsway "
+"atthay ouldway esultray omfray away\n"
+"  efaultday aluevay inconsistentway ithway ethay eclaredday ypetay.  Enwhay "
+"isthay unctionfay isway\n"
+"  alledcay, itway ignalssay anway errorway indicatingway atthay away "
+"equiredray eywordkay argumentway asway\n"
+"  otnay uppliedsay.  Isthay unctionfay isway alsoway usefulway orfay "
+"DEFSTRUCT otslay efaultsday\n"
 "  orrespondingcay otay equiredray argumentsway."
 
 #: src/code/extensions.lisp
@@ -6984,32 +8000,37 @@ msgid ""
 "  etc."
 msgstr ""
 "FILE-COMMENT Ingstray\n"
-"  Enwhay COMPILE-FILE eessay isthay ormfay atway optay-evellay, itway acesplay ethay onstantcay "
-"ingstray\n"
-"  inway ethay unray-imetay ourcesay ocationlay informationway.  DESCRIBE illway intpray ethay "
-"ilefay\n"
-"  ommentcay orfay ethay ilefay atthay away unctionfay asway efinedday inway.  Ethay ingstray isway alsoway\n"
-"  extuallytay esentpray inway ethay FASL, osay ethay RCS \"identway\" ommandcay ancay indfay itway,\n"
+"  Enwhay COMPILE-FILE eessay isthay ormfay atway optay-evellay, itway "
+"acesplay ethay onstantcay ingstray\n"
+"  inway ethay unray-imetay ourcesay ocationlay informationway.  DESCRIBE "
+"illway intpray ethay ilefay\n"
+"  ommentcay orfay ethay ilefay atthay away unctionfay asway efinedday "
+"inway.  Ethay ingstray isway alsoway\n"
+"  extuallytay esentpray inway ethay FASL, osay ethay RCS \"identway\" "
+"ommandcay ancay indfay itway,\n"
 "  etcway."
 
 #: src/code/extensions.lisp
 msgid "See listen.  Any whitespace in the input stream will be flushed."
-msgstr "Eesay istenlay.  Anyway itespacewhay inway ethay inputway eamstray illway ebay ushedflay."
+msgstr ""
+"Eesay istenlay.  Anyway itespacewhay inway ethay inputway eamstray illway "
+"ebay ushedflay."
 
 #: src/code/extensions.lisp
 msgid ""
-"Does what one might expect, saving the old values and setting the generalize"
-"d\n"
-"  variables to the new values in sequence.  Unwind-protects and get-setf-met"
-"hod\n"
+"Does what one might expect, saving the old values and setting the "
+"generalized\n"
+"  variables to the new values in sequence.  Unwind-protects and get-setf-"
+"method\n"
 "  are used to preserve the semantics one might expect in analogy to let*,\n"
 "  and the once-only evaluation of subforms."
 msgstr ""
-"Oesday atwhay oneway ightmay expectway, avingsay ethay oldway aluesvay andway ettingsay ethay eneralizegay"
-"d\n"
-"  ariablesvay otay ethay ewnay aluesvay inway equencesay.  Unwindway-otectspray andway etgay-etfsay-etmay"
-"odhay\n"
-"  areway usedway otay eservepray ethay emanticssay oneway ightmay expectway inway analogyway otay et*lay,\n"
+"Oesday atwhay oneway ightmay expectway, avingsay ethay oldway aluesvay "
+"andway ettingsay ethay eneralizegayd\n"
+"  ariablesvay otay ethay ewnay aluesvay inway equencesay.  Unwindway-"
+"otectspray andway etgay-etfsay-etmayodhay\n"
+"  areway usedway otay eservepray ethay emanticssay oneway ightmay expectway "
+"inway analogyway otay et*lay,\n"
 "  andway ethay onceway-onlyway evaluationway ofway ubformssay."
 
 #: src/code/extensions.lisp
@@ -7019,9 +8040,12 @@ msgid ""
 "  (see get-setf-method) must still be evaluated in sequence.  Uses unwind-\n"
 "  protects to protect the environment."
 msgstr ""
-"Ikelay etf*lay, utbay evaluatesway allway ethay implicitway ubformssay andway ewnay aluesvay ofway allway\n"
-"  ethay impliedway etfssay eforebay alteringway anyway aluesvay.  Oweverhay, ethay toresay ormsfay\n"
-"  (eesay etgay-etfsay-ethodmay) ustmay tillsay ebay evaluatedway inway equencesay.  Usesway unwindway-\n"
+"Ikelay etf*lay, utbay evaluatesway allway ethay implicitway ubformssay "
+"andway ewnay aluesvay ofway allway\n"
+"  ethay impliedway etfssay eforebay alteringway anyway aluesvay.  Oweverhay, "
+"ethay toresay ormsfay\n"
+"  (eesay etgay-etfsay-ethodmay) ustmay tillsay ebay evaluatedway inway "
+"equencesay.  Usesway unwindway-\n"
 "  otectspray otay otectpray ethay environmentway."
 
 #: src/code/extensions.lisp
@@ -7029,7 +8053,8 @@ msgid ""
 "Causes the output of the indenting Stream to indent More spaces.  More is\n"
 "  evaluated twice."
 msgstr ""
-"Ausescay ethay outputway ofway ethay indentingway Eamstray otay indentway Oremay acesspay.  Oremay isway\n"
+"Ausescay ethay outputway ofway ethay indentingway Eamstray otay indentway "
+"Oremay acesspay.  Oremay isway\n"
 "  evaluatedway wicetay."
 
 #: src/code/extensions.lisp
@@ -7047,11 +8072,12 @@ msgid ""
 "  of the call is return from the macro."
 msgstr ""
 "Iterateway Amenay ({(Arvay Initialway-Aluevay)}*) Eclaration*Day Orm*Fay\n"
-"  Isthay isway yntacticsay ugarsay orfay Abelslay.  Itway eatescray away ocallay unctionfay Amenay "
-"ithway\n"
-"  ethay ecifiedspay Arsvay asway itsway argumentsway andway ethay Eclarationsday andway Ormsfay asway itsway\n"
-"  odybay.  Isthay unctionfay isway enthay alledcay ithway ethay Initialway-Aluesvay, andway ethay "
-"esultray\n"
+"  Isthay isway yntacticsay ugarsay orfay Abelslay.  Itway eatescray away "
+"ocallay unctionfay Amenay ithway\n"
+"  ethay ecifiedspay Arsvay asway itsway argumentsway andway ethay "
+"Eclarationsday andway Ormsfay asway itsway\n"
+"  odybay.  Isthay unctionfay isway enthay alledcay ithway ethay Initialway-"
+"Aluesvay, andway ethay esultray\n"
 "  ofway ethay allcay isway eturnray omfray ethay acromay."
 
 #: src/code/extensions.lisp
@@ -7087,39 +8113,41 @@ msgid ""
 "an\n"
 "  Initial-Value is supplied for Collect, the stuff will be rplacd'd onto "
 "the\n"
-"  end.  Note that Function may be anything that can appear in the functional"
-"\n"
+"  end.  Note that Function may be anything that can appear in the "
+"functional\n"
 "  position, including macros and lambdas."
 msgstr ""
 "Ollectcay ({(Amenay [Initialway-Aluevay] [Unctionfay])}*) {Ormfay}*\n"
-"  Ollectcay omesay aluesvay omehowsay.  Eachway ofway ethay ollectionscay ecifiesspay away unchbay "
-"ofway\n"
-"  ingsthay ichwhay ollectedcay uringday ethay evaluationway ofway ethay odybay ofway ethay ormfay.  "
-"Ethay\n"
-"  amenay ofway ethay ollectioncay isway usedway otay efineday away ocallay acromay, away alay MACROLET.\n"
-"  Ithinway ethay odybay, isthay acromay illway evaluateway eachway ofway itsway argumentsway andway "
-"ollectcay\n"
-"  ethay esultray, eturningray ethay urrentcay aluevay afterway ethay ollectioncay isway oneday.  "
-"Ethay\n"
-"  odybay isway evaluatedway asway away PROGN; otay etgay ethay inalfay aluesvay enwhay ouyay areway oneday, "
-"ustjay\n"
+"  Ollectcay omesay aluesvay omehowsay.  Eachway ofway ethay ollectionscay "
+"ecifiesspay away unchbay ofway\n"
+"  ingsthay ichwhay ollectedcay uringday ethay evaluationway ofway ethay "
+"odybay ofway ethay ormfay.  Ethay\n"
+"  amenay ofway ethay ollectioncay isway usedway otay efineday away ocallay "
+"acromay, away alay MACROLET.\n"
+"  Ithinway ethay odybay, isthay acromay illway evaluateway eachway ofway "
+"itsway argumentsway andway ollectcay\n"
+"  ethay esultray, eturningray ethay urrentcay aluevay afterway ethay "
+"ollectioncay isway oneday.  Ethay\n"
+"  odybay isway evaluatedway asway away PROGN; otay etgay ethay inalfay "
+"aluesvay enwhay ouyay areway oneday, ustjay\n"
 "  allcay ethay ollectioncay acromay ithway onay argumentsway.\n"
 "\n"
-"  Initialway-Aluevay isway ethay aluevay atthay ethay ollectioncay tartssay outway ithway, ichwhay\n"
-"  efaultsday otay NIL.  Unctionfay isway ethay unctionfay ichwhay oesday ethay ollectioncay.  Itway "
-"isway\n"
-"  away unctionfay ichwhay illway acceptway wotay argumentsway: ethay aluevay otay ebay ollectedcay andway "
-"ethay\n"
-"  urrentcay ollectioncay.  Ethay esultray ofway ethay unctionfay isway ademay ethay ewnay aluevay orfay "
-"ethay\n"
-"  ollectioncay.  Asway away otallytay agicalmay ecialspay-asecay, ethay Unctionfay aymay ebay "
-"Ollectcay,\n"
-"  ichwhay ellstay usway otay uildbay away istlay inway orwardfay orderway; isthay isway ethay efaultday.  Ifway "
-"anway\n"
-"  Initialway-Aluevay isway uppliedsay orfay Ollectcay, ethay tuffsay illway ebay placdray'd ontoway "
-"ethay\n"
-"  endway.  Otenay atthay Unctionfay aymay ebay anythingway atthay ancay appearway inway ethay unctionalfay"
-"\n"
+"  Initialway-Aluevay isway ethay aluevay atthay ethay ollectioncay tartssay "
+"outway ithway, ichwhay\n"
+"  efaultsday otay NIL.  Unctionfay isway ethay unctionfay ichwhay oesday "
+"ethay ollectioncay.  Itway isway\n"
+"  away unctionfay ichwhay illway acceptway wotay argumentsway: ethay aluevay "
+"otay ebay ollectedcay andway ethay\n"
+"  urrentcay ollectioncay.  Ethay esultray ofway ethay unctionfay isway "
+"ademay ethay ewnay aluevay orfay ethay\n"
+"  ollectioncay.  Asway away otallytay agicalmay ecialspay-asecay, ethay "
+"Unctionfay aymay ebay Ollectcay,\n"
+"  ichwhay ellstay usway otay uildbay away istlay inway orwardfay orderway; "
+"isthay isway ethay efaultday.  Ifway anway\n"
+"  Initialway-Aluevay isway uppliedsay orfay Ollectcay, ethay tuffsay illway "
+"ebay placdray'd ontoway ethay\n"
+"  endway.  Otenay atthay Unctionfay aymay ebay anythingway atthay ancay "
+"appearway inway ethay unctionalfay\n"
 "  ositionpay, includingway acrosmay andway ambdaslay."
 
 #: src/code/extensions.lisp
@@ -7131,15 +8159,17 @@ msgid ""
 "Once-Only ({(Var Value-Expression)}*) Form*\n"
 "  Create a Let* which evaluates each Value-Expression, binding a temporary\n"
 "  variable to the result, and wrapping the Let* around the result of the\n"
-"  evaluation of Body.  Within the body, each Var is bound to the correspondi"
-"ng\n"
+"  evaluation of Body.  Within the body, each Var is bound to the "
+"corresponding\n"
 "  temporary variable."
 msgstr ""
 "Onceway-Onlyway ({(Arvay Aluevay-Expressionway)}*) Orm*Fay\n"
-"  Eatecray away Et*Lay ichwhay evaluatesway eachway Aluevay-Expressionway, indingbay away emporarytay\n"
-"  ariablevay otay ethay esultray, andway appingwray ethay Et*Lay aroundway ethay esultray ofway ethay\n"
-"  evaluationway ofway Odybay.  Ithinway ethay odybay, eachway Arvay isway oundbay otay ethay orrespondicay"
-"gnay\n"
+"  Eatecray away Et*Lay ichwhay evaluatesway eachway Aluevay-Expressionway, "
+"indingbay away emporarytay\n"
+"  ariablevay otay ethay esultray, andway appingwray ethay Et*Lay aroundway "
+"ethay esultray ofway ethay\n"
+"  evaluationway ofway Odybay.  Ithinway ethay odybay, eachway Arvay isway "
+"oundbay otay ethay orrespondicaygnay\n"
 "  emporarytay ariablevay."
 
 #: src/code/extensions.lisp
@@ -7172,16 +8202,18 @@ msgid ""
 "  the Exit-Forms are evaluated as a PROGN, with the result being the value\n"
 "  of the DO."
 msgstr ""
-"DO-ANONYMOUS ({(Arvay [Initway] [Tepsay])}*) (Esttay Exitway-Orm*Fay) Eclaration*Day Orm*Fay\n"
-"  Ikelay DO, utbay ashay onay implicitway NIL ockblay.  Eachway Arvay isway initializedway inway "
-"arallelpay\n"
-"  otay ethay aluevay ofway ethay ecifiedspay Initway ormfay.  Onway ubsequentsay iterationsway, ethay "
-"Arsvay\n"
-"  areway assignedway ethay aluevay ofway ethay Tepsay ormfay (ifway anyway) inway aralellpay.  Ethay Esttay "
-"isway\n"
-"  evaluatedway eforebay eachway evaluationway ofway ethay odybay Ormsfay.  Enwhay ethay Esttay isway "
-"uetray,\n"
-"  ethay Exitway-Ormsfay areway evaluatedway asway away PROGN, ithway ethay esultray eingbay ethay aluevay\n"
+"DO-ANONYMOUS ({(Arvay [Initway] [Tepsay])}*) (Esttay Exitway-Orm*Fay) "
+"Eclaration*Day Orm*Fay\n"
+"  Ikelay DO, utbay ashay onay implicitway NIL ockblay.  Eachway Arvay isway "
+"initializedway inway arallelpay\n"
+"  otay ethay aluevay ofway ethay ecifiedspay Initway ormfay.  Onway "
+"ubsequentsay iterationsway, ethay Arsvay\n"
+"  areway assignedway ethay aluevay ofway ethay Tepsay ormfay (ifway anyway) "
+"inway aralellpay.  Ethay Esttay isway\n"
+"  evaluatedway eforebay eachway evaluationway ofway ethay odybay Ormsfay.  "
+"Enwhay ethay Esttay isway uetray,\n"
+"  ethay Exitway-Ormsfay areway evaluatedway asway away PROGN, ithway ethay "
+"esultray eingbay ethay aluevay\n"
 "  ofway ethay DO."
 
 #: src/code/extensions.lisp
@@ -7189,7 +8221,8 @@ msgid ""
 "DO-HASH (Key-Var Value-Var Table [Result]) Declaration* Form*\n"
 "   Iterate over the entries in a hash-table."
 msgstr ""
-"DO-HASH (Eykay-Arvay Aluevay-Arvay Abletay [Esultray]) Eclaration*Day Orm*Fay\n"
+"DO-HASH (Eykay-Arvay Aluevay-Arvay Abletay [Esultray]) Eclaration*Day "
+"Orm*Fay\n"
 "   Iterateway overway ethay entriesway inway away ashhay-abletay."
 
 #: src/code/extensions.lisp
@@ -7240,33 +8273,40 @@ msgid ""
 "      The DEFVAR for creating the cache is enclosed in a form with the\n"
 "      specified name.  Default PROGN."
 msgstr ""
-"DEFINE-HASH-CACHE Amenay ({(Argway-Amenay Esttay-Unctionfay)}*) {Eykay Aluevay}*\n"
-"  Efineday away ashhay achecay atthay associatesway omesay umbernay ofway argumentway aluesvay otay away\n"
-"  esultray aluevay.  Ethay Esttay-Unctionfay airedpay ithway eachway Argway-Amenay isway usedway otay "
-"omparecay\n"
-"  ethay aluevay orfay atthay argway inway away achecay entryway ithway away uppliedsay argway.  Ethay\n"
-"  Esttay-Unctionfay ustmay otnay errorway enwhay assedpay NIL asway itsway irstfay argway, utbay eednay "
-"otnay\n"
-"  eturnray anyway articularpay aluevay.  Esttay-Unctionfay aymay ebay anyway ingthay atthay ancay ebay\n"
+"DEFINE-HASH-CACHE Amenay ({(Argway-Amenay Esttay-Unctionfay)}*) {Eykay "
+"Aluevay}*\n"
+"  Efineday away ashhay achecay atthay associatesway omesay umbernay ofway "
+"argumentway aluesvay otay away\n"
+"  esultray aluevay.  Ethay Esttay-Unctionfay airedpay ithway eachway Argway-"
+"Amenay isway usedway otay omparecay\n"
+"  ethay aluevay orfay atthay argway inway away achecay entryway ithway away "
+"uppliedsay argway.  Ethay\n"
+"  Esttay-Unctionfay ustmay otnay errorway enwhay assedpay NIL asway itsway "
+"irstfay argway, utbay eednay otnay\n"
+"  eturnray anyway articularpay aluevay.  Esttay-Unctionfay aymay ebay anyway "
+"ingthay atthay ancay ebay\n"
 "  aceplay inway CAR ositionpay.\n"
 "\n"
 "  Amenay isway usedway otay efineday unctionsfay esethay unctionsfay:\n"
 "\n"
 "  <amenay>-CACHE-LOOKUP Arg*Way\n"
-"      Eesay ifway erethay isway anway entryway orfay ethay ecifiedspay Argsway inway ethay achecay.  Ethay ifway "
-"otnay\n"
-"      esentpray, ethay :DEFAULT eywordkay (efaultday NIL) eterminesday ethay esultray(s).\n"
+"      Eesay ifway erethay isway anway entryway orfay ethay ecifiedspay "
+"Argsway inway ethay achecay.  Ethay ifway otnay\n"
+"      esentpray, ethay :DEFAULT eywordkay (efaultday NIL) eterminesday ethay "
+"esultray(s).\n"
 "\n"
 "  <amenay>-CACHE-ENTER Arg*Way Alue*Vay\n"
-"      Encacheway ethay associationway ofway ethay ecifiedspay argsway ithway Aluevay.\n"
+"      Encacheway ethay associationway ofway ethay ecifiedspay argsway ithway "
+"Aluevay.\n"
 "\n"
 "  <amenay>-CACHE-FLUSH-<argway-amenay> Argway\n"
-"      Ushflay allway entriesway omfray ethay achecay atthay avehay ethay aluevay Argway orfay ethay "
-"amednay\n"
+"      Ushflay allway entriesway omfray ethay achecay atthay avehay ethay "
+"aluevay Argway orfay ethay amednay\n"
 "      argway.\n"
 "\n"
 "  <amenay>-CACHE-CLEAR\n"
-"      Einitializeray ethay achecay, invalidatingway allway entriesway andway allowingway ethay\n"
+"      Einitializeray ethay achecay, invalidatingway allway entriesway andway "
+"allowingway ethay\n"
 "      argumentsway andway esultray aluesvay otay ebay GC'd.\n"
 "\n"
 "  Esethay otherway eywordskay areway efinedday:\n"
@@ -7275,15 +8315,16 @@ msgstr ""
 "      Ethay izesay ofway ethay achecay asway away owerpay ofway 2.\n"
 "\n"
 "  :HASH-FUNCTION unctionfay\n"
-"      Omesay ingthay atthay ancay ebay acedplay inway CAR ositionpay ichwhay illway omputecay away "
-"aluevay\n"
+"      Omesay ingthay atthay ancay ebay acedplay inway CAR ositionpay ichwhay "
+"illway omputecay away aluevay\n"
 "      etweenbay 0 andway (1- (exptway 2 <ashhay-itsbay>)).\n"
 "\n"
 "  :VALUES <n>\n"
 "      Ethay umbernay ofway aluesvay achedcay.\n"
 "\n"
 "   :INIT-FORM <amenay>\n"
-"      Ethay DEFVAR orfay eatingcray ethay achecay isway enclosedway inway away ormfay ithway ethay\n"
+"      Ethay DEFVAR orfay eatingcray ethay achecay isway enclosedway inway "
+"away ormfay ithway ethay\n"
 "      ecifiedspay amenay.  Efaultday PROGN."
 
 #: src/code/extensions.lisp
@@ -7300,8 +8341,10 @@ msgid ""
 "  Some syntactic sugar for defining a function whose values are cached by\n"
 "  DEFINE-HASH-CACHE."
 msgstr ""
-"DEFUN-CACHED (Amenay {Eykay Aluevay}*) ({(Argway-Amenay Esttay-Unctionfay)}*) Orm*Fay\n"
-"  Omesay yntacticsay ugarsay orfay efiningday away unctionfay osewhay aluesvay areway achedcay ybay\n"
+"DEFUN-CACHED (Amenay {Eykay Aluevay}*) ({(Argway-Amenay Esttay-Unctionfay)}"
+"*) Orm*Fay\n"
+"  Omesay yntacticsay ugarsay orfay efiningday away unctionfay osewhay "
+"aluesvay areway achedcay ybay\n"
 "  DEFINE-HASH-CACHE."
 
 #: src/code/extensions.lisp
@@ -7310,35 +8353,41 @@ msgid ""
 "(of\n"
 "  course) change at arbitary times."
 msgstr ""
-"Eturnray anway EQ ashhay ofway X.  Ethay aluevay ofway isthay ashhay orfay anyway ivengay objectway ancay "
-"(ofway\n"
+"Eturnray anway EQ ashhay ofway X.  Ethay aluevay ofway isthay ashhay orfay "
+"anyway ivengay objectway ancay (ofway\n"
 "  oursecay) angechay atway arbitaryway imestay."
 
 #: src/code/commandline.lisp
 msgid "A list of all the command line arguments after --"
-msgstr "Away istlay ofway allway ethay ommandcay inelay argumentsway afterway --"
+msgstr ""
+"Away istlay ofway allway ethay ommandcay inelay argumentsway afterway --"
 
 #: src/code/commandline.lisp
 msgid ""
 "A list of cmd-switch's representing the arguments used to invoke\n"
 "  this process."
 msgstr ""
-"Away istlay ofway mdcay-witchsay's epresentingray ethay argumentsway usedway otay invokeway\n"
+"Away istlay ofway mdcay-witchsay's epresentingray ethay argumentsway usedway "
+"otay invokeway\n"
 "  isthay ocesspray."
 
 #: src/code/commandline.lisp
 msgid "The string name that was used to invoke this process."
-msgstr "Ethay ingstray amenay atthay asway usedway otay invokeway isthay ocesspray."
+msgstr ""
+"Ethay ingstray amenay atthay asway usedway otay invokeway isthay ocesspray."
 
 #: src/code/commandline.lisp
 msgid "A list of words between the utility name and the first switch."
-msgstr "Away istlay ofway ordsway etweenbay ethay utilityway amenay andway ethay irstfay witchsay."
+msgstr ""
+"Away istlay ofway ordsway etweenbay ethay utilityway amenay andway ethay "
+"irstfay witchsay."
 
 #: src/code/commandline.lisp
 msgid ""
 "A list of strings obtained from the command line that invoked this process."
 msgstr ""
-"Away istlay ofway ingsstray obtainedway omfray ethay ommandcay inelay atthay invokedway isthay ocesspray."
+"Away istlay ofway ingsstray obtainedway omfray ethay ommandcay inelay atthay "
+"invokedway isthay ocesspray."
 
 #: src/code/commandline.lisp
 msgid "An Alist of (\"argument-name\" . demon-function)"
@@ -7349,8 +8398,10 @@ msgid ""
 "When True runs lisp with its input coming from standard-input.\n"
 "  If an error is detected returns error code 1, otherwise 0."
 msgstr ""
-"Enwhay Uetray unsray isplay ithway itsway inputway omingcay omfray tandardsay-inputway.\n"
-"  Ifway anway errorway isway etectedday eturnsray errorway odecay 1, otherwiseway 0."
+"Enwhay Uetray unsray isplay ithway itsway inputway omingcay omfray "
+"tandardsay-inputway.\n"
+"  Ifway anway errorway isway etectedday eturnsray errorway odecay 1, "
+"otherwiseway 0."
 
 #: src/code/commandline.lisp
 msgid ""
@@ -7359,9 +8410,12 @@ msgid ""
 "  returned.  If there are no following words, then t is returned.  If\n"
 "  the switch was not specified, then nil is returned."
 msgstr ""
-"Acceptsway ethay amenay ofway away witchsay asway away ingstray andway eturnsray ethay aluevay ofway\n"
-"  ethay witchsay.  Ifway onay aluevay asway ecifiedspay, enthay anyway ollowingfay ordsway areway\n"
-"  eturnedray.  Ifway erethay areway onay ollowingfay ordsway, enthay t isway eturnedray.  Ifway\n"
+"Acceptsway ethay amenay ofway away witchsay asway away ingstray andway "
+"eturnsray ethay aluevay ofway\n"
+"  ethay witchsay.  Ifway onay aluevay asway ecifiedspay, enthay anyway "
+"ollowingfay ordsway areway\n"
+"  eturnedray.  Ifway erethay areway onay ollowingfay ordsway, enthay t isway "
+"eturnedray.  Ifway\n"
 "  ethay witchsay asway otnay ecifiedspay, enthay ilnay isway eturnedray."
 
 #: src/code/commandline.lisp
@@ -7369,7 +8423,8 @@ msgid ""
 "When set, invoking switch demons complains about illegal switches\n"
 "  that have not been defined with DEFSWITCH."
 msgstr ""
-"Enwhay etsay, invokingway witchsay emonsday omplainscay aboutway illegalway witchessay\n"
+"Enwhay etsay, invokingway witchsay emonsday omplainscay aboutway illegalway "
+"witchessay\n"
 "  atthay avehay otnay eenbay efinedday ithway DEFSWITCH."
 
 #: src/code/commandline.lisp
@@ -7390,14 +8445,20 @@ msgid ""
 "  any) for the switch.  Docstring describe the switch."
 msgstr ""
 "Associatesway unctionfay ithway ethay witchsay amenay inway\n"
-"  *command-switch-demons*.  Amenay isway away implesay-ingstray atthay oesday otnay\n"
-"  eginbay ithway away yphenhay, unlessway ethay witchsay amenay eallyray oesday eginbay ithway\n"
-"  oneway.  Unctionfay isway optionalway, utbay efiningday ethay witchsay isway ecessarynay otay\n"
-"  eepkay invokingway witchsay emonsday omfray omplainingcay aboutway illegalway witchessay.\n"
+"  *command-switch-demons*.  Amenay isway away implesay-ingstray atthay "
+"oesday otnay\n"
+"  eginbay ithway away yphenhay, unlessway ethay witchsay amenay eallyray "
+"oesday eginbay ithway\n"
+"  oneway.  Unctionfay isway optionalway, utbay efiningday ethay witchsay "
+"isway ecessarynay otay\n"
+"  eepkay invokingway witchsay emonsday omfray omplainingcay aboutway "
+"illegalway witchessay.\n"
 "  Isthay ancay ebay inhibitedway ithway *complain-about-illegal-switches*.\n"
 "\n"
-"  Ethay optionalway argumentsway, argway-amenay andway ocstringday, areway usedway ybay -elphay otay\n"
-"  escribeday ethay witchsay.  Argway-amenay isway away ingstray amingnay ethay argumentway (ifway\n"
+"  Ethay optionalway argumentsway, argway-amenay andway ocstringday, areway "
+"usedway ybay -elphay otay\n"
+"  escribeday ethay witchsay.  Argway-amenay isway away ingstray amingnay "
+"ethay argumentway (ifway\n"
 "  anyway) orfay ethay witchsay.  Ocstringday escribeday ethay witchsay."
 
 #: src/code/commandline.lisp
@@ -7406,8 +8467,10 @@ msgid ""
 "  sequence.  the value of the form will not be printed unless it is\n"
 "  wrapped in a form that does output."
 msgstr ""
-"Evaluateway ethay ecifiedspay Isplay expressionway uringday ethay tartsay upway\n"
-"  equencesay.  ethay aluevay ofway ethay ormfay illway otnay ebay intedpray unlessway itway isway\n"
+"Evaluateway ethay ecifiedspay Isplay expressionway uringday ethay tartsay "
+"upway\n"
+"  equencesay.  ethay aluevay ofway ethay ormfay illway otnay ebay intedpray "
+"unlessway itway isway\n"
 "  appedwray inway away ormfay atthay oesday outputway."
 
 #: src/code/commandline.lisp
@@ -7423,7 +8486,8 @@ msgid ""
 "Loads the specified file into Lisp before entering Lisp's\n"
 "  read-eval-print loop."
 msgstr ""
-"Oadslay ethay ecifiedspay ilefay intoway Isplay eforebay enteringway Isplay's\n"
+"Oadslay ethay ecifiedspay ilefay intoway Isplay eforebay enteringway "
+"Isplay's\n"
 "  eadray-evalway-intpray ooplay."
 
 #: src/code/commandline.lisp
@@ -7432,7 +8496,9 @@ msgstr "ilenamefay"
 
 #: src/code/commandline.lisp
 msgid "Specifies the suspended Lisp image ('core' file) to start up"
-msgstr "Ecifiesspay ethay uspendedsay Isplay imageway ('orecay' ilefay) otay tartsay upway"
+msgstr ""
+"Ecifiesspay ethay uspendedsay Isplay imageway ('orecay' ilefay) otay tartsay "
+"upway"
 
 #: src/code/commandline.lisp
 msgid "corefile"
@@ -7445,9 +8511,12 @@ msgid ""
 "  ~/.cmucl-init.lisp).  The loader loads any existing compiled binary\n"
 "  or the lisp source if none."
 msgstr ""
-"Ecifiesspay ethay amenay ofway away ilefay ontainingcay userway ustomizationscay atthay isway\n"
-"  otay ebay oadedlay eachway imetay Isplay tartssay upway (efaultday ~/initway orway\n"
-"  ~/.muclcay-initway.isplay).  Ethay oaderlay oadslay anyway existingway ompiledcay inarybay\n"
+"Ecifiesspay ethay amenay ofway away ilefay ontainingcay userway "
+"ustomizationscay atthay isway\n"
+"  otay ebay oadedlay eachway imetay Isplay tartssay upway (efaultday ~/"
+"initway orway\n"
+"  ~/.muclcay-initway.isplay).  Ethay oaderlay oadslay anyway existingway "
+"ompiledcay inarybay\n"
 "  orway ethay isplay ourcesay ifway onenay."
 
 #: src/code/commandline.lisp
@@ -7455,7 +8524,8 @@ msgid ""
 "Suppresses loading of the init file and also prevents -edit from\n"
 "  loading the Hemlock init file."
 msgstr ""
-"Uppressessay oadinglay ofway ethay initway ilefay andway alsoway eventspray -editway omfray\n"
+"Uppressessay oadinglay ofway ethay initway ilefay andway alsoway eventspray -"
+"editway omfray\n"
 "  oadinglay ethay Emlockhay initway ilefay."
 
 #: src/code/commandline.lisp
@@ -7463,7 +8533,8 @@ msgid ""
 "Suppresses loading of the site-init site specific initialization\n"
 "  file."
 msgstr ""
-"Uppressessay oadinglay ofway ethay itesay-initway itesay ecificspay initializationway\n"
+"Uppressessay oadinglay ofway ethay itesay-initway itesay ecificspay "
+"initializationway\n"
 "  ilefay."
 
 #: src/code/commandline.lisp
@@ -7471,8 +8542,10 @@ msgid ""
 "Specifies the name of the Hemlock init file (default ~/hemlock-init\n"
 "  or ~/.hemlock-init), which is loaded only when Hemlock is started."
 msgstr ""
-"Ecifiesspay ethay amenay ofway ethay Emlockhay initway ilefay (efaultday ~/emlockhay-initway\n"
-"  orway ~/.emlockhay-initway), ichwhay isway oadedlay onlyway enwhay Emlockhay isway tartedsay."
+"Ecifiesspay ethay amenay ofway ethay Emlockhay initway ilefay (efaultday ~/"
+"emlockhay-initway\n"
+"  orway ~/.emlockhay-initway), ichwhay isway oadedlay onlyway enwhay "
+"Emlockhay isway tartedsay."
 
 #: src/code/commandline.lisp
 msgid ""
@@ -7482,32 +8555,96 @@ msgid ""
 "  an immediate exit with a return code of 1, instead of entering the\n"
 "  debugger."
 msgstr ""
-"Ausescay Isplay otay unray inway atchbay odemay erewhay allway inputway isway irectedday omfray\n"
-"  tandardsay-inputway.  Away unixway eturnray odecay ofway 0 isway eturnedray uponway\n"
-"  encounteringway anway EOF, ilewhay anyway unhandledway errorway onditioncay illway ausecay\n"
-"  anway immediateway exitway ithway away eturnray odecay ofway 1, insteadway ofway enteringway ethay\n"
+"Ausescay Isplay otay unray inway atchbay odemay erewhay allway inputway "
+"isway irectedday omfray\n"
+"  tandardsay-inputway.  Away unixway eturnray odecay ofway 0 isway "
+"eturnedray uponway\n"
+"  encounteringway anway EOF, ilewhay anyway unhandledway errorway "
+"onditioncay illway ausecay\n"
+"  anway immediateway exitway ithway away eturnray odecay ofway 1, insteadway "
+"ofway enteringway ethay\n"
 "  ebuggerday."
 
 #: src/code/commandline.lisp
+#, fuzzy
 msgid ""
 "Specifies the number of megabytes that should be allocated to the\n"
-"  heap.  If not specified, a platform- specific default is used.  The\n"
+"  heap.  If not specified, a platform-specific default is used.  The\n"
 "  actual maximum allowed heap size is platform-specific."
 msgstr ""
-"Ecifiesspay ethay umbernay ofway egabytesmay atthay ouldshay ebay allocatedway otay ethay\n"
-"  eaphay.  Ifway otnay ecifiedspay, away atformplay- ecificspay efaultday isway usedway.  Ethay\n"
+"Ecifiesspay ethay umbernay ofway egabytesmay atthay ouldshay ebay "
+"allocatedway otay ethay\n"
+"  eaphay.  Ifway otnay ecifiedspay, away atformplay- ecificspay efaultday "
+"isway usedway.  Ethay\n"
 "  actualway aximummay allowedway eaphay izesay isway atformplay-ecificspay."
 
 #: src/code/commandline.lisp
 msgid "megabytes"
 msgstr "egabytesmay"
 
+#: src/code/commandline.lisp
+#, fuzzy
+msgid ""
+"Specifies the number of megabytes that should be allocated for the\n"
+"  read-only space.  If not specified, a platform-specific default is\n"
+"  used.  The actual maximum allowed read-only size is\n"
+"  platform-specific."
+msgstr ""
+"Ecifiesspay ethay umbernay ofway egabytesmay atthay ouldshay ebay "
+"allocatedway otay ethay\n"
+"  eaphay.  Ifway otnay ecifiedspay, away atformplay- ecificspay efaultday "
+"isway usedway.  Ethay\n"
+"  actualway aximummay allowedway eaphay izesay isway atformplay-ecificspay."
+
+#: src/code/commandline.lisp
+#, fuzzy
+msgid ""
+"Specifies the number of megabytes that should be allocated for the\n"
+"  static space.  If not specified, a platform-specific default is\n"
+"  used.  The actual maximum allowed static space size is\n"
+"  platform-specific."
+msgstr ""
+"Ecifiesspay ethay umbernay ofway egabytesmay atthay ouldshay ebay "
+"allocatedway otay ethay\n"
+"  eaphay.  Ifway otnay ecifiedspay, away atformplay- ecificspay efaultday "
+"isway usedway.  Ethay\n"
+"  actualway aximummay allowedway eaphay izesay isway atformplay-ecificspay."
+
+#: src/code/commandline.lisp
+#, fuzzy
+msgid ""
+"Specifies the number of megabytes that should be allocated for the\n"
+"  control stack.  If not specified, a platform-specific default is\n"
+"  used.  The actual maximum allowed control stack size is\n"
+"  platform-specific."
+msgstr ""
+"Ecifiesspay ethay umbernay ofway egabytesmay atthay ouldshay ebay "
+"allocatedway otay ethay\n"
+"  eaphay.  Ifway otnay ecifiedspay, away atformplay- ecificspay efaultday "
+"isway usedway.  Ethay\n"
+"  actualway aximummay allowedway eaphay izesay isway atformplay-ecificspay."
+
+#: src/code/commandline.lisp
+#, fuzzy
+msgid ""
+"Specifies the number of megabytes that should be allocated for the\n"
+"  binding stack.  If not specified, a platform-specific default is\n"
+"  used.  The actual maximum allowed binding stack size is\n"
+"  platform-specific."
+msgstr ""
+"Ecifiesspay ethay umbernay ofway egabytesmay atthay ouldshay ebay "
+"allocatedway otay ethay\n"
+"  eaphay.  Ifway otnay ecifiedspay, away atformplay- ecificspay efaultday "
+"isway usedway.  Ethay\n"
+"  actualway aximummay allowedway eaphay izesay isway atformplay-ecificspay."
+
 #: src/code/commandline.lisp
 msgid ""
 "A colon-separated list of directories to be used for the library:\n"
 "  search-list."
 msgstr ""
-"Away oloncay-eparatedsay istlay ofway irectoriesday otay ebay usedway orfay ethay ibrarylay:\n"
+"Away oloncay-eparatedsay istlay ofway irectoriesday otay ebay usedway orfay "
+"ethay ibrarylay:\n"
 "  earchsay-istlay."
 
 #: src/code/commandline.lisp
@@ -7520,8 +8657,10 @@ msgid ""
 "  and causing most unnecessary noise, like GC messages,load messages,\n"
 "  etc. to be suppressed."
 msgstr ""
-"Ausescay Isplay otay tartsay upway ilentlysay, isablingday intingpray ofway ethay eraldhay\n"
-"  andway ausingcay ostmay unnecessaryway oisenay, ikelay GC essagesmay,oadlay essagesmay,\n"
+"Ausescay Isplay otay tartsay upway ilentlysay, isablingday intingpray ofway "
+"ethay eraldhay\n"
+"  andway ausingcay ostmay unnecessaryway oisenay, ikelay GC essagesmay,"
+"oadlay essagesmay,\n"
 "  etcway. otay ebay uppressedsay."
 
 #: src/code/commandline.lisp
@@ -7529,9 +8668,14 @@ msgid ""
 "Enables printing of messages indication how CMUCL is searching for\n"
 "  its default core file."
 msgstr ""
-"Enablesway intingpray ofway essagesmay indicationway owhay CMUCL isway earchingsay orfay\n"
+"Enablesway intingpray ofway essagesmay indicationway owhay CMUCL isway "
+"earchingsay orfay\n"
 "  itsway efaultday orecay ilefay."
 
+#: src/code/commandline.lisp
+msgid "Specify the unidata.bin file to be used."
+msgstr ""
+
 #: src/code/commandline.lisp
 msgid "~&Usage: ~A <options>~2%"
 msgstr "~&Usageway: ~Away <optionsway>~2%"
@@ -7557,21 +8701,24 @@ msgid ""
 "  2) non-NIL if there is a local binding\n"
 "  3) An a-list containing information about any declarations that apply."
 msgstr ""
-"Eturnsray informationway aboutway ethay ymbolsay VAR inway ethay exicallay environmentway ENV.\n"
+"Eturnsray informationway aboutway ethay ymbolsay VAR inway ethay exicallay "
+"environmentway ENV.\n"
 "Reethay aluesvay areway eturnedray:\n"
 "  1) Ypetay orway indingbay ofway VAR.\n"
 "     NIL           Onay efinitionday orway indingbay\n"
 "     :ecialspay      VAR isway ecialspay\n"
 "     :exicallay      VAR isway exicallay\n"
 "     :ymbolsay-acromay VAR efersray otay away SYMBOL-MACROLET indingbay\n"
-"     :onstantcay     VAR efersray otay away amednay onstantcay orway VAR isway away eywordkay\n"
+"     :onstantcay     VAR efersray otay away amednay onstantcay orway VAR "
+"isway away eywordkay\n"
 "  2) onnay-NIL ifway erethay isway away ocallay indingbay\n"
-"  3) Anway away-istlay ontainingcay informationway aboutway anyway eclarationsday atthay applyway."
+"  3) Anway away-istlay ontainingcay informationway aboutway anyway "
+"eclarationsday atthay applyway."
 
 #: src/code/env-access.lisp
 msgid ""
-"Returns information about declarations named by the symbol DECLARATION-NAME"
-".\n"
+"Returns information about declarations named by the symbol DECLARATION-"
+"NAME.\n"
 "Supported DECLARATION-NAMES are\n"
 "  1) OPTIMIZE\n"
 "     A list whose entries are of the form (QUALITY VALUE) is returned,\n"
@@ -7582,17 +8729,21 @@ msgid ""
 "  3) DECLARATION.\n"
 "     A list of the declaration names the have been proclaimed as valid."
 msgstr ""
-"Eturnsray informationway aboutway eclarationsday amednay ybay ethay ymbolsay DECLARATION-NAME"
-".\n"
+"Eturnsray informationway aboutway eclarationsday amednay ybay ethay ymbolsay "
+"DECLARATION-NAME.\n"
 "Upportedsay DECLARATION-NAMES areway\n"
 "  1) OPTIMIZE\n"
-"     Away istlay osewhay entriesway areway ofway ethay ormfay (QUALITY VALUE) isway eturnedray,\n"
-"     erewhay QUALITY andway VALUE areway tandardsay optimizationway alitiesquay andway\n"
+"     Away istlay osewhay entriesway areway ofway ethay ormfay (QUALITY "
+"VALUE) isway eturnedray,\n"
+"     erewhay QUALITY andway VALUE areway tandardsay optimizationway "
+"alitiesquay andway\n"
 "     aluesvay.\n"
 "  2) EXT:OPTIMIZE-INTERFACE\n"
-"     Ikelay OPTIMIZE, utbay orfay ethay EXT:OPTIMIZE-INTERFACE eclarationday.\n"
+"     Ikelay OPTIMIZE, utbay orfay ethay EXT:OPTIMIZE-INTERFACE "
+"eclarationday.\n"
 "  3) DECLARATION.\n"
-"     Away istlay ofway ethay eclarationday amesnay ethay avehay eenbay oclaimedpray asway alidvay."
+"     Away istlay ofway ethay eclarationday amesnay ethay avehay eenbay "
+"oclaimedpray asway alidvay."
 
 #: src/code/env-access.lisp
 msgid "Unsupported declaration ~S."
@@ -7606,7 +8757,8 @@ msgid ""
 "  2) A form\n"
 "  3) An environment"
 msgstr ""
-"Ocesspray away acromay inway ethay amesay ayway atthay DEFMACRO orway MACROLET ouldway.\n"
+"Ocesspray away acromay inway ethay amesay ayway atthay DEFMACRO orway "
+"MACROLET ouldway.\n"
 "Reethay aluesvay areway eturnedray:\n"
 "  1) Away ambdalay-expressionway atthay acceptsway wotay argumentsway\n"
 "  2) Away ormfay\n"
@@ -7614,8 +8766,8 @@ msgstr ""
 
 #: src/code/env-access.lisp
 msgid ""
-"Returns information about the function name FUNCTION in the lexical environm"
-"ent ENV.\n"
+"Returns information about the function name FUNCTION in the lexical "
+"environment ENV.\n"
 "Three values are returned:\n"
 "  1) Type of definition or binding:\n"
 "     NIL          No apparent definition\n"
@@ -7625,8 +8777,8 @@ msgid ""
 "  2) non-NIL if definition is local\n"
 "  3) An a-list containing information about the declarations that apply."
 msgstr ""
-"Eturnsray informationway aboutway ethay unctionfay amenay FUNCTION inway ethay exicallay environmway"
-"entway ENV.\n"
+"Eturnsray informationway aboutway ethay unctionfay amenay FUNCTION inway "
+"ethay exicallay environmwayentway ENV.\n"
 "Reethay aluesvay areway eturnedray:\n"
 "  1) Ypetay ofway efinitionday orway indingbay:\n"
 "     NIL          Onay apparentway efinitionday\n"
@@ -7634,7 +8786,8 @@ msgstr ""
 "    :acromay        FUNCTION efersray otay away acromay\n"
 "    :ecialspay-ormfay FUNCTION isway away ecialspay ormfay\n"
 "  2) onnay-NIL ifway efinitionday isway ocallay\n"
-"  3) Anway away-istlay ontainingcay informationway aboutway ethay eclarationsday atthay applyway."
+"  3) Anway away-istlay ontainingcay informationway aboutway ethay "
+"eclarationsday atthay applyway."
 
 #: src/code/env-access.lisp
 msgid ""
@@ -7648,12 +8801,15 @@ msgid ""
 "  :MACRO        a list of local macro definitions\n"
 "  :DECLARE      a list of declaration specifiers"
 msgstr ""
-"Eturnray away ewnay environmentway ontainingcay informationway inway ENV atthay isway augmentedway\n"
+"Eturnray away ewnay environmentway ontainingcay informationway inway ENV "
+"atthay isway augmentedway\n"
 "ybay ethay ecifiedspay arameterspay:\n"
-"  :VARIABLE     away istlay ofway ymbolssay isiblevay asway oundbay ariablesvay inway ethay ewnay\n"
+"  :VARIABLE     away istlay ofway ymbolssay isiblevay asway oundbay "
+"ariablesvay inway ethay ewnay\n"
 "                environemntway\n"
 "  :SYMBOL-MACRO away istlay ofway ymbolsay acromay efinitionsday\n"
-"  :FUNCTION     away istlay ofway unctionfay amesnay atthay illway ebay isiblevay asway ocallay\n"
+"  :FUNCTION     away istlay ofway unctionfay amesnay atthay illway ebay "
+"isiblevay asway ocallay\n"
 "                unctionsfay\n"
 "  :MACRO        away istlay ofway ocallay acromay efinitionsday\n"
 "  :DECLARE      away istlay ofway eclarationday ecifiersspay"
@@ -7691,7 +8847,8 @@ msgid ""
 "increments dfixnum by an interger which may be bigger than fixnum.\n"
 "   May cons"
 msgstr ""
-"incrementsway fixnumday ybay anway intergerway ichwhay aymay ebay iggerbay anthay ixnumfay.\n"
+"incrementsway fixnumday ybay anway intergerway ichwhay aymay ebay iggerbay "
+"anthay ixnumfay.\n"
 "   Aymay onscay"
 
 #: src/code/dfixnum.lisp
@@ -7740,7 +8897,8 @@ msgstr[1] "  ~13:D ytesbay orfay ~9:D ~(~Away~) objectsway.~%"
 msgid "  ~13:D bytes for ~9:D ~(~A~) object (space total.)~%"
 msgid_plural "  ~13:D bytes for ~9:D ~(~A~) objects (space total.)~%"
 msgstr[0] "  ~13:D ytesbay orfay ~9:D ~(~Away~) objectway (acespay otaltay.)~%"
-msgstr[1] "  ~13:D ytesbay orfay ~9:D ~(~Away~) objectsway (acespay otaltay.)~%"
+msgstr[1] ""
+"  ~13:D ytesbay orfay ~9:D ~(~Away~) objectsway (acespay otaltay.)~%"
 
 #: src/code/room.lisp
 msgid ""
@@ -7748,35 +8906,40 @@ msgid ""
 "list\n"
 "  of the spaces to print detailed information for.  :Count-Spaces is a list "
 "of\n"
-"  the spaces to scan.  For either one, T means all spaces (:Static, :Dyanmic"
-"\n"
-"  and :Read-Only.)  If :Print-Summary is true, then summary information "
-"will be\n"
+"  the spaces to scan.  For either one, T means all spaces (:Static, :"
+"Dyanmic\n"
+"  and :Read-Only.)  If :Print-Summary is true, then summary information will "
+"be\n"
 "  printed.  The defaults print only summary information for dynamic space.\n"
 "  If true, Cutoff is a fraction of the usage in a report below which types "
 "will\n"
 "  be combined as OTHER."
 msgstr ""
-"Intpray outway informationway aboutway ethay eaphay emorymay inway useway.  :Intpray-Acesspay isway away "
-"istlay\n"
-"  ofway ethay acesspay otay intpray etailedday informationway orfay.  :Ountcay-Acesspay isway away istlay "
-"ofway\n"
-"  ethay acesspay otay anscay.  Orfay eitherway oneway, T eansmay allway acesspay (:Taticsay, :Yanmicday"
-"\n"
-"  andway :Eadray-Onlyway.)  Ifway :Intpray-Ummarysay isway uetray, enthay ummarysay informationway "
-"illway ebay\n"
-"  intedpray.  Ethay efaultsday intpray onlyway ummarysay informationway orfay ynamicday acespay.\n"
-"  Ifway uetray, Utoffcay isway away actionfray ofway ethay usageway inway away eportray elowbay ichwhay ypestay "
-"illway\n"
+"Intpray outway informationway aboutway ethay eaphay emorymay inway useway.  :"
+"Intpray-Acesspay isway away istlay\n"
+"  ofway ethay acesspay otay intpray etailedday informationway orfay.  :"
+"Ountcay-Acesspay isway away istlay ofway\n"
+"  ethay acesspay otay anscay.  Orfay eitherway oneway, T eansmay allway "
+"acesspay (:Taticsay, :Yanmicday\n"
+"  andway :Eadray-Onlyway.)  Ifway :Intpray-Ummarysay isway uetray, enthay "
+"ummarysay informationway illway ebay\n"
+"  intedpray.  Ethay efaultsday intpray onlyway ummarysay informationway "
+"orfay ynamicday acespay.\n"
+"  Ifway uetray, Utoffcay isway away actionfray ofway ethay usageway inway "
+"away eportray elowbay ichwhay ypestay illway\n"
 "  ebay ombinedcay asway OTHER."
 
 #: src/code/room.lisp
 msgid "Print info about how much code and no-ops there are in Space."
-msgstr "Intpray infoway aboutway owhay uchmay odecay andway onay-opsway erethay areway inway Acespay."
+msgstr ""
+"Intpray infoway aboutway owhay uchmay odecay andway onay-opsway erethay "
+"areway inway Acespay."
 
 #: src/code/room.lisp
 msgid "~:D code-object bytes, ~:D code words, with ~:D no-ops (~D%).~%"
-msgstr "~:D odecay-objectway ytesbay, ~:D odecay ordsway, ithway ~:D onay-opsway (~D%).~%"
+msgstr ""
+"~:D odecay-objectway ytesbay, ~:D odecay ordsway, ithway ~:D onay-opsway (~D"
+"%).~%"
 
 #: src/code/room.lisp
 msgid "Bogus type: ~D"
@@ -7788,7 +8951,9 @@ msgstr "~:D ordsway allocatedway orfay escriptorday objectsway.~%"
 
 #: src/code/room.lisp
 msgid "~:D bytes data/~:D words header for non-descriptor objects.~%"
-msgstr "~:D ytesbay ataday/~:D ordsway eaderhay orfay onnay-escriptorday objectsway.~%"
+msgstr ""
+"~:D ytesbay ataday/~:D ordsway eaderhay orfay onnay-escriptorday objectsway.~"
+"%"
 
 #: src/code/room.lisp
 msgid ""
@@ -7797,9 +8962,10 @@ msgid ""
 "with\n"
 "  largest usage."
 msgstr ""
-"Intpray away eakdownbray ybay instanceway ypetay ofway allway ethay instancesway allocatedway inway\n"
-"  Acespay.  Ifway TOP-N isway uetray, intpray onlyway informationway orfay ethay ethay TOP-N ypestay "
-"ithway\n"
+"Intpray away eakdownbray ybay instanceway ypetay ofway allway ethay "
+"instancesway allocatedway inway\n"
+"  Acespay.  Ifway TOP-N isway uetray, intpray onlyway informationway orfay "
+"ethay ethay TOP-N ypestay ithway\n"
 "  argestlay usageway."
 
 #: src/code/room.lisp
@@ -7853,16 +9019,20 @@ msgid ""
 "Given a hashtable, print a histogram of the contents.  Function should give\n"
 "  the value to plot when applied to the hashtable values."
 msgstr ""
-"Ivengay away ashtablehay, intpray away istogramhay ofway ethay ontentscay.  Unctionfay ouldshay ivegay\n"
-"  ethay aluevay otay otplay enwhay appliedway otay ethay ashtablehay aluesvay."
+"Ivengay away ashtablehay, intpray away istogramhay ofway ethay ontentscay.  "
+"Unctionfay ouldshay ivegay\n"
+"  ethay aluevay otay otplay enwhay appliedway otay ethay ashtablehay "
+"aluesvay."
 
 #: src/code/room.lisp
 msgid ""
 "Report the Top-N entries in the hashtable Table, when sorted by Function\n"
 "  applied to the hash value.  If Top-N is NIL, report all entries."
 msgstr ""
-"Eportray ethay Optay-N entriesway inway ethay ashtablehay Abletay, enwhay ortedsay ybay Unctionfay\n"
-"  appliedway otay ethay ashhay aluevay.  Ifway Optay-N isway NIL, eportray allway entriesway."
+"Eportray ethay Optay-N entriesway inway ethay ashtablehay Abletay, enwhay "
+"ortedsay ybay Unctionfay\n"
+"  appliedway otay ethay ashhay aluevay.  Ifway Optay-N isway NIL, eportray "
+"allway entriesway."
 
 #: src/code/room.lisp
 msgid "~8:D: Other~%"
@@ -7877,7 +9047,8 @@ msgid ""
 "Return a hashtable mapping each function in for which a call appears in\n"
 "  Space to the number of times such a call appears."
 msgstr ""
-"Eturnray away ashtablehay appingmay eachway unctionfay inway orfay ichwhay away allcay appearsway inway\n"
+"Eturnray away ashtablehay appingmay eachway unctionfay inway orfay ichwhay "
+"away allcay appearsway inway\n"
 "  Acespay otay ethay umbernay ofway imestay uchsay away allcay appearsway."
 
 #: src/code/room.lisp
@@ -7885,8 +9056,10 @@ msgid ""
 "Return a hashtable translating code objects to function constant counts for\n"
 "  all code objects in Space with more than Above function constants."
 msgstr ""
-"Eturnray away ashtablehay anslatingtray odecay objectsway otay unctionfay onstantcay ountscay orfay\n"
-"  allway odecay objectsway inway Acespay ithway oremay anthay Aboveway unctionfay onstantscay."
+"Eturnray away ashtablehay anslatingtray odecay objectsway otay unctionfay "
+"onstantcay ountscay orfay\n"
+"  allway odecay objectsway inway Acespay ithway oremay anthay Aboveway "
+"unctionfay onstantscay."
 
 #: src/code/gc.lisp
 msgid "Oh no.  The current dynamic space is missing!"
@@ -7898,7 +9071,8 @@ msgstr "Ynamicday Acespay Usageway:    ~13:D ytesbay (outway ofway ~4:D MB).~%"
 
 #: src/code/gc.lisp
 msgid "Read-Only Space Usage:  ~13:D bytes (out of ~4:D MB).~%"
-msgstr "Eadray-Onlyway Acespay Usageway:  ~13:D ytesbay (outway ofway ~4:D MB).~%"
+msgstr ""
+"Eadray-Onlyway Acespay Usageway:  ~13:D ytesbay (outway ofway ~4:D MB).~%"
 
 #: src/code/gc.lisp
 msgid "Static Space Usage:     ~13:D bytes (out of ~4:D MB).~%"
@@ -7930,21 +9104,28 @@ msgid ""
 "  an intermediate amount of information.  See also VM:MEMORY-USAGE and\n"
 "  VM:INSTANCE-USAGE for finer report control."
 msgstr ""
-"Intspray otay *STANDARD-OUTPUT* informationway aboutway ethay tatesay ofway internalway\n"
-"  toragesay andway itsway anagementmay.  Ethay optionalway argumentway ontrolscay ethay\n"
-"  erbosityvay ofway ROOM.  Ifway itway isway T, ROOM intspray outway away aximalmay amountway ofway\n"
-"  informationway.  Ifway itway isway NIL, ROOM intspray outway away inimalmay amountway ofway\n"
-"  informationway.  Ifway itway isway :DEFAULT orway itway isway otnay uppliedsay, ROOM intspray outway\n"
-"  anway intermediateway amountway ofway informationway.  Eesay alsoway VM:MEMORY-USAGE andway\n"
+"Intspray otay *STANDARD-OUTPUT* informationway aboutway ethay tatesay ofway "
+"internalway\n"
+"  toragesay andway itsway anagementmay.  Ethay optionalway argumentway "
+"ontrolscay ethay\n"
+"  erbosityvay ofway ROOM.  Ifway itway isway T, ROOM intspray outway away "
+"aximalmay amountway ofway\n"
+"  informationway.  Ifway itway isway NIL, ROOM intspray outway away "
+"inimalmay amountway ofway\n"
+"  informationway.  Ifway itway isway :DEFAULT orway itway isway otnay "
+"uppliedsay, ROOM intspray outway\n"
+"  anway intermediateway amountway ofway informationway.  Eesay alsoway VM:"
+"MEMORY-USAGE andway\n"
 "  VM:INSTANCE-USAGE orfay inerfay eportray ontrolcay."
 
 #: src/code/gc.lisp
 msgid ""
 "No way man!  The optional argument to ROOM must be T, NIL, ~\n"
-"		 or :DEFAULT.~%What do you think you are doing?"
+"\t\t or :DEFAULT.~%What do you think you are doing?"
 msgstr ""
-"Onay ayway anmay!  Ethay optionalway argumentway otay ROOM ustmay ebay T, NIL, ~\n"
-"		 orway :DEFAULT.~%Atwhay oday ouyay inkthay ouyay areway oingday?"
+"Onay ayway anmay!  Ethay optionalway argumentway otay ROOM ustmay ebay T, "
+"NIL, ~\n"
+"\t\t orway :DEFAULT.~%Atwhay oday ouyay inkthay ouyay areway oingday?"
 
 #: src/code/gc.lisp
 msgid "resetting GC counters"
@@ -7955,15 +9136,18 @@ msgid ""
 "Returns the number of bytes consed since the first time this function\n"
 "  was called.  The first time it is called, it returns zero."
 msgstr ""
-"Eturnsray ethay umbernay ofway ytesbay onsedcay incesay ethay irstfay imetay isthay unctionfay\n"
-"  asway alledcay.  Ethay irstfay imetay itway isway alledcay, itway eturnsray erozay."
+"Eturnsray ethay umbernay ofway ytesbay onsedcay incesay ethay irstfay imetay "
+"isthay unctionfay\n"
+"  asway alledcay.  Ethay irstfay imetay itway isway alledcay, itway "
+"eturnsray erozay."
 
 #: src/code/gc.lisp
 msgid ""
 "This number specifies the minimum number of bytes of dynamic space\n"
 "   that must be consed before the next gc will occur."
 msgstr ""
-"Isthay umbernay ecifiesspay ethay inimummay umbernay ofway ytesbay ofway ynamicday acespay\n"
+"Isthay umbernay ecifiesspay ethay inimummay umbernay ofway ytesbay ofway "
+"ynamicday acespay\n"
 "   atthay ustmay ebay onsedcay eforebay ethay extnay cgay illway occurway."
 
 #: src/code/gc.lisp
@@ -7971,7 +9155,8 @@ msgid ""
 "The total CPU time spend doing garbage collection (as reported by\n"
 "   GET-INTERNAL-RUN-TIME.)"
 msgstr ""
-"Ethay otaltay CPU imetay endspay oingday arbagegay ollectioncay (asway eportedray ybay\n"
+"Ethay otaltay CPU imetay endspay oingday arbagegay ollectioncay (asway "
+"eportedray ybay\n"
 "   GET-INTERNAL-RUN-TIME.)"
 
 #: src/code/gc.lisp
@@ -7979,7 +9164,8 @@ msgid ""
 "A list of functions that are called before garbage collection occurs.\n"
 "  The functions should take no arguments."
 msgstr ""
-"Away istlay ofway unctionsfay atthay areway alledcay eforebay arbagegay ollectioncay occursway.\n"
+"Away istlay ofway unctionsfay atthay areway alledcay eforebay arbagegay "
+"ollectioncay occursway.\n"
 "  Ethay unctionsfay ouldshay aketay onay argumentsway."
 
 #: src/code/gc.lisp
@@ -7987,7 +9173,8 @@ msgid ""
 "A list of functions that are called after garbage collection occurs.\n"
 "  The functions should take no arguments."
 msgstr ""
-"Away istlay ofway unctionsfay atthay areway alledcay afterway arbagegay ollectioncay occursway.\n"
+"Away istlay ofway unctionsfay atthay areway alledcay afterway arbagegay "
+"ollectioncay occursway.\n"
 "  Ethay unctionsfay ouldshay aketay onay argumentsway."
 
 #: src/code/gc.lisp
@@ -7997,10 +9184,14 @@ msgid ""
 "  usage.  The function should return NIL if garbage collection should\n"
 "  continue and non-NIL if it should be inhibited.  Use with caution."
 msgstr ""
-"Ouldshay ebay oundbay otay away unctionfay orway NIL.  Ifway itway isway away unctionfay, isthay\n"
-"  unctionfay ouldshay aketay oneway argumentway, ethay urrentcay amountway ofway ynamicday\n"
-"  usageway.  Ethay unctionfay ouldshay eturnray NIL ifway arbagegay ollectioncay ouldshay\n"
-"  ontinuecay andway onnay-NIL ifway itway ouldshay ebay inhibitedway.  Useway ithway autioncay."
+"Ouldshay ebay oundbay otay away unctionfay orway NIL.  Ifway itway isway "
+"away unctionfay, isthay\n"
+"  unctionfay ouldshay aketay oneway argumentway, ethay urrentcay amountway "
+"ofway ynamicday\n"
+"  usageway.  Ethay unctionfay ouldshay eturnray NIL ifway arbagegay "
+"ollectioncay ouldshay\n"
+"  ontinuecay andway onnay-NIL ifway itway ouldshay ebay inhibitedway.  "
+"Useway ithway autioncay."
 
 #: src/code/gc.lisp
 msgid ""
@@ -8010,10 +9201,12 @@ msgid ""
 "beep\n"
 "  annoyingly."
 msgstr ""
-"Enwhay onnay-NIL, ausescay ethay unctionsfay oundbay otay *GC-NOTIFY-BEFORE* andway\n"
-"  *GC-NOTIFY-AFTER* otay ebay alledcay eforebay andway afterway away arbagegay ollectioncay\n"
-"  occursway espectivelyray.  Ifway :BEEP, ausescay ethay efaultday otifynay unctionsfay otay "
-"eepbay\n"
+"Enwhay onnay-NIL, ausescay ethay unctionsfay oundbay otay *GC-NOTIFY-BEFORE* "
+"andway\n"
+"  *GC-NOTIFY-AFTER* otay ebay alledcay eforebay andway afterway away "
+"arbagegay ollectioncay\n"
+"  occursway espectivelyray.  Ifway :BEEP, ausescay ethay efaultday otifynay "
+"unctionsfay otay eepbay\n"
 "  annoyinglyway."
 
 #: src/code/gc.lisp
@@ -8030,17 +9223,24 @@ msgid ""
 "  *GC-VERBOSE* is NIL) with the current amount of dynamic usage (in\n"
 "  bytes).  It should notify the user that the system is going to GC."
 msgstr ""
-"Isthay unctionfay oundbay otay isthay ariablevay isway invokedway eforebay GC'ingway (unlessway\n"
-"  *GC-VERBOSE* isway NIL) ithway ethay urrentcay amountway ofway ynamicday usageway (inway\n"
-"  ytesbay).  Itway ouldshay otifynay ethay userway atthay ethay ystemsay isway oinggay otay GC."
+"Isthay unctionfay oundbay otay isthay ariablevay isway invokedway eforebay "
+"GC'ingway (unlessway\n"
+"  *GC-VERBOSE* isway NIL) ithway ethay urrentcay amountway ofway ynamicday "
+"usageway (inway\n"
+"  ytesbay).  Itway ouldshay otifynay ethay userway atthay ethay ystemsay "
+"isway oinggay otay GC."
 
 #: src/code/gc.lisp
 msgid "~&; [GC completed with ~:D bytes retained and ~:D bytes freed.]~%"
-msgstr "~&; [GC ompletedcay ithway ~:D ytesbay etainedray andway ~:D ytesbay eedfray.]~%"
+msgstr ""
+"~&; [GC ompletedcay ithway ~:D ytesbay etainedray andway ~:D ytesbay "
+"eedfray.]~%"
 
 #: src/code/gc.lisp
 msgid "~&; [GC will next occur when at least ~:D bytes are in use.]~%"
-msgstr "~&; [GC illway extnay occurway enwhay atway eastlay ~:D ytesbay areway inway useway.]~%"
+msgstr ""
+"~&; [GC illway extnay occurway enwhay atway eastlay ~:D ytesbay areway inway "
+"useway.]~%"
 
 #: src/code/gc.lisp
 msgid ""
@@ -8050,19 +9250,23 @@ msgid ""
 "  threshold.  The function should notify the user that the system has\n"
 "  finished GC'ing."
 msgstr ""
-"Ethay unctionfay oundbay otay isthay ariablevay isway invokedway afterway GC'ingway (unlessway\n"
-"  *GC-VERBOSE* isway NIL) ithway ethay amountway ofway ynamicday usageway (inway ytesbay) ownay\n"
-"  eefray, ethay umbernay ofway ytesbay eedfray ybay ethay GC, andway ethay ewnay GC iggertray\n"
-"  resholdthay.  Ethay unctionfay ouldshay otifynay ethay userway atthay ethay ystemsay ashay\n"
+"Ethay unctionfay oundbay otay isthay ariablevay isway invokedway afterway "
+"GC'ingway (unlessway\n"
+"  *GC-VERBOSE* isway NIL) ithway ethay amountway ofway ynamicday usageway "
+"(inway ytesbay) ownay\n"
+"  eefray, ethay umbernay ofway ytesbay eedfray ybay ethay GC, andway ethay "
+"ewnay GC iggertray\n"
+"  resholdthay.  Ethay unctionfay ouldshay otifynay ethay userway atthay "
+"ethay ystemsay ashay\n"
 "  inishedfay GC'ingway."
 
 #: src/code/gc.lisp
 msgid ""
 "The value of *BYTES-CONSED-BETWEEN-GCS*, ~S, is not an ~\n"
-"	       integer.  Resetting it to ~D."
+"\t       integer.  Resetting it to ~D."
 msgstr ""
 "Ethay aluevay ofway *BYTES-CONSED-BETWEEN-GCS*, ~S, isway otnay anway ~\n"
-"	       integerway.  Esettingray itway otay ~D."
+"\t       integerway.  Esettingray itway otay ~D."
 
 #: src/code/gc.lisp
 msgid "(FUNCALL ~S~{ ~S~}) lost:~%~A"
@@ -8074,8 +9278,10 @@ msgid ""
 "  which defaults to the value of the variable *GC-VERBOSE* controls\n"
 "  whether or not GC statistics are printed."
 msgstr ""
-"Initiatesway away arbagegay ollectioncay.  Ethay optionalway argumentway, VERBOSE-P,\n"
-"  ichwhay efaultsday otay ethay aluevay ofway ethay ariablevay *GC-VERBOSE* ontrolscay\n"
+"Initiatesway away arbagegay ollectioncay.  Ethay optionalway argumentway, "
+"VERBOSE-P,\n"
+"  ichwhay efaultsday otay ethay aluevay ofway ethay ariablevay *GC-VERBOSE* "
+"ontrolscay\n"
 "  etherwhay orway otnay GC tatisticssay areway intedpray."
 
 #: src/code/gc.lisp
@@ -8085,9 +9291,12 @@ msgid ""
 "   not GC statistics are printed. The keyword :GEN defaults to 0, and\n"
 "   controls the number of generations to garbage collect."
 msgstr ""
-"Initiatesway away arbagegay ollectioncay.  Ethay eywordkay :VERBOSE, ichwhay\n"
-"   efaultsday otay ethay aluevay ofway ethay ariablevay *GC-VERBOSE* ontrolscay etherwhay orway\n"
-"   otnay GC tatisticssay areway intedpray. Ethay eywordkay :GEN efaultsday otay 0, andway\n"
+"Initiatesway away arbagegay ollectioncay.  Ethay eywordkay :VERBOSE, "
+"ichwhay\n"
+"   efaultsday otay ethay aluevay ofway ethay ariablevay *GC-VERBOSE* "
+"ontrolscay etherwhay orway\n"
+"   otnay GC tatisticssay areway intedpray. Ethay eywordkay :GEN efaultsday "
+"otay 0, andway\n"
 "   ontrolscay ethay umbernay ofway enerationsgay otay arbagegay ollectcay."
 
 #: src/code/gc.lisp
@@ -8095,7 +9304,8 @@ msgid ""
 "Return the amount of memory that will be allocated before the next garbage\n"
 "   collection is initiated.  This can be set with SETF."
 msgstr ""
-"Eturnray ethay amountway ofway emorymay atthay illway ebay allocatedway eforebay ethay extnay arbagegay\n"
+"Eturnray ethay amountway ofway emorymay atthay illway ebay allocatedway "
+"eforebay ethay extnay arbagegay\n"
 "   ollectioncay isway initiatedway.  Isthay ancay ebay etsay ithway SETF."
 
 #: src/code/gc.lisp
@@ -8116,10 +9326,14 @@ msgid ""
 "  generation.  See the gencgc source code for more info."
 msgstr ""
 "Eturnray omesay GC tatisticssay orfay ethay ecifiedspay GENERATION.  Ethay\n"
-"  tatisticssay areway ethay umbernay ofway ytesbay allocatedway inway isthay enerationgay; ethay\n"
-"  cgay-iggertray; ethay umbernay ofway ytesbay onsedcay etweenbay Csgay; ethay umbernay ofway\n"
-"  Csgay atthay avehay occurredway; ethay iggertray ageway; ethay umulativecay umbernay ofway\n"
-"  ytesbay allocatedway inway isthay enerationgay; andway ethay averageway ageway ofway isthay\n"
+"  tatisticssay areway ethay umbernay ofway ytesbay allocatedway inway isthay "
+"enerationgay; ethay\n"
+"  cgay-iggertray; ethay umbernay ofway ytesbay onsedcay etweenbay Csgay; "
+"ethay umbernay ofway\n"
+"  Csgay atthay avehay occurredway; ethay iggertray ageway; ethay "
+"umulativecay umbernay ofway\n"
+"  ytesbay allocatedway inway isthay enerationgay; andway ethay averageway "
+"ageway ofway isthay\n"
 "  enerationgay.  Eesay ethay encgcgay ourcesay odecay orfay oremay infoway."
 
 #: src/code/purify.lisp
@@ -8140,20 +9354,23 @@ msgid ""
 "is\n"
 "   supplied, then environment compaction is inhibited."
 msgstr ""
-"Isthay unctionfay optimizesway arbagegay ollectioncay ybay ovingmay allway urrentlycay ivelay\n"
-"   objectsway intoway onnay-ollectedcay toragesay.  ROOT-STRUCTURES isway anway optionalway istlay "
-"ofway\n"
-"   objectsway ichwhay ouldshay ebay opiedcay irstfay otay aximizemay ocalitylay.\n"
-"\n"
-"   DEFSTRUCT ucturesstray efinedday ithway ethay (:PURE T) optionway areway ovedmay intoway\n"
-"   eadray-onlyway toragesay, urtherfay educingray GC ostcay.  Istlay andway ectorvay otsslay ofway "
-"urepay\n"
+"Isthay unctionfay optimizesway arbagegay ollectioncay ybay ovingmay allway "
+"urrentlycay ivelay\n"
+"   objectsway intoway onnay-ollectedcay toragesay.  ROOT-STRUCTURES isway "
+"anway optionalway istlay ofway\n"
+"   objectsway ichwhay ouldshay ebay opiedcay irstfay otay aximizemay "
+"ocalitylay.\n"
+"\n"
+"   DEFSTRUCT ucturesstray efinedday ithway ethay (:PURE T) optionway areway "
+"ovedmay intoway\n"
+"   eadray-onlyway toragesay, urtherfay educingray GC ostcay.  Istlay andway "
+"ectorvay otsslay ofway urepay\n"
 "   ucturesstray areway alsoway ovedmay intoway eadray-onlyway toragesay.\n"
 "\n"
-"   ENVIRONMENT-NAME isway atuitousgray ocumentationday orfay ompactedcay ersionvay ofway "
-"ethay\n"
-"   urrentcay obalglay environmentway (asway eensay inway C::*INFO-ENVIRONMENT*.)  Ifway NIL "
-"isway\n"
+"   ENVIRONMENT-NAME isway atuitousgray ocumentationday orfay ompactedcay "
+"ersionvay ofway ethay\n"
+"   urrentcay obalglay environmentway (asway eensay inway C::*INFO-"
+"ENVIRONMENT*.)  Ifway NIL isway\n"
 "   uppliedsay, enthay environmentway ompactioncay isway inhibitedway."
 
 #: src/code/purify.lisp
@@ -8166,7 +9383,9 @@ msgstr "Oneday.]"
 
 #: src/code/scavhook.lisp
 msgid "Returns T if OBJECT is a scavenger-hook, and NIL if not."
-msgstr "Eturnsray T ifway OBJECT isway away avengerscay-ookhay, andway NIL ifway otnay."
+msgstr ""
+"Eturnsray T ifway OBJECT isway away avengerscay-ookhay, andway NIL ifway "
+"otnay."
 
 #: src/code/scavhook.lisp
 msgid ""
@@ -8175,21 +9394,26 @@ msgid ""
 "   collector will note whenever VALUE is moved, and arrange for FUNCTION\n"
 "   to be funcalled."
 msgstr ""
-"Eatecray away ewnay avengerscay-ookhay ithway ethay ecifiedspay VALUE andway FUNCTION.  Orfay\n"
-"   asway onglay asway ethay avengerscay-ookhay isway aliveway, ethay avengerscay inway ethay arbagegay\n"
-"   ollectorcay illway otenay eneverwhay VALUE isway ovedmay, andway arrangeway orfay FUNCTION\n"
+"Eatecray away ewnay avengerscay-ookhay ithway ethay ecifiedspay VALUE andway "
+"FUNCTION.  Orfay\n"
+"   asway onglay asway ethay avengerscay-ookhay isway aliveway, ethay "
+"avengerscay inway ethay arbagegay\n"
+"   ollectorcay illway otenay eneverwhay VALUE isway ovedmay, andway "
+"arrangeway orfay FUNCTION\n"
 "   otay ebay uncalledfay."
 
 #: src/code/scavhook.lisp
 msgid "Returns the VALUE being monitored by SCAVHOOK.  Can be setf."
-msgstr "Eturnsray ethay VALUE eingbay onitoredmay ybay SCAVHOOK.  Ancay ebay etfsay."
+msgstr ""
+"Eturnsray ethay VALUE eingbay onitoredmay ybay SCAVHOOK.  Ancay ebay etfsay."
 
 #: src/code/scavhook.lisp
 msgid ""
 "Returns the FUNCTION invoked when the monitored value is moved.  Can be\n"
 "   setf."
 msgstr ""
-"Eturnsray ethay FUNCTION invokedway enwhay ethay onitoredmay aluevay isway ovedmay.  Ancay ebay\n"
+"Eturnsray ethay FUNCTION invokedway enwhay ethay onitoredmay aluevay isway "
+"ovedmay.  Ancay ebay\n"
 "   etfsay."
 
 #: src/code/save.lisp
@@ -8199,36 +9423,41 @@ msgid ""
 "ports,\n"
 "  so they cannot do anything that tries to talk to the outside world."
 msgstr ""
-"Isthay isway away istlay ofway unctionsfay ichwhay areway alledcay eforebay eatingcray away avedsay orecay\n"
-"  imageway.  Esethay unctionsfay areway executedway inway ethay ildchay ocesspray ichwhay ashay onay "
-"ortspay,\n"
-"  osay eythay annotcay oday anythingway atthay iestray otay alktay otay ethay outsideway orldway."
+"Isthay isway away istlay ofway unctionsfay ichwhay areway alledcay eforebay "
+"eatingcray away avedsay orecay\n"
+"  imageway.  Esethay unctionsfay areway executedway inway ethay ildchay "
+"ocesspray ichwhay ashay onay ortspay,\n"
+"  osay eythay annotcay oday anythingway atthay iestray otay alktay otay "
+"ethay outsideway orldway."
 
 #: src/code/save.lisp
 msgid ""
 "This is a list of functions which are called when a saved core image starts\n"
-"  up.  The system itself should be initialized at this point, but applicatio"
-"ns\n"
+"  up.  The system itself should be initialized at this point, but "
+"applications\n"
 "  might not be."
 msgstr ""
-"Isthay isway away istlay ofway unctionsfay ichwhay areway alledcay enwhay away avedsay orecay imageway tartssay\n"
-"  upway.  Ethay ystemsay itselfway ouldshay ebay initializedway atway isthay ointpay, utbay applicatioway"
-"snay\n"
+"Isthay isway away istlay ofway unctionsfay ichwhay areway alledcay enwhay "
+"away avedsay orecay imageway tartssay\n"
+"  upway.  Ethay ystemsay itselfway ouldshay ebay initializedway atway isthay "
+"ointpay, utbay applicatiowaysnay\n"
 "  ightmay otnay ebay."
 
 #: src/code/save.lisp
 msgid "An alist mapping environment variables (as keywords) to either values"
-msgstr "Anway alistway appingmay environmentway ariablesvay (asway eywordskay) otay eitherway aluesvay"
+msgstr ""
+"Anway alistway appingmay environmentway ariablesvay (asway eywordskay) otay "
+"eitherway aluesvay"
 
 #: src/code/save.lisp
 msgid "Non-NIL if environment-init has been called"
 msgstr "Onnay-NIL ifway environmentway-initway ashay eenbay alledcay"
 
 #: src/code/save.lisp
-msgid ""
-"This is true if and only if the lisp was started with the -edit switch."
+msgid "This is true if and only if the lisp was started with the -edit switch."
 msgstr ""
-"Isthay isway uetray ifway andway onlyway ifway ethay isplay asway tartedsay ithway ethay -editway witchsay."
+"Isthay isway uetray ifway andway onlyway ifway ethay isplay asway tartedsay "
+"ithway ethay -editway witchsay."
 
 #: src/code/save.lisp
 msgid ""
@@ -8245,8 +9474,8 @@ msgid ""
 "  :root-structures\n"
 "      This should be a list of the main entry points in any newly loaded\n"
 "  systems.  This need not be supplied, but locality and/or GC performance\n"
-"  will be better if they are.  Meaningless if :purify is NIL.  See EXT:PURIF"
-"Y.\n"
+"  will be better if they are.  Meaningless if :purify is NIL.  See EXT:"
+"PURIFY.\n"
 "\n"
 "  :environment-name\n"
 "      Also passed to EXT:PURIFY when :PURIFY is T.  Rarely used.\n"
@@ -8286,59 +9515,80 @@ msgid ""
 "  switch will invoke batch-mode processing.  If true, the produced core\n"
 "  will always be in batch-mode, regardless of any command-line switches."
 msgstr ""
-"Avessay away CMU Ommoncay Isplay orecay imageway inway ethay ilefay ofway ethay ecifiedspay amenay.  Ethay\n"
+"Avessay away CMU Ommoncay Isplay orecay imageway inway ethay ilefay ofway "
+"ethay ecifiedspay amenay.  Ethay\n"
 "  ollowingfay eywordskay areway efinedday:\n"
 "  \n"
 "  :urifypay\n"
-"      Ifway uetray (ethay efaultday), oday away urifyingpay GC ichwhay ovesmay allway ynamicallyday\n"
-"  allocatedway objectsway intoway taticsay acespay osay atthay eythay taysay urepay.  Isthay akestay\n"
-"  omewhatsay ongerlay anthay ethay ormalnay GC ichwhay isway otherwiseway oneday, utbay GC's illway\n"
-"  ebay oneday esslay oftenway andway aketay esslay imetay inway ethay esultingray orecay ilefay.  Eesay\n"
+"      Ifway uetray (ethay efaultday), oday away urifyingpay GC ichwhay "
+"ovesmay allway ynamicallyday\n"
+"  allocatedway objectsway intoway taticsay acespay osay atthay eythay taysay "
+"urepay.  Isthay akestay\n"
+"  omewhatsay ongerlay anthay ethay ormalnay GC ichwhay isway otherwiseway "
+"oneday, utbay GC's illway\n"
+"  ebay oneday esslay oftenway andway aketay esslay imetay inway ethay "
+"esultingray orecay ilefay.  Eesay\n"
 "  EXT:PURIFY.\n"
 "\n"
 "  :ootray-ucturesstray\n"
-"      Isthay ouldshay ebay away istlay ofway ethay ainmay entryway ointspay inway anyway ewlynay oadedlay\n"
-"  ystemssay.  Isthay eednay otnay ebay uppliedsay, utbay ocalitylay andway/orway GC erformancepay\n"
-"  illway ebay etterbay ifway eythay areway.  Eaninglessmay ifway :urifypay isway NIL.  Eesay EXT:PURIF"
-"Y.\n"
+"      Isthay ouldshay ebay away istlay ofway ethay ainmay entryway ointspay "
+"inway anyway ewlynay oadedlay\n"
+"  ystemssay.  Isthay eednay otnay ebay uppliedsay, utbay ocalitylay andway/"
+"orway GC erformancepay\n"
+"  illway ebay etterbay ifway eythay areway.  Eaninglessmay ifway :urifypay "
+"isway NIL.  Eesay EXT:PURIFY.\n"
 "\n"
 "  :environmentway-amenay\n"
-"      Alsoway assedpay otay EXT:PURIFY enwhay :PURIFY isway T.  Arelyray usedway.\n"
+"      Alsoway assedpay otay EXT:PURIFY enwhay :PURIFY isway T.  Arelyray "
+"usedway.\n"
 "  \n"
 "  :initway-unctionfay\n"
-"      Isthay isway ethay unctionfay atthay tartssay unningray enwhay ethay eatedcray orecay ilefay "
-"isway\n"
-"  esumedray.  Ethay efaultday unctionfay implysay invokesway ethay optay evellay\n"
-"  eadray-evalway-intpray ooplay.  Ifway ethay unctionfay eturnsray ethay isplay illway exitway.\n"
+"      Isthay isway ethay unctionfay atthay tartssay unningray enwhay ethay "
+"eatedcray orecay ilefay isway\n"
+"  esumedray.  Ethay efaultday unctionfay implysay invokesway ethay optay "
+"evellay\n"
+"  eadray-evalway-intpray ooplay.  Ifway ethay unctionfay eturnsray ethay "
+"isplay illway exitway.\n"
 "  \n"
 "  :oadlay-initway-ilefay\n"
-"      Ifway uetray, enthay ooklay orfay anway initway ilefay enwhay ethay orecay ilefay isway esumedray.\n"
-"  Ooklay orfay omehay:initway irstfay andway enthay omehay:.muclcay-initway.  Onay errorway ifway\n"
+"      Ifway uetray, enthay ooklay orfay anway initway ilefay enwhay ethay "
+"orecay ilefay isway esumedray.\n"
+"  Ooklay orfay omehay:initway irstfay andway enthay omehay:.muclcay-"
+"initway.  Onay errorway ifway\n"
 "  erethay isway onay initway ilefay.\n"
 "\n"
 "  :itesay-initway\n"
-"      Ifway uetray, enthay ethay amenay ofway ethay itesay initway ilefay otay oadlay.  Ethay efaultday isway\n"
-"  ibrarylay:itesay-initway.  Onay errorway ifway isthay oesday otnay existway.\n"
+"      Ifway uetray, enthay ethay amenay ofway ethay itesay initway ilefay "
+"otay oadlay.  Ethay efaultday isway\n"
+"  ibrarylay:itesay-initway.  Onay errorway ifway isthay oesday otnay "
+"existway.\n"
 "\n"
 "  :intpray-eraldhay\n"
-"      Ifway uetray (ethay efaultday), intpray outway ethay isplay ystemsay eraldhay enwhay "
-"tartingsay.\n"
+"      Ifway uetray (ethay efaultday), intpray outway ethay isplay ystemsay "
+"eraldhay enwhay tartingsay.\n"
 "\n"
 "  :ocesspray-ommandcay-inelay\n"
-"      Ifway uetray (ethay efaultday), ocesspray ommandcay-inelay witchessay iavay ethay ormalnay\n"
-"  echanismsmay, otherwiseway ignoreway allway witchessay (exceptway osethay ocessedpray ybay ethay\n"
+"      Ifway uetray (ethay efaultday), ocesspray ommandcay-inelay witchessay "
+"iavay ethay ormalnay\n"
+"  echanismsmay, otherwiseway ignoreway allway witchessay (exceptway osethay "
+"ocessedpray ybay ethay\n"
 "  C tartupsay odecay).\n"
 "\n"
 "  :executableway\n"
-"      Ifway ilnay (ethay efaultday), avesay-isplay illway avesay usingway ethay aditionaltray\n"
-"   orecay-ilefay ormatfay.  Ifway uetray, avesay-isplay illway eatecray anway executableway\n"
+"      Ifway ilnay (ethay efaultday), avesay-isplay illway avesay usingway "
+"ethay aditionaltray\n"
+"   orecay-ilefay ormatfay.  Ifway uetray, avesay-isplay illway eatecray "
+"anway executableway\n"
 "   ilefay atthay ontainscay ethay isplay imageway uiltbay inway. \n"
 "   (Otnay allway architecturesway upportsay isthay etyay.)\n"
 "\n"
 "  :atchbay-odemay\n"
-"      Ifway ilnay (ethay efaultday), enthay ethay esencepray ofway ethay -atchbay ommandcay-inelay\n"
-"  witchsay illway invokeway atchbay-odemay ocessingpray.  Ifway uetray, ethay oducedpray orecay\n"
-"  illway alwaysway ebay inway atchbay-odemay, egardlessray ofway anyway ommandcay-inelay witchessay."
+"      Ifway ilnay (ethay efaultday), enthay ethay esencepray ofway ethay -"
+"atchbay ommandcay-inelay\n"
+"  witchsay illway invokeway atchbay-odemay ocessingpray.  Ifway uetray, "
+"ethay oducedpray orecay\n"
+"  illway alwaysway ebay inway atchbay-odemay, egardlessray ofway anyway "
+"ommandcay-inelay witchessay."
 
 #: src/code/save.lisp
 msgid "Directory ~S does not exist"
@@ -8366,16 +9616,20 @@ msgid ""
 "   strings and functions (or function names).  Strings are printed, and\n"
 "   functions are called with an output stream argument."
 msgstr ""
-"Eterminesday atwhay PRINT-HERALD intspray (ethay ystemsay tartupsay annerbay.)  Isthay isway away\n"
-"   atabaseday ichwhay ancay ebay augmentedway ybay eachway oadedlay ystemsay.  Ethay ormatfay isway away\n"
-"   opertypray istlay ichwhay apsmay omfray ubsystemsay amesnay otay ethay annerbay informationway "
-"orfay\n"
-"   atthay ystemsay.  Isthay istlay ancay ebay anipulatedmay ithway GETF -- entriesway areway "
-"intedpray\n"
-"   inway, everseray orderway, osay ethay ewestnay entryway isway intedpray astlay.  Usuallyway ethay "
-"ystemsay\n"
-"   eaturefay eywordkay isway usedway asway ethay ystemsay amenay.  Away ivengay annerbay isway away istlay ofway\n"
-"   ingsstray andway unctionsfay (orway unctionfay amesnay).  Ingsstray areway intedpray, andway\n"
+"Eterminesday atwhay PRINT-HERALD intspray (ethay ystemsay tartupsay "
+"annerbay.)  Isthay isway away\n"
+"   atabaseday ichwhay ancay ebay augmentedway ybay eachway oadedlay "
+"ystemsay.  Ethay ormatfay isway away\n"
+"   opertypray istlay ichwhay apsmay omfray ubsystemsay amesnay otay ethay "
+"annerbay informationway orfay\n"
+"   atthay ystemsay.  Isthay istlay ancay ebay anipulatedmay ithway GETF -- "
+"entriesway areway intedpray\n"
+"   inway, everseray orderway, osay ethay ewestnay entryway isway intedpray "
+"astlay.  Usuallyway ethay ystemsay\n"
+"   eaturefay eywordkay isway usedway asway ethay ystemsay amenay.  Away "
+"ivengay annerbay isway away istlay ofway\n"
+"   ingsstray andway unctionsfay (orway unctionfay amesnay).  Ingsstray "
+"areway intedpray, andway\n"
 "   unctionsfay areway alledcay ithway anway outputway eamstray argumentway."
 
 #: src/code/save.lisp
@@ -8396,7 +9650,8 @@ msgstr " onway "
 
 #: src/code/save.lisp
 msgid "See <http://www.cons.org/cmucl/> for support information."
-msgstr "Eesay <ttphay://wwway.onscay.orgway/muclcay/> orfay upportsay informationway."
+msgstr ""
+"Eesay <ttphay://wwway.onscay.orgway/muclcay/> orfay upportsay informationway."
 
 #: src/code/save.lisp
 msgid "Loaded subsystems:"
@@ -8415,7 +9670,8 @@ msgid ""
 "Print some descriptive information about the Lisp system version and\n"
 "   configuration."
 msgstr ""
-"Intpray omesay escriptiveday informationway aboutway ethay Isplay ystemsay ersionvay andway\n"
+"Intpray omesay escriptiveday informationway aboutway ethay Isplay ystemsay "
+"ersionvay andway\n"
 "   onfigurationcay."
 
 #: src/code/save.lisp
@@ -8480,7 +9736,8 @@ msgid ""
 "                          or does not support multi-byte read operations."
 msgstr ""
 "~S isway otnay away inarybay inputway eamstray ~\n"
-"                          orway oesday otnay upportsay ultimay-ytebay eadray operationsway."
+"                          orway oesday otnay upportsay ultimay-ytebay eadray "
+"operationsway."
 
 #: src/code/stream.lisp
 msgid "~S is not a binary output stream."
@@ -8496,27 +9753,32 @@ msgstr "~S isway anway unsupportedway Aygray eamstray."
 
 #: src/pcl/gray-streams.lisp src/code/stream.lisp
 msgid "Returns non-nil if the given Stream can perform input operations."
-msgstr "Eturnsray onnay-ilnay ifway ethay ivengay Eamstray ancay erformpay inputway operationsway."
+msgstr ""
+"Eturnsray onnay-ilnay ifway ethay ivengay Eamstray ancay erformpay inputway "
+"operationsway."
 
 #: src/pcl/gray-streams.lisp src/code/stream.lisp
 msgid "Returns non-nil if the given Stream can perform output operations."
-msgstr "Eturnsray onnay-ilnay ifway ethay ivengay Eamstray ancay erformpay outputway operationsway."
+msgstr ""
+"Eturnsray onnay-ilnay ifway ethay ivengay Eamstray ancay erformpay outputway "
+"operationsway."
 
 #: src/code/stream.lisp
 msgid "Return true if Stream is not closed."
 msgstr "Eturnray uetray ifway Eamstray isway otnay osedclay."
 
 #: src/code/stream.lisp
-msgid ""
-"Returns a type specifier for the kind of object returned by the Stream."
+msgid "Returns a type specifier for the kind of object returned by the Stream."
 msgstr ""
-"Eturnsray away ypetay ecifierspay orfay ethay indkay ofway objectway eturnedray ybay ethay Eamstray."
+"Eturnsray away ypetay ecifierspay orfay ethay indkay ofway objectway "
+"eturnedray ybay ethay Eamstray."
 
 #: src/code/stream.lisp
 msgid ""
 "Return true if Stream does I/O on a terminal or other interactive device."
 msgstr ""
-"Eturnray uetray ifway Eamstray oesday Iway/O onway away erminaltay orway otherway interactiveway eviceday."
+"Eturnray uetray ifway Eamstray oesday Iway/O onway away erminaltay orway "
+"otherway interactiveway eviceday."
 
 #: src/code/stream.lisp
 msgid "Can't set interactive flag on ~S."
@@ -8524,7 +9786,8 @@ msgstr "Ancay't etsay interactiveway agflay onway ~S."
 
 #: src/code/stream.lisp
 msgid "Returns the external format used by the given Stream."
-msgstr "Eturnsray ethay externalway ormatfay usedway ybay ethay ivengay Eamstray."
+msgstr ""
+"Eturnsray ethay externalway ormatfay usedway ybay ethay ivengay Eamstray."
 
 #: src/code/stream.lisp
 msgid ""
@@ -8532,8 +9795,10 @@ msgid ""
 "  may still be made.  If :Abort is non-nil, an attempt is made to clean\n"
 "  up the side effects of having created the stream."
 msgstr ""
-"Osesclay ethay ivengay Eamstray.  Onay oremay Iway/O aymay ebay erformedpay, utbay inquiriesway\n"
-"  aymay tillsay ebay ademay.  Ifway :Abortway isway onnay-ilnay, anway attemptway isway ademay otay eanclay\n"
+"Osesclay ethay ivengay Eamstray.  Onay oremay Iway/O aymay ebay erformedpay, "
+"utbay inquiriesway\n"
+"  aymay tillsay ebay ademay.  Ifway :Abortway isway onnay-ilnay, anway "
+"attemptway isway ademay otay eanclay\n"
 "  upway ethay idesay effectsway ofway avinghay eatedcray ethay eamstray."
 
 #: src/code/stream.lisp
@@ -8543,23 +9808,29 @@ msgid ""
 "   this becomes the new file position.  The second argument may also\n"
 "   be :start or :end for the start and end of the file, respectively."
 msgstr ""
-"Ithway oneway argumentway eturnsray ethay urrentcay ositionpay ithinway ethay ilefay\n"
-"   Ilefay-Eamstray isway openway otay.  Ifway ethay econdsay argumentway isway uppliedsay, enthay\n"
-"   isthay ecomesbay ethay ewnay ilefay ositionpay.  Ethay econdsay argumentway aymay alsoway\n"
-"   ebay :tartsay orway :endway orfay ethay tartsay andway endway ofway ethay ilefay, espectivelyray."
+"Ithway oneway argumentway eturnsray ethay urrentcay ositionpay ithinway "
+"ethay ilefay\n"
+"   Ilefay-Eamstray isway openway otay.  Ifway ethay econdsay argumentway "
+"isway uppliedsay, enthay\n"
+"   isthay ecomesbay ethay ewnay ilefay ositionpay.  Ethay econdsay "
+"argumentway aymay alsoway\n"
+"   ebay :tartsay orway :endway orfay ethay tartsay andway endway ofway ethay "
+"ilefay, espectivelyray."
 
 #: src/code/stream.lisp
 msgid ""
 "This function returns the length of the file that File-Stream is open to."
 msgstr ""
-"Isthay unctionfay eturnsray ethay engthlay ofway ethay ilefay atthay Ilefay-Eamstray isway openway otay."
+"Isthay unctionfay eturnsray ethay engthlay ofway ethay ilefay atthay Ilefay-"
+"Eamstray isway openway otay."
 
 #: src/code/stream.lisp
 msgid ""
 "Returns a line of text read from the Stream as a string, discarding the\n"
 "  newline character."
 msgstr ""
-"Eturnsray away inelay ofway exttay eadray omfray ethay Eamstray asway away ingstray, iscardingday ethay\n"
+"Eturnsray away inelay ofway exttay eadray omfray ethay Eamstray asway away "
+"ingstray, iscardingday ethay\n"
 "  ewlinenay aracterchay."
 
 #: src/code/stream.lisp
@@ -8568,7 +9839,9 @@ msgstr "Inputsway away aracterchay omfray Eamstray andway eturnsray itway."
 
 #: src/code/stream.lisp
 msgid "Puts the Character back on the front of the input Stream."
-msgstr "Utspay ethay Aracterchay ackbay onway ethay ontfray ofway ethay inputway Eamstray."
+msgstr ""
+"Utspay ethay Aracterchay ackbay onway ethay ontfray ofway ethay inputway "
+"Eamstray."
 
 #: src/code/stream.lisp
 msgid "Nothing to unread."
@@ -8578,7 +9851,8 @@ msgstr "Othingnay otay unreadway."
 msgid ""
 "Peeks at the next character in the input Stream.  See manual for details."
 msgstr ""
-"Eekspay atway ethay extnay aracterchay inway ethay inputway Eamstray.  Eesay anualmay orfay etailsday."
+"Eekspay atway ethay extnay aracterchay inway ethay inputway Eamstray.  Eesay "
+"anualmay orfay etailsday."
 
 #: src/code/stream.lisp
 msgid "~@<bad PEEK-TYPE=~S, ~_expected ~S~:>"
@@ -8590,17 +9864,20 @@ msgstr "Impossibleway asecay eachedray inway PEEK-CHAR"
 
 #: src/code/stream.lisp
 msgid "Returns T if a character is available on the given Stream."
-msgstr "Eturnsray T ifway away aracterchay isway availableway onway ethay ivengay Eamstray."
+msgstr ""
+"Eturnsray T ifway away aracterchay isway availableway onway ethay ivengay "
+"Eamstray."
 
 #: src/code/stream.lisp
-msgid ""
-"Returns the next character from the Stream if one is available, or nil."
+msgid "Returns the next character from the Stream if one is available, or nil."
 msgstr ""
-"Eturnsray ethay extnay aracterchay omfray ethay Eamstray ifway oneway isway availableway, orway ilnay."
+"Eturnsray ethay extnay aracterchay omfray ethay Eamstray ifway oneway isway "
+"availableway, orway ilnay."
 
 #: src/code/stream.lisp
 msgid "Clears any buffered input associated with the Stream."
-msgstr "Earsclay anyway ufferedbay inputway associatedway ithway ethay Eamstray."
+msgstr ""
+"Earsclay anyway ufferedbay inputway associatedway ithway ethay Eamstray."
 
 #: src/code/stream.lisp
 msgid "Returns the next byte of the Stream."
@@ -8619,16 +9896,21 @@ msgid ""
 "      function returns as soon as any data is available, even if the amount\n"
 "      read is less than Count and eof has not been hit."
 msgstr ""
-"Eadsray Umbytesnay ytesbay intoway ethay Ufferbay tartingsay atway Tartsay, eturningray ethay "
-"umbernay\n"
+"Eadsray Umbytesnay ytesbay intoway ethay Ufferbay tartingsay atway Tartsay, "
+"eturningray ethay umbernay\n"
 "   ofway ytesbay eadray.\n"
-"   -- Ifway EOF-ERROR-P isway uetray, anway END-OF-FILE onditioncay isway ignalledsay ifway\n"
-"      endway-ofway-ilefay isway encounteredway eforebay Ountcay ytesbay avehay eenbay eadray.\n"
-"   -- Ifway EOF-ERROR-P isway alsefay, READ-N-BYTES eadsray asway uchmay ataday asway isway "
-"urrentlycay\n"
-"      availableway (upway otay ountcay ytesbay).  Onway ipespay orway imilarsay evicesday, isthay\n"
-"      unctionfay eturnsray asway oonsay asway anyway ataday isway availableway, evenway ifway ethay amountway\n"
-"      eadray isway esslay anthay Ountcay andway eofway ashay otnay eenbay ithay."
+"   -- Ifway EOF-ERROR-P isway uetray, anway END-OF-FILE onditioncay isway "
+"ignalledsay ifway\n"
+"      endway-ofway-ilefay isway encounteredway eforebay Ountcay ytesbay "
+"avehay eenbay eadray.\n"
+"   -- Ifway EOF-ERROR-P isway alsefay, READ-N-BYTES eadsray asway uchmay "
+"ataday asway isway urrentlycay\n"
+"      availableway (upway otay ountcay ytesbay).  Onway ipespay orway "
+"imilarsay evicesday, isthay\n"
+"      unctionfay eturnsray asway oonsay asway anyway ataday isway "
+"availableway, evenway ifway ethay amountway\n"
+"      eadray isway esslay anthay Ountcay andway eofway ashay otnay eenbay "
+"ithay."
 
 #: src/code/stream.lisp
 msgid "Outputs the Character to the Stream."
@@ -8644,9 +9926,10 @@ msgid ""
 "of\n"
 "   a line.  Returns T if it output a new line, nil otherwise."
 msgstr ""
-"Outputsway away ewnay inelay otay ethay Eamstray ifway itway isway otnay ositionedpay atway ethay eginningbay "
-"ofway\n"
-"   away inelay.  Eturnsray T ifway itway outputway away ewnay inelay, ilnay otherwiseway."
+"Outputsway away ewnay inelay otay ethay Eamstray ifway itway isway otnay "
+"ositionedpay atway ethay eginningbay ofway\n"
+"   away inelay.  Eturnsray T ifway itway outputway away ewnay inelay, ilnay "
+"otherwiseway."
 
 #: src/code/stream.lisp
 msgid "Outputs the String to the given Stream."
@@ -8656,14 +9939,16 @@ msgstr "Outputsway ethay Ingstray otay ethay ivengay Eamstray."
 msgid ""
 "Outputs the String to the given Stream, followed by a newline character."
 msgstr ""
-"Outputsway ethay Ingstray otay ethay ivengay Eamstray, ollowedfay ybay away ewlinenay aracterchay."
+"Outputsway ethay Ingstray otay ethay ivengay Eamstray, ollowedfay ybay away "
+"ewlinenay aracterchay."
 
 #: src/code/stream.lisp
 msgid ""
 "Returns the number of characters on the current line of output of the given\n"
 "  Stream, or Nil if that information is not availible."
 msgstr ""
-"Eturnsray ethay umbernay ofway aracterschay onway ethay urrentcay inelay ofway outputway ofway ethay ivengay\n"
+"Eturnsray ethay umbernay ofway aracterschay onway ethay urrentcay inelay "
+"ofway outputway ofway ethay ivengay\n"
 "  Eamstray, orway Ilnay ifway atthay informationway isway otnay availibleway."
 
 #: src/code/stream.lisp
@@ -8671,15 +9956,18 @@ msgid ""
 "Returns the number of characters that will fit on a line of output on the\n"
 "  given Stream, or Nil if that information is not available."
 msgstr ""
-"Eturnsray ethay umbernay ofway aracterschay atthay illway itfay onway away inelay ofway outputway onway ethay\n"
-"  ivengay Eamstray, orway Ilnay ifway atthay informationway isway otnay availableway."
+"Eturnsray ethay umbernay ofway aracterschay atthay illway itfay onway away "
+"inelay ofway outputway onway ethay\n"
+"  ivengay Eamstray, orway Ilnay ifway atthay informationway isway otnay "
+"availableway."
 
 #: src/code/stream.lisp
 msgid ""
 "Attempts to ensure that all output sent to the Stream has reached its\n"
 "   destination, and only then returns."
 msgstr ""
-"Attemptsway otay ensureway atthay allway outputway entsay otay ethay Eamstray ashay eachedray itsway\n"
+"Attemptsway otay ensureway atthay allway outputway entsay otay ethay "
+"Eamstray ashay eachedray itsway\n"
 "   estinationday, andway onlyway enthay eturnsray."
 
 #: src/code/stream.lisp
@@ -8699,7 +9987,8 @@ msgid ""
 "Returns an output stream which sends its output to all of the given\n"
 "streams."
 msgstr ""
-"Eturnsray anway outputway eamstray ichwhay endssay itsway outputway otay allway ofway ethay ivengay\n"
+"Eturnsray anway outputway eamstray ichwhay endssay itsway outputway otay "
+"allway ofway ethay ivengay\n"
 "eamsstray."
 
 #: src/code/stream.lisp
@@ -8707,7 +9996,8 @@ msgid ""
 "Returns a stream which performs its operations on the stream which is the\n"
 "   value of the dynamic variable named by Symbol."
 msgstr ""
-"Eturnsray away eamstray ichwhay erformspay itsway operationsway onway ethay eamstray ichwhay isway ethay\n"
+"Eturnsray away eamstray ichwhay erformspay itsway operationsway onway ethay "
+"eamstray ichwhay isway ethay\n"
 "   aluevay ofway ethay ynamicday ariablevay amednay ybay Ymbolsay."
 
 #: src/code/stream.lisp
@@ -8715,7 +10005,8 @@ msgid ""
 "Returns a bidirectional stream which gets its input from Input-Stream and\n"
 "   sends its output to Output-Stream."
 msgstr ""
-"Eturnsray away idirectionalbay eamstray ichwhay etsgay itsway inputway omfray Inputway-Eamstray andway\n"
+"Eturnsray away idirectionalbay eamstray ichwhay etsgay itsway inputway "
+"omfray Inputway-Eamstray andway\n"
 "   endssay itsway outputway otay Outputway-Eamstray."
 
 #: src/code/stream.lisp
@@ -8723,7 +10014,8 @@ msgid ""
 "Returns a stream which takes its input from each of the Streams in turn,\n"
 "   going on to the next at EOF."
 msgstr ""
-"Eturnsray away eamstray ichwhay akestay itsway inputway omfray eachway ofway ethay Eamsstray inway urntay,\n"
+"Eturnsray away eamstray ichwhay akestay itsway inputway omfray eachway ofway "
+"ethay Eamsstray inway urntay,\n"
 "   oinggay onway otay ethay extnay atway EOF."
 
 #: src/code/stream.lisp
@@ -8731,7 +10023,8 @@ msgid ""
 "Returns an echo stream that takes input from Input-stream and sends\n"
 "output to Output-stream"
 msgstr ""
-"Eturnsray anway echoway eamstray atthay akestay inputway omfray Inputway-eamstray andway endssay\n"
+"Eturnsray anway echoway eamstray atthay akestay inputway omfray Inputway-"
+"eamstray andway endssay\n"
 "outputway otay Outputway-eamstray"
 
 #: src/code/stream.lisp
@@ -8740,8 +10033,10 @@ msgid ""
 "   sends its output to Output-Stream.  In addition, all input is echoed to\n"
 "   the output stream"
 msgstr ""
-"Eturnsray away idirectionalbay eamstray ichwhay etsgay itsway inputway omfray Inputway-Eamstray andway\n"
-"   endssay itsway outputway otay Outputway-Eamstray.  Inway additionway, allway inputway isway echoedway otay\n"
+"Eturnsray away idirectionalbay eamstray ichwhay etsgay itsway inputway "
+"omfray Inputway-Eamstray andway\n"
+"   endssay itsway outputway otay Outputway-Eamstray.  Inway additionway, "
+"allway inputway isway echoedway otay\n"
 "   ethay outputway eamstray"
 
 #: src/code/stream.lisp
@@ -8749,7 +10044,8 @@ msgid ""
 "Returns an input stream which will supply the characters of String between\n"
 "  Start and End in order."
 msgstr ""
-"Eturnsray anway inputway eamstray ichwhay illway upplysay ethay aracterschay ofway Ingstray etweenbay\n"
+"Eturnsray anway inputway eamstray ichwhay illway upplysay ethay aracterschay "
+"ofway Ingstray etweenbay\n"
 "  Tartsay andway Endway inway orderway."
 
 #: src/code/stream.lisp
@@ -8757,7 +10053,8 @@ msgid ""
 "Returns an Output stream which will accumulate all output given to it for\n"
 "   the benefit of the function Get-Output-Stream-String."
 msgstr ""
-"Eturnsray anway Outputway eamstray ichwhay illway accumulateway allway outputway ivengay otay itway orfay\n"
+"Eturnsray anway Outputway eamstray ichwhay illway accumulateway allway "
+"outputway ivengay otay itway orfay\n"
 "   ethay enefitbay ofway ethay unctionfay Etgay-Outputway-Eamstray-Ingstray."
 
 #: src/code/stream.lisp
@@ -8765,20 +10062,25 @@ msgid ""
 "Returns a string of all the characters sent to a stream made by\n"
 "   Make-String-Output-Stream since the last call to this function."
 msgstr ""
-"Eturnsray away ingstray ofway allway ethay aracterschay entsay otay away eamstray ademay ybay\n"
-"   Akemay-Ingstray-Outputway-Eamstray incesay ethay astlay allcay otay isthay unctionfay."
+"Eturnsray away ingstray ofway allway ethay aracterschay entsay otay away "
+"eamstray ademay ybay\n"
+"   Akemay-Ingstray-Outputway-Eamstray incesay ethay astlay allcay otay "
+"isthay unctionfay."
 
 #: src/code/stream.lisp
 msgid ""
 "Dumps the characters buffer up in the In-Stream to the Out-Stream as\n"
 "  Get-Output-Stream-String would return them."
 msgstr ""
-"Umpsday ethay aracterschay ufferbay upway inway ethay Inway-Eamstray otay ethay Outway-Eamstray asway\n"
+"Umpsday ethay aracterschay ufferbay upway inway ethay Inway-Eamstray otay "
+"ethay Outway-Eamstray asway\n"
 "  Etgay-Outputway-Eamstray-Ingstray ouldway eturnray emthay."
 
 #: src/code/stream.lisp
 msgid "Returns an output stream which indents its output by some amount."
-msgstr "Eturnsray anway outputway eamstray ichwhay indentsway itsway outputway ybay omesay amountway."
+msgstr ""
+"Eturnsray anway outputway eamstray ichwhay indentsway itsway outputway ybay "
+"omesay amountway."
 
 #: src/code/stream.lisp
 msgid ""
@@ -8792,14 +10094,17 @@ msgid ""
 "upper\n"
 "        case and everything else to lower case."
 msgstr ""
-"Eturnsray away eamstray atthay endssay allway outputway otay ethay eamstray TARGET, utbay odifiesmay\n"
-"   ethay asecay ofway etterslay, ependingday onway KIND, ichwhay ouldshay ebay oneway ofway:\n"
+"Eturnsray away eamstray atthay endssay allway outputway otay ethay eamstray "
+"TARGET, utbay odifiesmay\n"
+"   ethay asecay ofway etterslay, ependingday onway KIND, ichwhay ouldshay "
+"ebay oneway ofway:\n"
 "     :upcaseway - onvertcay otay upperway asecay.\n"
 "     :owncaseday - onvertcay otay owerlay asecay.\n"
-"     :apitalizecay - onvertcay ethay irstfay etterlay ofway ordsway otay upperway asecay andway ethay\n"
+"     :apitalizecay - onvertcay ethay irstfay etterlay ofway ordsway otay "
+"upperway asecay andway ethay\n"
 "        estray ofway ethay ordway otay owerlay asecay.\n"
-"     :apitalizecay-irstfay - onvertcay ethay irstfay etterlay ofway ethay irstfay ordway otay "
-"upperway\n"
+"     :apitalizecay-irstfay - onvertcay ethay irstfay etterlay ofway ethay "
+"irstfay ordway otay upperway\n"
 "        asecay andway everythingway elseway otay owerlay asecay."
 
 #: src/code/stream.lisp
@@ -8809,9 +10114,10 @@ msgid ""
 "returns\n"
 "   a command."
 msgstr ""
-"Isthay akestay away eamstray andway aitsway orfay exttay orway away ommandcay otay appearway onway itway.  Ifway\n"
-"   exttay appearsway eforebay away ommandcay, isthay eturnsray ilnay, andway otherwiseway itway "
-"eturnsray\n"
+"Isthay akestay away eamstray andway aitsway orfay exttay orway away "
+"ommandcay otay appearway onway itway.  Ifway\n"
+"   exttay appearsway eforebay away ommandcay, isthay eturnsray ilnay, andway "
+"otherwiseway itway eturnsray\n"
 "   away ommandcay."
 
 #: src/code/stream.lisp
@@ -8824,37 +10130,46 @@ msgid ""
 "  then the extra elements near the end of sequence are not updated.\n"
 "\n"
 "  Argument(s):\n"
-"  SEQ:	    a proper SEQUENCE\n"
+"  SEQ:\t    a proper SEQUENCE\n"
 "  STREAM:   an input STREAM\n"
 "  START:    a bounding index designator of type '(INTEGER 0 *)' (default 0)\n"
 "  END:      a bounding index designator which be NIL or an INTEGER of\n"
-"	    type '(INTEGER 0 *)' (default NIL)\n"
+"\t    type '(INTEGER 0 *)' (default NIL)\n"
 "\n"
 "  Value(s):\n"
 "  POSITION: an INTEGER greater than or equal to zero, and less than or\n"
-"	    equal to the length of the SEQ. POSITION is the index of\n"
-"	    the first element of SEQ that was not updated, which might be\n"
-"	    less than END because the end of file was reached."
+"\t    equal to the length of the SEQ. POSITION is the index of\n"
+"\t    the first element of SEQ that was not updated, which might be\n"
+"\t    less than END because the end of file was reached."
 msgstr ""
 "Estructivelyday odifymay SEQ ybay eadingray elementsway omfray STREAM.\n"
 "\n"
-"  Eqsay isway oundedbay ybay Tartsay andway Endway. Eqsay isway estructivelyday odifiedmay ybay\n"
-"  opyingcay uccessivesay elementsway intoway itway omfray Eamstray. Ifway ethay endway ofway ilefay\n"
-"  orfay Eamstray isway eachedray eforebay opyingcay allway elementsway ofway ethay ubsequencesay,\n"
-"  enthay ethay extraway elementsway earnay ethay endway ofway equencesay areway otnay updatedway.\n"
+"  Eqsay isway oundedbay ybay Tartsay andway Endway. Eqsay isway "
+"estructivelyday odifiedmay ybay\n"
+"  opyingcay uccessivesay elementsway intoway itway omfray Eamstray. Ifway "
+"ethay endway ofway ilefay\n"
+"  orfay Eamstray isway eachedray eforebay opyingcay allway elementsway ofway "
+"ethay ubsequencesay,\n"
+"  enthay ethay extraway elementsway earnay ethay endway ofway equencesay "
+"areway otnay updatedway.\n"
 "\n"
 "  Argumentway(s):\n"
-"  SEQ:	    away operpray SEQUENCE\n"
+"  SEQ:\t    away operpray SEQUENCE\n"
 "  STREAM:   anway inputway STREAM\n"
-"  START:    away oundingbay indexway esignatorday ofway ypetay '(INTEGER 0 *)' (efaultday 0)\n"
-"  END:      away oundingbay indexway esignatorday ichwhay ebay NIL orway anway INTEGER ofway\n"
-"	    ypetay '(INTEGER 0 *)' (efaultday NIL)\n"
+"  START:    away oundingbay indexway esignatorday ofway ypetay '(INTEGER 0 "
+"*)' (efaultday 0)\n"
+"  END:      away oundingbay indexway esignatorday ichwhay ebay NIL orway "
+"anway INTEGER ofway\n"
+"\t    ypetay '(INTEGER 0 *)' (efaultday NIL)\n"
 "\n"
 "  Aluevay(s):\n"
-"  POSITION: anway INTEGER eatergray anthay orway equalway otay erozay, andway esslay anthay orway\n"
-"	    equalway otay ethay engthlay ofway ethay SEQ. POSITION isway ethay indexway ofway\n"
-"	    ethay irstfay elementway ofway SEQ atthay asway otnay updatedway, ichwhay ightmay ebay\n"
-"	    esslay anthay END ecausebay ethay endway ofway ilefay asway eachedray."
+"  POSITION: anway INTEGER eatergray anthay orway equalway otay erozay, "
+"andway esslay anthay orway\n"
+"\t    equalway otay ethay engthlay ofway ethay SEQ. POSITION isway ethay "
+"indexway ofway\n"
+"\t    ethay irstfay elementway ofway SEQ atthay asway otnay updatedway, "
+"ichwhay ightmay ebay\n"
+"\t    esslay anthay END ecausebay ethay endway ofway ilefay asway eachedray."
 
 #: src/code/stream.lisp
 msgid "The stream is not open."
@@ -8880,21 +10195,22 @@ msgid ""
 "           type '(INTEGER 0 *)' (default NIL)\n"
 "\n"
 "  Value(s):\n"
-"  SEQ:	a proper SEQUENCE\n"
-""
+"  SEQ:\ta proper SEQUENCE\n"
 msgstr ""
-"Iteswray ethay elementsway ofway ethay Eqsay oundedbay ybay Tartsay andway Endway otay Eamstray.\n"
+"Iteswray ethay elementsway ofway ethay Eqsay oundedbay ybay Tartsay andway "
+"Endway otay Eamstray.\n"
 "\n"
 "  Argumentway(s):\n"
 "  SEQ:     away operpray SEQUENCE\n"
 "  STREAM:  anway outputway STREAM\n"
-"  START:   away oundingbay indexway esignatorday ofway ypetay '(INTEGER 0 *)' (efaultday 0)\n"
-"  END:     away oundingbay indexway esignatorday ichwhay ebay NIL orway anway INTEGER ofway\n"
+"  START:   away oundingbay indexway esignatorday ofway ypetay '(INTEGER 0 "
+"*)' (efaultday 0)\n"
+"  END:     away oundingbay indexway esignatorday ichwhay ebay NIL orway "
+"anway INTEGER ofway\n"
 "           ypetay '(INTEGER 0 *)' (efaultday NIL)\n"
 "\n"
 "  Aluevay(s):\n"
-"  SEQ:	away operpray SEQUENCE\n"
-""
+"  SEQ:\taway operpray SEQUENCE\n"
 
 #: src/code/stream.lisp
 msgid "The stream is not open for output."
@@ -8902,7 +10218,9 @@ msgstr "Ethay eamstray isway otnay openway orfay outputway."
 
 #: src/code/stream.lisp
 msgid "Trying to output an element of unproper type to a stream."
-msgstr "Yingtray otay outputway anway elementway ofway unproperway ypetay otay away eamstray."
+msgstr ""
+"Yingtray otay outputway anway elementway ofway unproperway ypetay otay away "
+"eamstray."
 
 #: src/code/stream.lisp
 msgid "Trying to output a string to a binary stream."
@@ -8918,17 +10236,23 @@ msgid ""
 "  impossible, an error will be signalled.  This overrides the value of\n"
 "  *PRINT-ESCAPE*."
 msgstr ""
-"Ifway uetray, allway objectsway illway intedpray eadablyray.  Ifway eadablyray intingpray isway\n"
-"  impossibleway, anway errorway illway ebay ignalledsay.  Isthay overridesway ethay aluevay ofway\n"
+"Ifway uetray, allway objectsway illway intedpray eadablyray.  Ifway "
+"eadablyray intingpray isway\n"
+"  impossibleway, anway errorway illway ebay ignalledsay.  Isthay "
+"overridesway ethay aluevay ofway\n"
 "  *PRINT-ESCAPE*."
 
 #: src/code/print.lisp
 msgid "Flag which indicates that slashification is on.  See the manual"
-msgstr "Agflay ichwhay indicatesway atthay ashificationslay isway onway.  Eesay ethay anualmay"
+msgstr ""
+"Agflay ichwhay indicatesway atthay ashificationslay isway onway.  Eesay "
+"ethay anualmay"
 
 #: src/code/print.lisp
 msgid "Flag which indicates that pretty printing is to be used"
-msgstr "Agflay ichwhay indicatesway atthay ettypray intingpray isway otay ebay usedway"
+msgstr ""
+"Agflay ichwhay indicatesway atthay ettypray intingpray isway otay ebay "
+"usedway"
 
 #: src/code/print.lisp
 msgid "The output base for integers and rationals."
@@ -8936,7 +10260,8 @@ msgstr "Ethay outputway asebay orfay integersway andway ationalsray."
 
 #: src/code/print.lisp
 msgid "This flag requests to verify base when printing rationals."
-msgstr "Isthay agflay equestsray otay erifyvay asebay enwhay intingpray ationalsray."
+msgstr ""
+"Isthay agflay equestsray otay erifyvay asebay enwhay intingpray ationalsray."
 
 #: src/code/print.lisp
 msgid "How many levels deep to print.  Unlimited if null."
@@ -8944,15 +10269,20 @@ msgstr "Owhay anymay evelslay eepday otay intpray.  Unlimitedway ifway ullnay."
 
 #: src/code/print.lisp
 msgid "How many elements to print on each level.  Unlimited if null."
-msgstr "Owhay anymay elementsway otay intpray onway eachway evellay.  Unlimitedway ifway ullnay."
+msgstr ""
+"Owhay anymay elementsway otay intpray onway eachway evellay.  Unlimitedway "
+"ifway ullnay."
 
 #: src/code/print.lisp
 msgid "Whether to worry about circular list structures. See the manual."
-msgstr "Etherwhay otay orryway aboutway ircularcay istlay ucturesstray. Eesay ethay anualmay."
+msgstr ""
+"Etherwhay otay orryway aboutway ircularcay istlay ucturesstray. Eesay ethay "
+"anualmay."
 
 #: src/code/print.lisp
 msgid "What kind of case the printer should use by default"
-msgstr "Atwhay indkay ofway asecay ethay interpray ouldshay useway ybay efaultday"
+msgstr ""
+"Atwhay indkay ofway asecay ethay interpray ouldshay useway ybay efaultday"
 
 #: src/code/print.lisp
 msgid "Whether the array should print it's guts out"
@@ -8963,19 +10293,23 @@ msgid ""
 "If true, symbols with no home package are printed with a #: prefix.\n"
 "  If false, no prefix is printed."
 msgstr ""
-"Ifway uetray, ymbolssay ithway onay omehay ackagepay areway intedpray ithway away #: efixpray.\n"
+"Ifway uetray, ymbolssay ithway onay omehay ackagepay areway intedpray ithway "
+"away #: efixpray.\n"
 "  Ifway alsefay, onay efixpray isway intedpray."
 
 #: src/code/print.lisp
 msgid "The maximum number of lines to print.  If NIL, unlimited."
-msgstr "Ethay aximummay umbernay ofway ineslay otay intpray.  Ifway NIL, unlimitedway."
+msgstr ""
+"Ethay aximummay umbernay ofway ineslay otay intpray.  Ifway NIL, "
+"unlimitedway."
 
 #: src/code/print.lisp
 msgid ""
 "The position of the right margin in ems.  If NIL, try to determine this\n"
 "   from the stream in use."
 msgstr ""
-"Ethay ositionpay ofway ethay ightray arginmay inway emsway.  Ifway NIL, ytray otay etermineday isthay\n"
+"Ethay ositionpay ofway ethay ightray arginmay inway emsway.  Ifway NIL, "
+"ytray otay etermineday isthay\n"
 "   omfray ethay eamstray inway useway."
 
 #: src/code/print.lisp
@@ -8985,9 +10319,12 @@ msgid ""
 "   style conditional newlines are turned on, and all indentations are\n"
 "   turned off.  If NIL, never use miser mode."
 msgstr ""
-"Ifway ethay emainingray acespay etweenbay ethay urrentcay olumncay andway ethay ightray arginmay\n"
-"   isway esslay anthay isthay, enthay intpray usingway ``isermay-tylesay'' outputway.  Isermay\n"
-"   tylesay onditionalcay ewlinesnay areway urnedtay onway, andway allway indentationsway areway\n"
+"Ifway ethay emainingray acespay etweenbay ethay urrentcay olumncay andway "
+"ethay ightray arginmay\n"
+"   isway esslay anthay isthay, enthay intpray usingway ``isermay-tylesay'' "
+"outputway.  Isermay\n"
+"   tylesay onditionalcay ewlinesnay areway urnedtay onway, andway allway "
+"indentationsway areway\n"
 "   urnedtay offway.  Ifway NIL, evernay useway isermay odemay."
 
 #: src/code/print.lisp
@@ -8995,71 +10332,76 @@ msgid ""
 "The pprint-dispatch-table that controls how to pretty print objects.  See\n"
 "   COPY-PPRINT-DISPATH, PPRINT-DISPATCH, and SET-PPRINT-DISPATCH."
 msgstr ""
-"Ethay printpay-ispatchday-abletay atthay ontrolscay owhay otay ettypray intpray objectsway.  Eesay\n"
+"Ethay printpay-ispatchday-abletay atthay ontrolscay owhay otay ettypray "
+"intpray objectsway.  Eesay\n"
 "   COPY-PPRINT-DISPATH, PPRINT-DISPATCH, andway SET-PPRINT-DISPATCH."
 
 #: src/code/print.lisp
 msgid ""
 "Bind the reader and printer control variables to values that enable READ\n"
 "   to reliably read the results of PRINT.  These values are:\n"
-"       *PACKAGE*			The COMMON-LISP-USER package\n"
-"       *PRINT-ARRAY*			T\n"
-"       *PRINT-BASE*			10\n"
-"       *PRINT-CASE*			:UPCASE\n"
-"       *PRINT-CIRCLE*			NIL\n"
-"       *PRINT-ESCAPE*			T\n"
-"       *PRINT-GENSYM*			T\n"
-"       *PRINT-LENGTH*			NIL\n"
-"       *PRINT-LEVEL*			NIL\n"
-"       *PRINT-LINES*			NIL\n"
-"       *PRINT-MISER-WIDTH*		NIL\n"
+"       *PACKAGE*\t\t\tThe COMMON-LISP-USER package\n"
+"       *PRINT-ARRAY*\t\t\tT\n"
+"       *PRINT-BASE*\t\t\t10\n"
+"       *PRINT-CASE*\t\t\t:UPCASE\n"
+"       *PRINT-CIRCLE*\t\t\tNIL\n"
+"       *PRINT-ESCAPE*\t\t\tT\n"
+"       *PRINT-GENSYM*\t\t\tT\n"
+"       *PRINT-LENGTH*\t\t\tNIL\n"
+"       *PRINT-LEVEL*\t\t\tNIL\n"
+"       *PRINT-LINES*\t\t\tNIL\n"
+"       *PRINT-MISER-WIDTH*\t\tNIL\n"
 "       *PRINT-PPRINT-DISPATCH*          The standard pprint dispatch table\n"
-"       *PRINT-PRETTY*			NIL\n"
-"       *PRINT-RADIX*			NIL\n"
-"       *PRINT-READABLY*			T\n"
-"       *PRINT-RIGHT-MARGIN*		NIL\n"
-"       *READ-BASE*			10\n"
-"       *READ-DEFAULT-FLOAT-FORMAT* 	SINGLE-FLOAT\n"
-"       *READ-EVAL*			T\n"
-"       *READ-SUPPRESS*			NIL\n"
-"       *READTABLE*			the standard readtable."
-msgstr ""
-"Indbay ethay eaderray andway interpray ontrolcay ariablesvay otay aluesvay atthay enableway READ\n"
-"   otay eliablyray eadray ethay esultsray ofway PRINT.  Esethay aluesvay areway:\n"
-"       *PACKAGE*			Ethay COMMON-LISP-USER ackagepay\n"
-"       *PRINT-ARRAY*			T\n"
-"       *PRINT-BASE*			10\n"
-"       *PRINT-CASE*			:UPCASE\n"
-"       *PRINT-CIRCLE*			NIL\n"
-"       *PRINT-ESCAPE*			T\n"
-"       *PRINT-GENSYM*			T\n"
-"       *PRINT-LENGTH*			NIL\n"
-"       *PRINT-LEVEL*			NIL\n"
-"       *PRINT-LINES*			NIL\n"
-"       *PRINT-MISER-WIDTH*		NIL\n"
-"       *PRINT-PPRINT-DISPATCH*          Ethay tandardsay printpay ispatchday abletay\n"
-"       *PRINT-PRETTY*			NIL\n"
-"       *PRINT-RADIX*			NIL\n"
-"       *PRINT-READABLY*			T\n"
-"       *PRINT-RIGHT-MARGIN*		NIL\n"
-"       *READ-BASE*			10\n"
-"       *READ-DEFAULT-FLOAT-FORMAT* 	SINGLE-FLOAT\n"
-"       *READ-EVAL*			T\n"
-"       *READ-SUPPRESS*			NIL\n"
-"       *READTABLE*			ethay tandardsay eadtableray."
+"       *PRINT-PRETTY*\t\t\tNIL\n"
+"       *PRINT-RADIX*\t\t\tNIL\n"
+"       *PRINT-READABLY*\t\t\tT\n"
+"       *PRINT-RIGHT-MARGIN*\t\tNIL\n"
+"       *READ-BASE*\t\t\t10\n"
+"       *READ-DEFAULT-FLOAT-FORMAT* \tSINGLE-FLOAT\n"
+"       *READ-EVAL*\t\t\tT\n"
+"       *READ-SUPPRESS*\t\t\tNIL\n"
+"       *READTABLE*\t\t\tthe standard readtable."
+msgstr ""
+"Indbay ethay eaderray andway interpray ontrolcay ariablesvay otay aluesvay "
+"atthay enableway READ\n"
+"   otay eliablyray eadray ethay esultsray ofway PRINT.  Esethay aluesvay "
+"areway:\n"
+"       *PACKAGE*\t\t\tEthay COMMON-LISP-USER ackagepay\n"
+"       *PRINT-ARRAY*\t\t\tT\n"
+"       *PRINT-BASE*\t\t\t10\n"
+"       *PRINT-CASE*\t\t\t:UPCASE\n"
+"       *PRINT-CIRCLE*\t\t\tNIL\n"
+"       *PRINT-ESCAPE*\t\t\tT\n"
+"       *PRINT-GENSYM*\t\t\tT\n"
+"       *PRINT-LENGTH*\t\t\tNIL\n"
+"       *PRINT-LEVEL*\t\t\tNIL\n"
+"       *PRINT-LINES*\t\t\tNIL\n"
+"       *PRINT-MISER-WIDTH*\t\tNIL\n"
+"       *PRINT-PPRINT-DISPATCH*          Ethay tandardsay printpay ispatchday "
+"abletay\n"
+"       *PRINT-PRETTY*\t\t\tNIL\n"
+"       *PRINT-RADIX*\t\t\tNIL\n"
+"       *PRINT-READABLY*\t\t\tT\n"
+"       *PRINT-RIGHT-MARGIN*\t\tNIL\n"
+"       *READ-BASE*\t\t\t10\n"
+"       *READ-DEFAULT-FLOAT-FORMAT* \tSINGLE-FLOAT\n"
+"       *READ-EVAL*\t\t\tT\n"
+"       *READ-SUPPRESS*\t\t\tNIL\n"
+"       *READTABLE*\t\t\tethay tandardsay eadtableray."
 
 #: src/code/print.lisp
-msgid ""
-"Outputs OBJECT to the specified stream, defaulting to *standard-output*"
+msgid "Outputs OBJECT to the specified stream, defaulting to *standard-output*"
 msgstr ""
-"Outputsway OBJECT otay ethay ecifiedspay eamstray, efaultingday otay *standard-output*"
+"Outputsway OBJECT otay ethay ecifiedspay eamstray, efaultingday otay "
+"*standard-output*"
 
 #: src/code/print.lisp
 msgid ""
 "Outputs a mostly READable printed representation of OBJECT on the specified\n"
 "  stream."
 msgstr ""
-"Outputsway away ostlymay Eadableray intedpray epresentationray ofway OBJECT onway ethay ecifiedspay\n"
+"Outputsway away ostlymay Eadableray intedpray epresentationray ofway OBJECT "
+"onway ethay ecifiedspay\n"
 "  eamstray."
 
 #: src/code/print.lisp
@@ -9068,8 +10410,8 @@ msgid ""
 "the\n"
 "  specified stream."
 msgstr ""
-"Outputsway anway astheticway utbay otnay Eadableray intedpray epresentationray ofway OBJECT onway "
-"ethay\n"
+"Outputsway anway astheticway utbay otnay Eadableray intedpray "
+"epresentationray ofway OBJECT onway ethay\n"
 "  ecifiedspay eamstray."
 
 #: src/code/print.lisp
@@ -9077,7 +10419,8 @@ msgid ""
 "Outputs a terpri, the mostly READable printed represenation of OBJECT, and \n"
 "  space to the stream."
 msgstr ""
-"Outputsway away erpritay, ethay ostlymay Eadableray intedpray epresenationray ofway OBJECT, andway \n"
+"Outputsway away erpritay, ethay ostlymay Eadableray intedpray "
+"epresenationray ofway OBJECT, andway \n"
 "  acespay otay ethay eamstray."
 
 #: src/code/print.lisp
@@ -9086,14 +10429,16 @@ msgstr "Ettilypray outputsway ethay Objectway ecededpray ybay away ewlinenay."
 
 #: src/code/print.lisp
 msgid "Returns the printed representation of OBJECT as a string."
-msgstr "Eturnsray ethay intedpray epresentationray ofway OBJECT asway away ingstray."
+msgstr ""
+"Eturnsray ethay intedpray epresentationray ofway OBJECT asway away ingstray."
 
 #: src/code/print.lisp
 msgid ""
 "Returns the printed representation of OBJECT as a string with \n"
 "   slashification on."
 msgstr ""
-"Eturnsray ethay intedpray epresentationray ofway OBJECT asway away ingstray ithway \n"
+"Eturnsray ethay intedpray epresentationray ofway OBJECT asway away ingstray "
+"ithway \n"
 "   ashificationslay onway."
 
 #: src/code/print.lisp
@@ -9101,7 +10446,8 @@ msgid ""
 "Returns the printed representation of OBJECT as a string with\n"
 "  slashification off and readability off."
 msgstr ""
-"Eturnsray ethay intedpray epresentationray ofway OBJECT asway away ingstray ithway\n"
+"Eturnsray ethay intedpray epresentationray ofway OBJECT asway away ingstray "
+"ithway\n"
 "  ashificationslay offway andway eadabilityray offway."
 
 #: src/compiler/byte-comp.lisp src/compiler/dyncount.lisp
@@ -9113,12 +10459,14 @@ msgstr "~S annotcay ebay intedpray eadablyray."
 
 #: src/code/print.lisp
 msgid "Determines whether or not the character is considered whitespace."
-msgstr "Eterminesday etherwhay orway otnay ethay aracterchay isway onsideredcay itespacewhay."
+msgstr ""
+"Eterminesday etherwhay orway otnay ethay aracterchay isway onsideredcay "
+"itespacewhay."
 
 #: src/code/print.lisp
 msgid ""
-"Check to see if OBJECT is a circular reference, and return something "
-"non-NIL\n"
+"Check to see if OBJECT is a circular reference, and return something non-"
+"NIL\n"
 "   if it is.  If ASSIGN is T, then the number to use in the #n= and #n# "
 "noise\n"
 "   is assigned at this time.  Note: CHECK-FOR-CIRCULARITY must be called\n"
@@ -9127,15 +10475,18 @@ msgid ""
 "   confused about when to use #n= and when to use #n#.  If this returns\n"
 "   non-NIL when ASSIGN is T, then you must call HANDLE-CIRCULARITY on it."
 msgstr ""
-"Eckchay otay eesay ifway OBJECT isway away ircularcay eferenceray, andway eturnray omethingsay "
-"onnay-NIL\n"
-"   ifway itway isway.  Ifway ASSIGN isway T, enthay ethay umbernay otay useway inway ethay #n= andway #n# "
-"oisenay\n"
-"   isway assignedway atway isthay imetay.  Otenay: CHECK-FOR-CIRCULARITY ustmay ebay alledcay\n"
-"   *EXACTLY* onceway ithway ASSIGN T, orway ethay ircularitycay etectionday oisenay illway "
-"etgay\n"
-"   onfusedcay aboutway enwhay otay useway #n= andway enwhay otay useway #n#.  Ifway isthay eturnsray\n"
-"   onnay-NIL enwhay ASSIGN isway T, enthay ouyay ustmay allcay HANDLE-CIRCULARITY onway itway."
+"Eckchay otay eesay ifway OBJECT isway away ircularcay eferenceray, andway "
+"eturnray omethingsay onnay-NIL\n"
+"   ifway itway isway.  Ifway ASSIGN isway T, enthay ethay umbernay otay "
+"useway inway ethay #n= andway #n# oisenay\n"
+"   isway assignedway atway isthay imetay.  Otenay: CHECK-FOR-CIRCULARITY "
+"ustmay ebay alledcay\n"
+"   *EXACTLY* onceway ithway ASSIGN T, orway ethay ircularitycay etectionday "
+"oisenay illway etgay\n"
+"   onfusedcay aboutway enwhay otay useway #n= andway enwhay otay useway "
+"#n#.  Ifway isthay eturnsray\n"
+"   onnay-NIL enwhay ASSIGN isway T, enthay ouyay ustmay allcay HANDLE-"
+"CIRCULARITY onway itway."
 
 #: src/code/print.lisp
 msgid ""
@@ -9143,32 +10494,37 @@ msgid ""
 "   you should go ahead and print the object.  If it returns NIL, then\n"
 "   you should blow it off."
 msgstr ""
-"Andlehay ethay esultsray ofway CHECK-FOR-CIRCULARITY.  Ifway isthay eturnsray T enthay\n"
-"   ouyay ouldshay ogay aheadway andway intpray ethay objectway.  Ifway itway eturnsray NIL, enthay\n"
+"Andlehay ethay esultsray ofway CHECK-FOR-CIRCULARITY.  Ifway isthay "
+"eturnsray T enthay\n"
+"   ouyay ouldshay ogay aheadway andway intpray ethay objectway.  Ifway itway "
+"eturnsray NIL, enthay\n"
 "   ouyay ouldshay owblay itway offway."
 
 #: src/code/print.lisp
 msgid ""
 "Attempt to use CHECK-FOR-CIRCULARITY when circularity ~\n"
-"	       checking has not been initiated."
+"\t       checking has not been initiated."
 msgstr ""
 "Attemptway otay useway CHECK-FOR-CIRCULARITY enwhay ircularitycay ~\n"
-"	       eckingchay ashay otnay eenbay initiatedway."
+"\t       eckingchay ashay otnay eenbay initiatedway."
 
 #: src/code/print.lisp
 msgid ""
 "The current level we are printing at, to be compared against *PRINT-LEVEL*.\n"
 "   See the macro DESCEND-INTO for a handy interface to depth abbreviation."
 msgstr ""
-"Ethay urrentcay evellay eway areway intingpray atway, otay ebay omparedcay againstway *PRINT-LEVEL*.\n"
-"   Eesay ethay acromay DESCEND-INTO orfay away andyhay interfaceway otay epthday abbreviationway."
+"Ethay urrentcay evellay eway areway intingpray atway, otay ebay omparedcay "
+"againstway *PRINT-LEVEL*.\n"
+"   Eesay ethay acromay DESCEND-INTO orfay away andyhay interfaceway otay "
+"epthday abbreviationway."
 
 #: src/code/print.lisp
 msgid ""
 "Automatically handle *print-level* abbreviation.  If we are too deep, then\n"
 "   a # is printed to STREAM and BODY is ignored."
 msgstr ""
-"Automaticallyway andlehay *print-level* abbreviationway.  Ifway eway areway ootay eepday, enthay\n"
+"Automaticallyway andlehay *print-level* abbreviationway.  Ifway eway areway "
+"ootay eepday, enthay\n"
 "   away # isway intedpray otay STREAM andway BODY isway ignoredway."
 
 #: src/code/print.lisp
@@ -9176,8 +10532,10 @@ msgid ""
 "Punt if INDEX is equal or larger then *PRINT-LENGTH* (and *PRINT-READABLY*\n"
 "   is NIL) by outputting \"...\" and returning from the block named NIL."
 msgstr ""
-"Untpay ifway INDEX isway equalway orway argerlay enthay *PRINT-LENGTH* (andway *PRINT-READABLY*\n"
-"   isway NIL) ybay outputtingway \"...\" andway eturningray omfray ethay ockblay amednay NIL."
+"Untpay ifway INDEX isway equalway orway argerlay enthay *PRINT-LENGTH* "
+"(andway *PRINT-READABLY*\n"
+"   isway NIL) ybay outputtingway \"...\" andway eturningray omfray ethay "
+"ockblay amednay NIL."
 
 #: src/code/print.lisp
 msgid ""
@@ -9185,13 +10543,17 @@ msgid ""
 "   arguments (the object and the stream) or NIL to indicate that there is\n"
 "   no pretty printer installed."
 msgstr ""
-"Ethay urrentcay ettypray interpray.  Ouldshay ebay eitherway away unctionfay atthay akestay wotay\n"
-"   argumentsway (ethay objectway andway ethay eamstray) orway NIL otay indicateway atthay erethay isway\n"
+"Ethay urrentcay ettypray interpray.  Ouldshay ebay eitherway away unctionfay "
+"atthay akestay wotay\n"
+"   argumentsway (ethay objectway andway ethay eamstray) orway NIL otay "
+"indicateway atthay erethay isway\n"
 "   onay ettypray interpray installedway."
 
 #: src/code/print.lisp
 msgid "Output OBJECT to STREAM observing all printer control variables."
-msgstr "Outputway OBJECT otay STREAM observingway allway interpray ontrolcay ariablesvay."
+msgstr ""
+"Outputway OBJECT otay STREAM observingway allway interpray ontrolcay "
+"ariablesvay."
 
 #: src/code/print.lisp
 msgid ""
@@ -9200,9 +10562,12 @@ msgid ""
 "   printer will be used for any components of OBJECT, just not for OBJECT\n"
 "   itself."
 msgstr ""
-"Outputway OBJECT otay STREAM observingway allway interpray ontrolcay ariablesvay exceptway\n"
-"   orfay *PRINT-PRETTY*.  Otenay: ifway *PRINT-PRETTY* isway onnay-NIL, enthay ethay ettypray\n"
-"   interpray illway ebay usedway orfay anyway omponentscay ofway OBJECT, ustjay otnay orfay OBJECT\n"
+"Outputway OBJECT otay STREAM observingway allway interpray ontrolcay "
+"ariablesvay exceptway\n"
+"   orfay *PRINT-PRETTY*.  Otenay: ifway *PRINT-PRETTY* isway onnay-NIL, "
+"enthay ethay ettypray\n"
+"   interpray illway ebay usedway orfay anyway omponentscay ofway OBJECT, "
+"ustjay otnay orfay OBJECT\n"
 "   itselfway."
 
 #: src/code/print.lisp
@@ -9218,7 +10583,8 @@ msgid ""
 "Outputs the printed representation of any array in either the #< or #A\n"
 "   form."
 msgstr ""
-"Outputsway ethay intedpray epresentationray ofway anyway arrayway inway eitherway ethay #< orway #Away\n"
+"Outputsway ethay intedpray epresentationray ofway anyway arrayway inway "
+"eitherway ethay #< orway #Away\n"
 "   ormfay."
 
 #: src/code/print.lisp
@@ -9238,7 +10604,8 @@ msgid ""
 "Compute a list of pairs (2^i . r^{2^i}), stopping with the largest r^{2^i}\n"
 "greater than n."
 msgstr ""
-"Omputecay away istlay ofway airspay (2^i . r^{2^i}), toppingsay ithway ethay argestlay r^{2^i}\n"
+"Omputecay away istlay ofway airspay (2^i . r^{2^i}), toppingsay ithway ethay "
+"argestlay r^{2^i}\n"
 "eatergray anthay n."
 
 #: src/code/print.lisp
@@ -9250,7 +10617,8 @@ msgid ""
 "Convert digit into a character representation.  We use 0..9, a..z for\n"
 "10..35, and A..Z for 36..52."
 msgstr ""
-"Onvertcay igitday intoway away aracterchay epresentationray.  Eway useway 0..9, away..z orfay\n"
+"Onvertcay igitday intoway away aracterchay epresentationray.  Eway useway "
+"0..9, away..z orfay\n"
 "10..35, andway Away..Z orfay 36..52."
 
 #: src/code/print.lisp
@@ -9258,7 +10626,8 @@ msgid ""
 "Print a fixnum N to stream S, maybe with leading zeros.  This isn't\n"
 "ever-so efficient, but we probably don't need to care."
 msgstr ""
-"Intpray away ixnumfay N otay eamstray S, aybemay ithway eadinglay eroszay.  Isthay isnway't\n"
+"Intpray away ixnumfay N otay eamstray S, aybemay ithway eadinglay eroszay.  "
+"Isthay isnway't\n"
 "everway-osay efficientway, utbay eway obablypray onday't eednay otay arecay."
 
 #: src/code/print.lisp
@@ -9267,8 +10636,10 @@ msgid ""
 "print the left and right halves using (cdr PL).  Make sure we count the\n"
 "leading zeroes correctly."
 msgstr ""
-"Useway ethay owerpay istlay (eesay owerpay-istlay) PL otay litspay N oughlyray inway alfhay; enthay\n"
-"intpray ethay eftlay andway ightray alveshay usingway (drcay PL).  Akemay uresay eway ountcay ethay\n"
+"Useway ethay owerpay istlay (eesay owerpay-istlay) PL otay litspay N "
+"oughlyray inway alfhay; enthay\n"
+"intpray ethay eftlay andway ightray alveshay usingway (drcay PL).  Akemay "
+"uresay eway ountcay ethay\n"
 "eadinglay eroeszay orrectlycay."
 
 #: src/code/print.lisp
@@ -9276,8 +10647,10 @@ msgid ""
 "Primary fast bignum-printing interface.  Prints integer N to stream S in\n"
 "radix-R.  If you have a power-list then pass it in as PL."
 msgstr ""
-"Imarypray astfay ignumbay-intingpray interfaceway.  Intspray integerway N otay eamstray S inway\n"
-"adixray-R.  Ifway ouyay avehay away owerpay-istlay enthay asspay itway inway asway PL."
+"Imarypray astfay ignumbay-intingpray interfaceway.  Intspray integerway N "
+"otay eamstray S inway\n"
+"adixray-R.  Ifway ouyay avehay away owerpay-istlay enthay asspay itway inway "
+"asway PL."
 
 #: src/code/print.lisp
 msgid ""
@@ -9285,8 +10658,10 @@ msgid ""
 "   instead of exponential format.  See section 22.1.3.1.3: Printing Floats\n"
 "   in the ANSI CL standard."
 msgstr ""
-"Inimummay owerpay ofway 10 atthay allowsway ethay oatflay interpray otay useway eefray ormatfay,\n"
-"   insteadway ofway exponentialway ormatfay.  Eesay ectionsay 22.1.3.1.3: Intingpray Oatsflay\n"
+"Inimummay owerpay ofway 10 atthay allowsway ethay oatflay interpray otay "
+"useway eefray ormatfay,\n"
+"   insteadway ofway exponentialway ormatfay.  Eesay ectionsay 22.1.3.1.3: "
+"Intingpray Oatsflay\n"
 "   inway ethay ANSI CL tandardsay."
 
 #: src/code/print.lisp
@@ -9295,8 +10670,10 @@ msgid ""
 "   instead of exponential format.  See section 22.1.3.1.3: Printing Floats\n"
 "   in the ANSI CL standard."
 msgstr ""
-"Aximummay owerpay ofway 10 atthay allowsway ethay oatflay interpray otay useway eefray ormatfay,\n"
-"   insteadway ofway exponentialway ormatfay.  Eesay ectionsay 22.1.3.1.3: Intingpray Oatsflay\n"
+"Aximummay owerpay ofway 10 atthay allowsway ethay oatflay interpray otay "
+"useway eefray ormatfay,\n"
+"   insteadway ofway exponentialway ormatfay.  Eesay ectionsay 22.1.3.1.3: "
+"Intingpray Oatsflay\n"
 "   inway ethay ANSI CL tandardsay."
 
 #: src/code/print.lisp
@@ -9398,22 +10775,33 @@ msgid ""
 "If STREAM is not a pretty-printing stream, simply call HANDLER\n"
 "with the arguments RECORD, STREAM and nil."
 msgstr ""
-"Insertway anway annotationway intoway ethay ettypray-intingpray eamstray STREAM.\n"
-"HANDLER isway away unctionfay, andway RECORD isway anway arbitraryway atumday.  Ethay\n"
-"ettypray-intingpray eamstray onceptionallycay euesquay annotationsway inway equencesay\n"
-"ithway ethay aracterschay atthay areway intedpray otay ethay eamstray, untilway ethay eamstray\n"
-"ashay ecidedday onway ethay oncretecay ayoutlay.  Enwhay ethay aracterschay areway orwardedfay\n"
-"otay ethay argettay eamstray, annotationsway areway invokedway atway ethay ightray ositionpay.\n"
-"Anway annotationway isway invokedway ybay allingcay ethay unctionfay HANDLER ithway ethay\n"
-"reethay argumentsway RECORD, TARGET-STREAM, andway TRUNCATEP.  Ethay argumentway\n"
-"TRUNCATEP isway uetray ifway ethay exttay urroundingsay ethay annotationway isway uppressedsay\n"
+"Insertway anway annotationway intoway ethay ettypray-intingpray eamstray "
+"STREAM.\n"
+"HANDLER isway away unctionfay, andway RECORD isway anway arbitraryway "
+"atumday.  Ethay\n"
+"ettypray-intingpray eamstray onceptionallycay euesquay annotationsway inway "
+"equencesay\n"
+"ithway ethay aracterschay atthay areway intedpray otay ethay eamstray, "
+"untilway ethay eamstray\n"
+"ashay ecidedday onway ethay oncretecay ayoutlay.  Enwhay ethay aracterschay "
+"areway orwardedfay\n"
+"otay ethay argettay eamstray, annotationsway areway invokedway atway ethay "
+"ightray ositionpay.\n"
+"Anway annotationway isway invokedway ybay allingcay ethay unctionfay HANDLER "
+"ithway ethay\n"
+"reethay argumentsway RECORD, TARGET-STREAM, andway TRUNCATEP.  Ethay "
+"argumentway\n"
+"TRUNCATEP isway uetray ifway ethay exttay urroundingsay ethay annotationway "
+"isway uppressedsay\n"
 "ueday otay inelay abbreviationway (eesay *PRINT-LINES*).\n"
-"Ifway STREAM isway otnay away ettypray-intingpray eamstray, implysay allcay HANDLER\n"
+"Ifway STREAM isway otnay away ettypray-intingpray eamstray, implysay allcay "
+"HANDLER\n"
 "ithway ethay argumentsway RECORD, STREAM andway ilnay."
 
 #: src/code/pprint.lisp
 msgid "Insert ANNOTATION into the queue of annotations in STREAM."
-msgstr "Insertway ANNOTATION intoway ethay euequay ofway annotationsway inway STREAM."
+msgstr ""
+"Insertway ANNOTATION intoway ethay euequay ofway annotationsway inway STREAM."
 
 #: src/code/pprint.lisp
 msgid ""
@@ -9421,8 +10809,10 @@ msgid ""
 "operations into the queue of annotations.  When END is non-nil, \n"
 "stop before reaching the queued-op END."
 msgstr ""
-"Insertway allway annotationsway inway STREAM omfray ethay euequay ofway endingpay\n"
-"operationsway intoway ethay euequay ofway annotationsway.  Enwhay END isway onnay-ilnay, \n"
+"Insertway allway annotationsway inway STREAM omfray ethay euequay ofway "
+"endingpay\n"
+"operationsway intoway ethay euequay ofway annotationsway.  Enwhay END isway "
+"onnay-ilnay, \n"
 "topsay eforebay eachingray ethay euedquay-opway END."
 
 #: src/code/pprint.lisp
@@ -9432,9 +10822,12 @@ msgid ""
 ":END-POSN is given and the next annotation has a posn greater than\n"
 "this, also return nil."
 msgstr ""
-"Equeueday ethay extnay annotationway omfray ethay euequay ofway annotationsway ofway STREAM\n"
-"andway eturnray itway.  Eturnray ilnay ifway erethay areway onay oremay annotationsway.  Enwhay\n"
-":END-POSN isway ivengay andway ethay extnay annotationway ashay away osnpay eatergray anthay\n"
+"Equeueday ethay extnay annotationway omfray ethay euequay ofway "
+"annotationsway ofway STREAM\n"
+"andway eturnray itway.  Eturnray ilnay ifway erethay areway onay oremay "
+"annotationsway.  Enwhay\n"
+":END-POSN isway ivengay andway ethay extnay annotationway ashay away osnpay "
+"eatergray anthay\n"
 "isthay, alsoway eturnray ilnay."
 
 #: src/code/pprint.lisp
@@ -9442,18 +10835,22 @@ msgid ""
 "Output the buffer of STREAM up to (excluding) the buffer index END.\n"
 "When annotations are present, invoke them at the right positions."
 msgstr ""
-"Outputway ethay ufferbay ofway STREAM upway otay (excludingway) ethay ufferbay indexway END.\n"
-"Enwhay annotationsway areway esentpray, invokeway emthay atway ethay ightray ositionspay."
+"Outputway ethay ufferbay ofway STREAM upway otay (excludingway) ethay "
+"ufferbay indexway END.\n"
+"Enwhay annotationsway areway esentpray, invokeway emthay atway ethay ightray "
+"ositionspay."
 
 #: src/code/pprint.lisp
 msgid ""
 "Invoke all annotations in STREAM up to (including) the buffer index END."
 msgstr ""
-"Invokeway allway annotationsway inway STREAM upway otay (includingway) ethay ufferbay indexway END."
+"Invokeway allway annotationsway inway STREAM upway otay (includingway) ethay "
+"ufferbay indexway END."
 
 #: src/code/pprint.lisp
 msgid "Output-partial-line called when nothing can be output."
-msgstr "Outputway-artialpay-inelay alledcay enwhay othingnay ancay ebay outputway."
+msgstr ""
+"Outputway-artialpay-inelay alledcay enwhay othingnay ancay ebay outputway."
 
 #: src/code/pprint.lisp
 msgid ""
@@ -9462,14 +10859,16 @@ msgid ""
 "printer\n"
 "   control variable *PRINT-LEVEL* is automatically handled."
 msgstr ""
-"Oupgray omesay outputway intoway away ogicallay ockblay.  STREAM-SYMBOL ouldshay ebay eitherway away\n"
-"   eamstray, T (orfay *TERMINAL-IO*), orway NIL (orfay *STANDARD-OUTPUT*).  Ethay "
-"interpray\n"
+"Oupgray omesay outputway intoway away ogicallay ockblay.  STREAM-SYMBOL "
+"ouldshay ebay eitherway away\n"
+"   eamstray, T (orfay *TERMINAL-IO*), orway NIL (orfay *STANDARD-OUTPUT*).  "
+"Ethay interpray\n"
 "   ontrolcay ariablevay *PRINT-LEVEL* isway automaticallyway andledhay."
 
 #: src/code/pprint.lisp
 msgid "Cannot specify both a prefix and a per-line-prefix."
-msgstr "Annotcay ecifyspay othbay away efixpray andway away erpay-inelay-efixpray."
+msgstr ""
+"Annotcay ecifyspay othbay away efixpray andway away erpay-inelay-efixpray."
 
 #: src/code/pprint.lisp
 msgid ""
@@ -9478,18 +10877,20 @@ msgid ""
 "   PPRINT-LOGICAL-BLOCK, and only when the LIST argument to\n"
 "   PPRINT-LOGICAL-BLOCK is supplied."
 msgstr ""
-"Ausecay ethay osestclay enclosingway useway ofway PPRINT-LOGICAL-BLOCK otay eturnray\n"
-"   ifway itway's istlay argumentway isway exhaustedway.  Ancay onlyway ebay usedway insideway\n"
+"Ausecay ethay osestclay enclosingway useway ofway PPRINT-LOGICAL-BLOCK otay "
+"eturnray\n"
+"   ifway itway's istlay argumentway isway exhaustedway.  Ancay onlyway ebay "
+"usedway insideway\n"
 "   PPRINT-LOGICAL-BLOCK, andway onlyway enwhay ethay LIST argumentway otay\n"
 "   PPRINT-LOGICAL-BLOCK isway uppliedsay."
 
 #: src/code/pprint.lisp
 msgid ""
 "PPRINT-EXIT-IF-LIST-EXHAUSTED must be lexically inside ~\n"
-"	  PPRINT-LOGICAL-BLOCK."
+"\t  PPRINT-LOGICAL-BLOCK."
 msgstr ""
 "PPRINT-EXIT-IF-LIST-EXHAUSTED ustmay ebay exicallylay insideway ~\n"
-"	  PPRINT-LOGICAL-BLOCK."
+"\t  PPRINT-LOGICAL-BLOCK."
 
 #: src/code/pprint.lisp
 msgid ""
@@ -9499,10 +10900,14 @@ msgid ""
 "   If the LIST argument to PPRINT-LOGICAL-BLOCK was NIL, then nothing\n"
 "   is poped, but the *PRINT-LENGTH* testing still happens."
 msgstr ""
-"Eturnray ethay extnay elementway omfray LIST argumentway otay ethay osestclay enclosingway\n"
-"   useway ofway PPRINT-LOGICAL-BLOCK, automaticallyway andlinghay *PRINT-LENGTH*\n"
-"   andway *PRINT-CIRCLE*.  Ancay onlyway ebay usedway insideway PPRINT-LOGICAL-BLOCK.\n"
-"   Ifway ethay LIST argumentway otay PPRINT-LOGICAL-BLOCK asway NIL, enthay othingnay\n"
+"Eturnray ethay extnay elementway omfray LIST argumentway otay ethay "
+"osestclay enclosingway\n"
+"   useway ofway PPRINT-LOGICAL-BLOCK, automaticallyway andlinghay *PRINT-"
+"LENGTH*\n"
+"   andway *PRINT-CIRCLE*.  Ancay onlyway ebay usedway insideway PPRINT-"
+"LOGICAL-BLOCK.\n"
+"   Ifway ethay LIST argumentway otay PPRINT-LOGICAL-BLOCK asway NIL, enthay "
+"othingnay\n"
 "   isway opedpay, utbay ethay *PRINT-LENGTH* estingtay tillsay appenshay."
 
 #: src/code/pprint.lisp
@@ -9531,22 +10936,32 @@ msgid ""
 "   next line.  (See PPRINT-INDENT.)"
 msgstr ""
 "Outputway away onditionalcay ewlinenay otay STREAM (ichwhay efaultsday otay\n"
-"   *STANDARD-OUTPUT*) ifway itway isway away ettypray-intingpray eamstray, andway oday\n"
+"   *STANDARD-OUTPUT*) ifway itway isway away ettypray-intingpray eamstray, "
+"andway oday\n"
 "   othingnay ifway otnay.  KIND ancay ebay oneway ofway:\n"
-"     :LINEAR - Away inelay eakbray isway insertedway ifway andway onlyway ifway ethay immediatlyway\n"
+"     :LINEAR - Away inelay eakbray isway insertedway ifway andway onlyway "
+"ifway ethay immediatlyway\n"
 "        ontainingcay ectionsay annotcay ebay intedpray onway oneway inelay.\n"
-"     :MISER - Amesay asway LINEAR, utbay onlyway ifway ``isermay-tylesay'' isway inway effectway.\n"
+"     :MISER - Amesay asway LINEAR, utbay onlyway ifway ``isermay-tylesay'' "
+"isway inway effectway.\n"
 "        (Eesay *PRINT-MISER-WIDTH*.)\n"
-"     :FILL - Away inelay eakbray isway insertedway ifway andway onlyway ifway eitherway:\n"
-"       (away) ethay ollowingfay ectionsay annotcay ebay intedpray onway ethay endway ofway ethay\n"
+"     :FILL - Away inelay eakbray isway insertedway ifway andway onlyway "
+"ifway eitherway:\n"
+"       (away) ethay ollowingfay ectionsay annotcay ebay intedpray onway "
+"ethay endway ofway ethay\n"
 "           urrentcay inelay,\n"
-"       (b) ethay ecedingpray ectionsay asway otnay intedpray onway away inglesay inelay, orway\n"
-"       (c) ethay immediatelyway ontainingcay ectionsay annotcay ebay intedpray onway oneway\n"
+"       (b) ethay ecedingpray ectionsay asway otnay intedpray onway away "
+"inglesay inelay, orway\n"
+"       (c) ethay immediatelyway ontainingcay ectionsay annotcay ebay "
+"intedpray onway oneway\n"
 "           inelay andway isermay-tylesay isway inway effectway.\n"
 "     :MANDATORY - Away inelay eakbray isway alwaysway insertedway.\n"
-"   Enwhay away inelay eakbray isway insertedway ybay anyway ypetay ofway onditionalcay ewlinenay, anyway\n"
-"   anksblay atthay immediatelyway ecedepray ethay onditionalcay ewlinenay areway ommittedway\n"
-"   omfray ethay outputway andway indentationway isway introducedway atway ethay eginningbay ofway ethay\n"
+"   Enwhay away inelay eakbray isway insertedway ybay anyway ypetay ofway "
+"onditionalcay ewlinenay, anyway\n"
+"   anksblay atthay immediatelyway ecedepray ethay onditionalcay ewlinenay "
+"areway ommittedway\n"
+"   omfray ethay outputway andway indentationway isway introducedway atway "
+"ethay eginningbay ofway ethay\n"
 "   extnay inelay.  (Eesay PPRINT-INDENT.)"
 
 #: src/code/pprint.lisp
@@ -9561,15 +10976,22 @@ msgid ""
 "   The new indention value does not take effect until the following line\n"
 "   break.  The indention value is silently truncated to an integer."
 msgstr ""
-"Ecifyspay ethay indentationway otay useway inway ethay urrentcay ogicallay ockblay ifway STREAM\n"
-"   (ichwhay efaultsday otay *STANDARD-OUTPUT*) isway away ettypray-intingpray eamstray\n"
-"   andway oday othingnay ifway otnay.  (Eesay PPRINT-LOGICAL-BLOCK.)  N isway ethay indentionway\n"
-"   otay useway (inway emsway, ethay idthway ofway anway ``m'') andway RELATIVE-TO ancay ebay eitherway:\n"
-"     :BLOCK - Indentway elativeray otay ethay olumncay ethay urrentcay ogicallay ockblay\n"
+"Ecifyspay ethay indentationway otay useway inway ethay urrentcay ogicallay "
+"ockblay ifway STREAM\n"
+"   (ichwhay efaultsday otay *STANDARD-OUTPUT*) isway away ettypray-"
+"intingpray eamstray\n"
+"   andway oday othingnay ifway otnay.  (Eesay PPRINT-LOGICAL-BLOCK.)  N "
+"isway ethay indentionway\n"
+"   otay useway (inway emsway, ethay idthway ofway anway ``m'') andway "
+"RELATIVE-TO ancay ebay eitherway:\n"
+"     :BLOCK - Indentway elativeray otay ethay olumncay ethay urrentcay "
+"ogicallay ockblay\n"
 "        tartedsay onway.\n"
 "     :CURRENT - Indentway elativeray otay ethay urrentcay olumncay.\n"
-"   Ethay ewnay indentionway aluevay oesday otnay aketay effectway untilway ethay ollowingfay inelay\n"
-"   eakbray.  Ethay indentionway aluevay isway ilentlysay uncatedtray otay anway integerway."
+"   Ethay ewnay indentionway aluevay oesday otnay aketay effectway untilway "
+"ethay ollowingfay inelay\n"
+"   eakbray.  Ethay indentionway aluevay isway ilentlysay uncatedtray otay "
+"anway integerway."
 
 #: src/code/pprint.lisp
 msgid ""
@@ -9586,18 +11008,24 @@ msgid ""
 "     :SECTION-RELATIVE - Same as :LINE-RELATIVE, but count from the start\n"
 "       of the current section, not the start of the line."
 msgstr ""
-"Ifway STREAM (ichwhay efaultsday otay *STANDARD-OUTPUT*) isway away ettypray-intingpray\n"
-"   eamstray, erformpay abbingtay asedbay onway KIND, otherwiseway oday othingnay.  KIND ancay\n"
+"Ifway STREAM (ichwhay efaultsday otay *STANDARD-OUTPUT*) isway away ettypray-"
+"intingpray\n"
+"   eamstray, erformpay abbingtay asedbay onway KIND, otherwiseway oday "
+"othingnay.  KIND ancay\n"
 "   ebay oneway ofway:\n"
-"     :LINE - Abtay otay olumncay COLNUM.  Ifway alreadyway astpay COLNUM abtay otay ethay extnay\n"
+"     :LINE - Abtay otay olumncay COLNUM.  Ifway alreadyway astpay COLNUM "
+"abtay otay ethay extnay\n"
 "       ultiplemay ofway COLINC.\n"
-"     :SECTION - Amesay asway :LINE, utbay ountcay omfray ethay tartsay ofway ethay urrentcay\n"
+"     :SECTION - Amesay asway :LINE, utbay ountcay omfray ethay tartsay ofway "
+"ethay urrentcay\n"
 "       ectionsay, otnay ethay tartsay ofway ethay inelay.\n"
-"     :LINE-RELATIVE - Outputway COLNUM acesspay, enthay abtay otay ethay extnay ultiplemay "
-"ofway\n"
+"     :LINE-RELATIVE - Outputway COLNUM acesspay, enthay abtay otay ethay "
+"extnay ultiplemay ofway\n"
 "       COLINC.\n"
-"     :SECTION-RELATIVE - Amesay asway :LINE-RELATIVE, utbay ountcay omfray ethay tartsay\n"
-"       ofway ethay urrentcay ectionsay, otnay ethay tartsay ofway ethay inelay."
+"     :SECTION-RELATIVE - Amesay asway :LINE-RELATIVE, utbay ountcay omfray "
+"ethay tartsay\n"
+"       ofway ethay urrentcay ectionsay, otnay ethay tartsay ofway ethay "
+"inelay."
 
 #: src/code/pprint.lisp
 msgid ""
@@ -9606,23 +11034,28 @@ msgid ""
 "   around the output.  ATSIGN? is ignored (but allowed so that PPRINT-FILL\n"
 "   can be used with the ~/.../ format directive."
 msgstr ""
-"Outputway LIST otay STREAM uttingpay :FILL onditionalcay ewlinesnay etweenbay eachway\n"
-"   elementway.  Ifway COLON? isway NIL (efaultsday otay T), enthay onay arenspay areway intedpray\n"
-"   aroundway ethay outputway.  ATSIGN? isway ignoredway (utbay allowedway osay atthay PPRINT-FILL\n"
+"Outputway LIST otay STREAM uttingpay :FILL onditionalcay ewlinesnay "
+"etweenbay eachway\n"
+"   elementway.  Ifway COLON? isway NIL (efaultsday otay T), enthay onay "
+"arenspay areway intedpray\n"
+"   aroundway ethay outputway.  ATSIGN? isway ignoredway (utbay allowedway "
+"osay atthay PPRINT-FILL\n"
 "   ancay ebay usedway ithway ethay ~/.../ ormatfay irectiveday."
 
 #: src/code/pprint.lisp
 msgid ""
 "Output LIST to STREAM putting :LINEAR conditional newlines between each\n"
 "   element.  If COLON? is NIL (defaults to T), then no parens are printed\n"
-"   around the output.  ATSIGN? is ignored (but allowed so that PPRINT-LINEAR"
-"\n"
+"   around the output.  ATSIGN? is ignored (but allowed so that PPRINT-"
+"LINEAR\n"
 "   can be used with the ~/.../ format directive."
 msgstr ""
-"Outputway LIST otay STREAM uttingpay :LINEAR onditionalcay ewlinesnay etweenbay eachway\n"
-"   elementway.  Ifway COLON? isway NIL (efaultsday otay T), enthay onay arenspay areway intedpray\n"
-"   aroundway ethay outputway.  ATSIGN? isway ignoredway (utbay allowedway osay atthay PPRINT-LINEAR"
-"\n"
+"Outputway LIST otay STREAM uttingpay :LINEAR onditionalcay ewlinesnay "
+"etweenbay eachway\n"
+"   elementway.  Ifway COLON? isway NIL (efaultsday otay T), enthay onay "
+"arenspay areway intedpray\n"
+"   aroundway ethay outputway.  ATSIGN? isway ignoredway (utbay allowedway "
+"osay atthay PPRINT-LINEAR\n"
 "   ancay ebay usedway ithway ethay ~/.../ ormatfay irectiveday."
 
 #: src/code/pprint.lisp
@@ -9634,11 +11067,16 @@ msgid ""
 "   ATSIGN? is ignored (but allowed so that PPRINT-TABULAR can be used with\n"
 "   the ~/.../ format directive."
 msgstr ""
-"Outputway LIST otay STREAM abbingtay otay ethay extnay olumncay atthay isway anway evenway ultiplemay\n"
-"   ofway TABSIZE (ichwhay efaultsday otay 16) etweenbay eachway elementway.  :FILL tylesay\n"
-"   onditionalcay ewlinesnay areway alsoway outputway etweenbay eachway elementway.  Ifway COLON? isway\n"
-"   NIL (efaultsday otay T), enthay onay arenspay areway intedpray aroundway ethay outputway.\n"
-"   ATSIGN? isway ignoredway (utbay allowedway osay atthay PPRINT-TABULAR ancay ebay usedway ithway\n"
+"Outputway LIST otay STREAM abbingtay otay ethay extnay olumncay atthay isway "
+"anway evenway ultiplemay\n"
+"   ofway TABSIZE (ichwhay efaultsday otay 16) etweenbay eachway "
+"elementway.  :FILL tylesay\n"
+"   onditionalcay ewlinesnay areway alsoway outputway etweenbay eachway "
+"elementway.  Ifway COLON? isway\n"
+"   NIL (efaultsday otay T), enthay onay arenspay areway intedpray aroundway "
+"ethay outputway.\n"
+"   ATSIGN? isway ignoredway (utbay allowedway osay atthay PPRINT-TABULAR "
+"ancay ebay usedway ithway\n"
 "   ethay ~/.../ ormatfay irectiveday."
 
 #: src/code/pprint.lisp
@@ -9652,18 +11090,22 @@ msgid "No more arguments."
 msgstr "Onay oremay argumentsway."
 
 #: src/code/format.lisp
-msgid "~:[~;Error in format: ~]~\n"
-"	      ~?~@[~%  ~A~%  ~V@T^~]"
-msgstr "~:[~;Errorway inway ormatfay: ~]~\n"
-"	      ~?~@[~%  ~Away~%  ~V@T^~]"
+msgid ""
+"~:[~;Error in format: ~]~\n"
+"\t      ~?~@[~%  ~A~%  ~V@T^~]"
+msgstr ""
+"~:[~;Errorway inway ormatfay: ~]~\n"
+"\t      ~?~@[~%  ~Away~%  ~V@T^~]"
 
 #: src/code/format.lisp
 msgid ""
 "A justification directive cannot be in the same format string~%~\n"
 "                         as ~~W, ~~I, ~~:T, or a logical-block directive."
 msgstr ""
-"Away ustificationjay irectiveday annotcay ebay inway ethay amesay ormatfay ingstray~%~\n"
-"                         asway ~~W, ~~Iway, ~~:T, orway away ogicallay-ockblay irectiveday."
+"Away ustificationjay irectiveday annotcay ebay inway ethay amesay ormatfay "
+"ingstray~%~\n"
+"                         asway ~~W, ~~Iway, ~~:T, orway away ogicallay-"
+"ockblay irectiveday."
 
 #: src/code/format.lisp
 msgid "String ended before directive was found."
@@ -9685,7 +11127,8 @@ msgstr "Onay atchingmay osingclay ashslay."
 msgid ""
 "Provides various facilities for formatting output.\n"
 "  CONTROL-STRING contains a string to be output, possibly with embedded\n"
-"  directives, which are flagged with the escape character \"~\".  Directives\n"
+"  directives, which are flagged with the escape character \"~\".  "
+"Directives\n"
 "  generally expand into additional text to be output, usually consuming one\n"
 "  or more of the FORMAT-ARGUMENTS in the process.  A few useful directives\n"
 "  are:\n"
@@ -9709,28 +11152,43 @@ msgid ""
 "  details."
 msgstr ""
 "Ovidespray ariousvay acilitiesfay orfay ormattingfay outputway.\n"
-"  CONTROL-STRING ontainscay away ingstray otay ebay outputway, ossiblypay ithway embeddedway\n"
-"  irectivesday, ichwhay areway aggedflay ithway ethay escapeway aracterchay \"~\".  Irectivesday\n"
-"  enerallygay expandway intoway additionalway exttay otay ebay outputway, usuallyway onsumingcay oneway\n"
-"  orway oremay ofway ethay FORMAT-ARGUMENTS inway ethay ocesspray.  Away ewfay usefulway irectivesday\n"
+"  CONTROL-STRING ontainscay away ingstray otay ebay outputway, ossiblypay "
+"ithway embeddedway\n"
+"  irectivesday, ichwhay areway aggedflay ithway ethay escapeway aracterchay "
+"\"~\".  Irectivesday\n"
+"  enerallygay expandway intoway additionalway exttay otay ebay outputway, "
+"usuallyway onsumingcay oneway\n"
+"  orway oremay ofway ethay FORMAT-ARGUMENTS inway ethay ocesspray.  Away "
+"ewfay usefulway irectivesday\n"
 "  areway:\n"
-"        ~Away orway ~anay     Intspray oneway argumentway asway ifway ybay PRINC\n"
-"        ~S orway ~snay     Intspray oneway argumentway asway ifway ybay PRIN1\n"
-"        ~D orway ~dnay     Intspray oneway argumentway asway away ecimalday integerway\n"
+"        ~Away orway ~anay     Intspray oneway argumentway asway ifway ybay "
+"PRINC\n"
+"        ~S orway ~snay     Intspray oneway argumentway asway ifway ybay "
+"PRIN1\n"
+"        ~D orway ~dnay     Intspray oneway argumentway asway away ecimalday "
+"integerway\n"
 "        ~%            Oesday away TERPRI\n"
 "        ~&            Oesday away FRESH-LINE\n"
 "\n"
-"         erewhay n isway ethay idthway ofway ethay ieldfay inway ichwhay ethay objectway isway intedpray.\n"
+"         erewhay n isway ethay idthway ofway ethay ieldfay inway ichwhay "
+"ethay objectway isway intedpray.\n"
 "  \n"
-"  DESTINATION ontrolscay erewhay ethay esultray illway ogay.  Ifway DESTINATION isway T, enthay\n"
-"  ethay outputway isway entsay otay ethay tandardsay outputway eamstray.  Ifway itway isway NIL, enthay ethay\n"
-"  outputway isway eturnedray inway away ingstray asway ethay aluevay ofway ethay allcay.  Otherwiseway,\n"
-"  DESTINATION ustmay ebay away eamstray otay ichwhay ethay outputway illway ebay entsay.\n"
-"\n"
-"  Exampleway:   (FORMAT NIL \"Ethay answerway isway ~D.\" 10) => \"Ethay answerway isway 10.\"\n"
-"\n"
-"  FORMAT ashay anymay additionalway apabilitiescay otnay escribedday erehay.  Onsultcay\n"
-"  Ectionsay 22.3 (Ormattedfay Outputway) ofway ethay ANSI Ommoncay Isplay tandardsay orfay\n"
+"  DESTINATION ontrolscay erewhay ethay esultray illway ogay.  Ifway "
+"DESTINATION isway T, enthay\n"
+"  ethay outputway isway entsay otay ethay tandardsay outputway eamstray.  "
+"Ifway itway isway NIL, enthay ethay\n"
+"  outputway isway eturnedray inway away ingstray asway ethay aluevay ofway "
+"ethay allcay.  Otherwiseway,\n"
+"  DESTINATION ustmay ebay away eamstray otay ichwhay ethay outputway illway "
+"ebay entsay.\n"
+"\n"
+"  Exampleway:   (FORMAT NIL \"Ethay answerway isway ~D.\" 10) => \"Ethay "
+"answerway isway 10.\"\n"
+"\n"
+"  FORMAT ashay anymay additionalway apabilitiescay otnay escribedday "
+"erehay.  Onsultcay\n"
+"  Ectionsay 22.3 (Ormattedfay Outputway) ofway ethay ANSI Ommoncay Isplay "
+"tandardsay orfay\n"
 "  etailsday."
 
 #: src/code/format.lisp
@@ -9759,7 +11217,8 @@ msgstr "Abletay ofway ordinalway enstay-aceplay igitsday inway Englishway"
 
 #: src/code/format.lisp
 msgid "Number too large to print in old Roman numerals: ~:D"
-msgstr "Umbernay ootay argelay otay intpray inway oldway Omanray umeralsnay: ~:D"
+msgstr ""
+"Umbernay ootay argelay otay intpray inway oldway Omanray umeralsnay: ~:D"
 
 #: src/code/format.lisp
 msgid "Number too large to print in Roman numerals: ~:D"
@@ -9775,11 +11234,14 @@ msgstr "Annotcay ecifyspay ethay oloncay odifiermay ithway isthay irectiveday."
 
 #: src/code/format.lisp
 msgid "Cannot specify either colon or atsign for this directive."
-msgstr "Annotcay ecifyspay eitherway oloncay orway atsignway orfay isthay irectiveday."
+msgstr ""
+"Annotcay ecifyspay eitherway oloncay orway atsignway orfay isthay "
+"irectiveday."
 
 #: src/code/format.lisp
 msgid "Cannot specify both colon and atsign for this directive."
-msgstr "Annotcay ecifyspay othbay oloncay andway atsignway orfay isthay irectiveday."
+msgstr ""
+"Annotcay ecifyspay othbay oloncay andway atsignway orfay isthay irectiveday."
 
 #: src/code/format.lisp
 msgid "Cannot specify the at-sign modifier."
@@ -9790,18 +11252,20 @@ msgid "Cannot specify both colon and at-sign."
 msgstr "Annotcay ecifyspay othbay oloncay andway atway-ignsay."
 
 #: src/code/format.lisp
-msgid "Index ~D out of bounds.  Should have been ~\n"
-"				   between 0 and ~D."
-msgstr "Indexway ~D outway ofway oundsbay.  Ouldshay avehay eenbay ~\n"
-"				   etweenbay 0 andway ~D."
+msgid ""
+"Index ~D out of bounds.  Should have been ~\n"
+"\t\t\t\t   between 0 and ~D."
+msgstr ""
+"Indexway ~D outway ofway oundsbay.  Ouldshay avehay eenbay ~\n"
+"\t\t\t\t   etweenbay 0 andway ~D."
 
 #: src/code/format.lisp
 msgid ""
 "Index ~D out of bounds.  Should have been ~\n"
-"			       between 0 and ~D."
+"\t\t\t       between 0 and ~D."
 msgstr ""
 "Indexway ~D outway ofway oundsbay.  Ouldshay avehay eenbay ~\n"
-"			       etweenbay 0 andway ~D."
+"\t\t\t       etweenbay 0 andway ~D."
 
 #: src/code/format.lisp
 msgid "Cannot specify the colon modifier."
@@ -9826,7 +11290,8 @@ msgstr "Onay orrespondingcay oseclay acketbray."
 
 #: src/code/format.lisp
 msgid "Cannot specify both the colon and at-sign modifiers."
-msgstr "Annotcay ecifyspay othbay ethay oloncay andway atway-ignsay odifiersmay."
+msgstr ""
+"Annotcay ecifyspay othbay ethay oloncay andway atway-ignsay odifiersmay."
 
 #: src/code/format.lisp
 msgid "Can only specify one section"
@@ -9864,7 +11329,8 @@ msgstr "Onay orrespondingcay openway acebray."
 msgid "~D illegal directive found inside justification block"
 msgid_plural "~D illegal directives found inside justification block"
 msgstr[0] "~D illegalway irectiveday oundfay insideway ustificationjay ockblay"
-msgstr[1] "~D illegalway irectivesday oundfay insideway ustificationjay ockblay"
+msgstr[1] ""
+"~D illegalway irectivesday oundfay insideway ustificationjay ockblay"
 
 #: src/code/format.lisp
 msgid "No parameters can be supplied with ~~<...~~:>."
@@ -9873,10 +11339,10 @@ msgstr "Onay arameterspay ancay ebay uppliedsay ithway ~~<...~~:>."
 #: src/code/format.lisp
 msgid ""
 "Cannot include format directives inside the ~\n"
-"			       ~:[suffix~;prefix~] segment of ~~<...~~:>"
+"\t\t\t       ~:[suffix~;prefix~] segment of ~~<...~~:>"
 msgstr ""
 "Annotcay includeway ormatfay irectivesday insideway ethay ~\n"
-"			       ~:[uffixsay~;efixpray~] egmentsay ofway ~~<...~~:>"
+"\t\t\t       ~:[uffixsay~;efixpray~] egmentsay ofway ~~<...~~:>"
 
 #: src/code/format.lisp
 msgid "Too many segments for ~~<...~~:>."
@@ -9895,7 +11361,8 @@ msgid ""
 "The list of packages to use by default of no :USE argument is supplied\n"
 "   to MAKE-PACKAGE or other package creation forms."
 msgstr ""
-"Ethay istlay ofway ackagespay otay useway ybay efaultday ofway onay :USE argumentway isway uppliedsay\n"
+"Ethay istlay ofway ackagespay otay useway ybay efaultday ofway onay :USE "
+"argumentway isway uppliedsay\n"
 "   otay MAKE-PACKAGE orway otherway ackagepay eationcray ormsfay."
 
 #: src/code/package.lisp
@@ -9916,7 +11383,9 @@ msgstr "Ethay urrentcay ackagepay."
 
 #: src/code/package.lisp
 msgid "~&~@<Attempt to modify the locked package ~A, by ~3i~:_~?~:>"
-msgstr "~&~@<Attemptway otay odifymay ethay ockedlay ackagepay ~Away, ybay ~3i~:_~?~:>"
+msgstr ""
+"~&~@<Attemptway otay odifymay ethay ockedlay ackagepay ~Away, ybay ~3i~:_~?~:"
+">"
 
 #: src/code/package.lisp
 msgid "redefining function ~A"
@@ -9947,8 +11416,10 @@ msgid ""
 "Given PACKAGE-SPECIFIER, a package, symbol or string, return the\n"
 "  parent package.  If there is not a parent, signal an error."
 msgstr ""
-"Ivengay PACKAGE-SPECIFIER, away ackagepay, ymbolsay orway ingstray, eturnray ethay\n"
-"  arentpay ackagepay.  Ifway erethay isway otnay away arentpay, ignalsay anway errorway."
+"Ivengay PACKAGE-SPECIFIER, away ackagepay, ymbolsay orway ingstray, eturnray "
+"ethay\n"
+"  arentpay ackagepay.  Ifway erethay isway otnay away arentpay, ignalsay "
+"anway errorway."
 
 #: src/code/package.lisp
 msgid "The parent of ~a does not exist."
@@ -9964,9 +11435,12 @@ msgid ""
 "  packages which are in the hierarchy 'under' the given package.  If\n"
 "  :recurse is nil, then only return the immediate children of the package."
 msgstr ""
-"Ivengay PACKAGE-SPECIFIER, away ackagepay, ymbolsay orway ingstray, eturnray allway ethay\n"
-"  ackagespay ichwhay areway inway ethay ierarchyhay 'underway' ethay ivengay ackagepay.  Ifway\n"
-"  :ecurseray isway ilnay, enthay onlyway eturnray ethay immediateway ildrenchay ofway ethay ackagepay."
+"Ivengay PACKAGE-SPECIFIER, away ackagepay, ymbolsay orway ingstray, eturnray "
+"allway ethay\n"
+"  ackagespay ichwhay areway inway ethay ierarchyhay 'underway' ethay ivengay "
+"ackagepay.  Ifway\n"
+"  :ecurseray isway ilnay, enthay onlyway eturnray ethay immediateway "
+"ildrenchay ofway ethay ackagepay."
 
 #: src/code/package.lisp
 msgid "Find the package having the specified name."
@@ -9987,7 +11461,8 @@ msgid ""
 "   PACKAGE with VAR bound to the current symbol."
 msgstr ""
 "DO-SYMBOLS (VAR [PACKAGE [RESULT-FORM]]) {DECLARATION}* {TAG | FORM}*\n"
-"   Executesway ethay Ormsfay atway eastlay onceway orfay eachway ymbolsay accessibleway inway ethay ivengay\n"
+"   Executesway ethay Ormsfay atway eastlay onceway orfay eachway ymbolsay "
+"accessibleway inway ethay ivengay\n"
 "   PACKAGE ithway VAR oundbay otay ethay urrentcay ymbolsay."
 
 #: src/code/package.lisp
@@ -9998,8 +11473,8 @@ msgid ""
 "   VAR bound to the current symbol."
 msgstr ""
 "DO-EXTERNAL-SYMBOLS (VAR [PACKAGE [RESULT-FORM]]) {DECL}* {TAG | FORM}*\n"
-"   Executesway ethay Ormsfay onceway orfay eachway externalway ymbolsay inway ethay ivengay PACKAGE "
-"ithway\n"
+"   Executesway ethay Ormsfay onceway orfay eachway externalway ymbolsay "
+"inway ethay ivengay PACKAGE ithway\n"
 "   VAR oundbay otay ethay urrentcay ymbolsay."
 
 #: src/code/package.lisp
@@ -10009,7 +11484,8 @@ msgid ""
 "   to the current symbol."
 msgstr ""
 "DO-ALL-SYMBOLS (VAR [RESULT-FORM]) {DECLARATION}* {TAG | FORM}*\n"
-"   Executesway ethay Ormsfay onceway orfay eachway ymbolsay inway everyway ackagepay ithway VAR oundbay\n"
+"   Executesway ethay Ormsfay onceway orfay eachway ymbolsay inway everyway "
+"ackagepay ithway VAR oundbay\n"
 "   otay ethay urrentcay ymbolsay."
 
 #: src/code/package.lisp
@@ -10019,26 +11495,29 @@ msgid ""
 "   one by one, from the packages in PACKAGE-LIST. SYMBOL-TYPES may be\n"
 "   any of :inherited :external :internal."
 msgstr ""
-"Ithinway ethay exicallay opescay ofway ethay odybay ormsfay, MNAME isway efinedday iavay acroletmay\n"
-"   uchsay atthay uccessivesay invocationsway ofway (amemnay) illway eturnray ethay ymbolssay,\n"
-"   oneway ybay oneway, omfray ethay ackagespay inway PACKAGE-LIST. SYMBOL-TYPES aymay ebay\n"
+"Ithinway ethay exicallay opescay ofway ethay odybay ormsfay, MNAME isway "
+"efinedday iavay acroletmay\n"
+"   uchsay atthay uccessivesay invocationsway ofway (amemnay) illway eturnray "
+"ethay ymbolssay,\n"
+"   oneway ybay oneway, omfray ethay ackagespay inway PACKAGE-LIST. SYMBOL-"
+"TYPES aymay ebay\n"
 "   anyway ofway :inheritedway :externalway :internalway."
 
 #: src/code/package.lisp
 msgid ""
 "Must supply at least one of :internal, ~\n"
-"	                             :external, or :inherited."
+"\t                             :external, or :inherited."
 msgstr ""
 "Ustmay upplysay atway eastlay oneway ofway :internalway, ~\n"
-"	                             :externalway, orway :inheritedway."
+"\t                             :externalway, orway :inheritedway."
 
 #: src/code/package.lisp
 msgid ""
 "~S is not one of :internal, :external, ~\n"
-"		                       or :inherited."
+"\t\t                       or :inherited."
 msgstr ""
 "~S isway otnay oneway ofway :internalway, :externalway, ~\n"
-"		                       orway :inheritedway."
+"\t\t                       orway :inheritedway."
 
 #: src/code/package.lisp
 msgid ""
@@ -10055,7 +11534,8 @@ msgid ""
 "     (:DOCUMENTATION doc-string)\n"
 "   All options except :SIZE and :DOCUMENTATION can be used multiple times."
 msgstr ""
-"Efinesday away ewnay ackagepay alledcay PACKAGE.  Eachway ofway OPTIONS ouldshay ebay oneway ofway ethay\n"
+"Efinesday away ewnay ackagepay alledcay PACKAGE.  Eachway ofway OPTIONS "
+"ouldshay ebay oneway ofway ethay\n"
 "   ollowingfay:\n"
 "     (:NICKNAMES {ackagepay-amenay}*)\n"
 "     (:SIZE <integerway>)\n"
@@ -10066,7 +11546,8 @@ msgstr ""
 "     (:INTERN {ymbolsay-amenay}*)\n"
 "     (:EXPORT {ymbolsay-amenay}*)\n"
 "     (:DOCUMENTATION ocday-ingstray)\n"
-"   Allway optionsway exceptway :SIZE andway :DOCUMENTATION ancay ebay usedway ultiplemay imestay."
+"   Allway optionsway exceptway :SIZE andway :DOCUMENTATION ancay ebay "
+"usedway ultiplemay imestay."
 
 #: src/code/package.lisp
 msgid "Bogus DEFPACKAGE option: ~S"
@@ -10087,10 +11568,10 @@ msgstr "Ancay't ecifyspay :DOCUMENTATION wicetay."
 #: src/code/package.lisp
 msgid ""
 "Parameters ~S and ~S must be disjoint ~\n"
-"	                             but have common elements ~%   ~S"
+"\t                             but have common elements ~%   ~S"
 msgstr ""
 "Arameterspay ~S andway ~S ustmay ebay isjointday ~\n"
-"	                             utbay avehay ommoncay elementsway ~%   ~S"
+"\t                             utbay avehay ommoncay elementsway ~%   ~S"
 
 #: src/code/package.lisp
 msgid "~A is a nick-name for the package ~A"
@@ -10114,7 +11595,9 @@ msgstr "~Away oesday otnay ontaincay away ymbolsay ~Away"
 
 #: src/code/package.lisp
 msgid "~S is a package name, so it cannot be a nickname for ~S."
-msgstr "~S isway away ackagepay amenay, osay itway annotcay ebay away icknamenay orfay ~S."
+msgstr ""
+"~S isway away ackagepay amenay, osay itway annotcay ebay away icknamenay "
+"orfay ~S."
 
 #: src/code/package.lisp
 msgid "Ignore this nickname."
@@ -10136,10 +11619,14 @@ msgid ""
 "  estimates for the number of internal and external symbols which\n"
 "  will ultimately be present in the package."
 msgstr ""
-"Akesmay away ewnay ackagepay avinghay ethay ecifiedspay Amenay andway Icknamesnay.  Ethay\n"
-"  ackagepay illway inheritway allway externalway ymbolssay omfray eachway ackagepay inway\n"
-"  ethay useway istlay.  :Internalway-Ymbolssay andway :Externalway-Ymbolssay areway\n"
-"  estimatesway orfay ethay umbernay ofway internalway andway externalway ymbolssay ichwhay\n"
+"Akesmay away ewnay ackagepay avinghay ethay ecifiedspay Amenay andway "
+"Icknamesnay.  Ethay\n"
+"  ackagepay illway inheritway allway externalway ymbolssay omfray eachway "
+"ackagepay inway\n"
+"  ethay useway istlay.  :Internalway-Ymbolssay andway :Externalway-Ymbolssay "
+"areway\n"
+"  estimatesway orfay ethay umbernay ofway internalway andway externalway "
+"ymbolssay ichwhay\n"
 "  illway ultimatelyway ebay esentpray inway ethay ackagepay."
 
 #: src/code/package.lisp
@@ -10159,11 +11646,16 @@ msgid ""
 "   in the :Use list is not currently used, then it is added to the use\n"
 "   list."
 msgstr ""
-"Etssay *PACKAGE* otay ackagepay ithway ivengay NAME, eatingcray ethay ackagepay ifway\n"
-"   itway oesday otnay existway.  Ifway ethay ackagepay alreadyway existsway enthay itway isway odifiedmay\n"
-"   otay agreeway ithway ethay :USE andway :NICKNAMES argumentsway.  Anyway ewnay icknamesnay\n"
-"   areway addedway ithoutway emovingray anyway oldway onesway otnay ecifiedspay.  Ifway anyway ackagepay\n"
-"   inway ethay :Useway istlay isway otnay urrentlycay usedway, enthay itway isway addedway otay ethay useway\n"
+"Etssay *PACKAGE* otay ackagepay ithway ivengay NAME, eatingcray ethay "
+"ackagepay ifway\n"
+"   itway oesday otnay existway.  Ifway ethay ackagepay alreadyway existsway "
+"enthay itway isway odifiedmay\n"
+"   otay agreeway ithway ethay :USE andway :NICKNAMES argumentsway.  Anyway "
+"ewnay icknamesnay\n"
+"   areway addedway ithoutway emovingray anyway oldway onesway otnay "
+"ecifiedspay.  Ifway anyway ackagepay\n"
+"   inway ethay :Useway istlay isway otnay urrentlycay usedway, enthay itway "
+"isway addedway otay ethay useway\n"
 "   istlay."
 
 #: src/code/package.lisp
@@ -10184,7 +11676,9 @@ msgstr "Away ackagepay amednay ~S alreadyway existsway."
 
 #: src/code/package.lisp
 msgid "Delete the PACKAGE-OR-NAME from the package system data structures."
-msgstr "Eleteday ethay PACKAGE-OR-NAME omfray ethay ackagepay ystemsay ataday ucturesstray."
+msgstr ""
+"Eleteday ethay PACKAGE-OR-NAME omfray ethay ackagepay ystemsay ataday "
+"ucturesstray."
 
 #: src/code/package.lisp
 msgid "No package of name ~S."
@@ -10204,7 +11698,9 @@ msgstr "Eturnsray away istlay ofway allway existingway ackagespay."
 
 #: src/code/package.lisp
 msgid "Returns a symbol having the specified name, creating it if necessary."
-msgstr "Eturnsray away ymbolsay avinghay ethay ecifiedspay amenay, eatingcray itway ifway ecessarynay."
+msgstr ""
+"Eturnsray away ymbolsay avinghay ethay ecifiedspay amenay, eatingcray itway "
+"ifway ecessarynay."
 
 #: src/code/package.lisp
 msgid ""
@@ -10213,9 +11709,12 @@ msgid ""
 "  how the symbol is accessible.  If no symbol is found then both values\n"
 "  are NIL."
 msgstr ""
-"Eturnsray ethay ymbolsay NAME inway PACKAGE.  Ifway uchsay away ymbolsay isway oundfay\n"
-"  enthay ethay econdsay aluevay isway :internalway, :externalway orway :inheritedway otay indicateway\n"
-"  owhay ethay ymbolsay isway accessibleway.  Ifway onay ymbolsay isway oundfay enthay othbay aluesvay\n"
+"Eturnsray ethay ymbolsay NAME inway PACKAGE.  Ifway uchsay away ymbolsay "
+"isway oundfay\n"
+"  enthay ethay econdsay aluevay isway :internalway, :externalway orway :"
+"inheritedway otay indicateway\n"
+"  owhay ethay ymbolsay isway accessibleway.  Ifway onay ymbolsay isway "
+"oundfay enthay othbay aluesvay\n"
 "  areway NIL."
 
 #: src/code/package.lisp
@@ -10224,8 +11723,10 @@ msgid ""
 "  then T is returned, otherwise NIL.  If PACKAGE is SYMBOL's home\n"
 "  package, then it is made uninterned."
 msgstr ""
-"Akesmay SYMBOL onay ongerlay esentpray inway PACKAGE.  Ifway SYMBOL asway esentpray\n"
-"  enthay T isway eturnedray, otherwiseway NIL.  Ifway PACKAGE isway SYMBOL's omehay\n"
+"Akesmay SYMBOL onay ongerlay esentpray inway PACKAGE.  Ifway SYMBOL asway "
+"esentpray\n"
+"  enthay T isway eturnedray, otherwiseway NIL.  Ifway PACKAGE isway SYMBOL's "
+"omehay\n"
 "  ackagepay, enthay itway isway ademay uninternedway."
 
 #: src/code/package.lisp
@@ -10246,7 +11747,9 @@ msgstr "omptpray orfay away ymbolsay otay adowingshay-importway."
 
 #: src/code/package.lisp
 msgid "Uninterning symbol ~S causes name conflict among these symbols:~%~S"
-msgstr "Uninterningway ymbolsay ~S ausescay amenay onflictcay amongway esethay ymbolssay:~%~S"
+msgstr ""
+"Uninterningway ymbolsay ~S ausescay amenay onflictcay amongway esethay "
+"ymbolssay:~%~S"
 
 #: src/code/package.lisp
 msgid "Symbol to shadowing-import: "
@@ -10266,15 +11769,18 @@ msgstr "~S isway eithernay away ymbolsay ornay away istlay ofway ymbolssay."
 
 #: src/code/package.lisp
 msgid "Exports SYMBOLS from PACKAGE, checking that no name conflicts result."
-msgstr "Exportsway SYMBOLS omfray PACKAGE, eckingchay atthay onay amenay onflictscay esultray."
+msgstr ""
+"Exportsway SYMBOLS omfray PACKAGE, eckingchay atthay onay amenay onflictscay "
+"esultray."
 
 #: src/code/package.lisp
 msgid ""
 "Exporting these symbols from the ~A package:~%~S~%~\n"
-"	      results in name conflicts with these packages:~%~{~A ~}"
+"\t      results in name conflicts with these packages:~%~{~A ~}"
 msgstr ""
 "Exportingway esethay ymbolssay omfray ethay ~Away ackagepay:~%~S~%~\n"
-"	      esultsray inway amenay onflictscay ithway esethay ackagespay:~%~{~Away ~}"
+"\t      esultsray inway amenay onflictscay ithway esethay ackagespay:~%~"
+"{~Away ~}"
 
 #: src/code/package.lisp
 msgid "Unintern conflicting symbols."
@@ -10286,7 +11792,8 @@ msgstr "Kipsay exportingway onflictingcay ymbolssay."
 
 #: src/code/package.lisp
 msgid "These symbols are not accessible in the ~A package:~%~S"
-msgstr "Esethay ymbolssay areway otnay accessibleway inway ethay ~Away ackagepay:~%~S"
+msgstr ""
+"Esethay ymbolssay areway otnay accessibleway inway ethay ~Away ackagepay:~%~S"
 
 #: src/code/package.lisp
 msgid "Import these symbols into the ~A package."
@@ -10310,17 +11817,20 @@ msgid ""
 "  is already accessible then it has no effect.  If a name conflict\n"
 "  would result from the importation, then a correctable error is signalled."
 msgstr ""
-"Akemay SYMBOLS accessibleway asway internalway ymbolssay inway PACKAGE.  Ifway away ymbolsay\n"
-"  isway alreadyway accessibleway enthay itway ashay onay effectway.  Ifway away amenay onflictcay\n"
-"  ouldway esultray omfray ethay importationway, enthay away orrectablecay errorway isway ignalledsay."
+"Akemay SYMBOLS accessibleway asway internalway ymbolssay inway PACKAGE.  "
+"Ifway away ymbolsay\n"
+"  isway alreadyway accessibleway enthay itway ashay onay effectway.  Ifway "
+"away amenay onflictcay\n"
+"  ouldway esultray omfray ethay importationway, enthay away orrectablecay "
+"errorway isway ignalledsay."
 
 #: src/code/package.lisp
 msgid ""
 "Importing these symbols into the ~A package ~\n"
-"		causes a name conflict:~%~S"
+"\t\tcauses a name conflict:~%~S"
 msgstr ""
 "Importingway esethay ymbolssay intoway ethay ~Away ackagepay ~\n"
-"		ausescay away amenay onflictcay:~%~S"
+"\t\tausescay away amenay onflictcay:~%~S"
 
 #: src/code/package.lisp
 msgid "Import these symbols with Shadowing-Import."
@@ -10332,24 +11842,29 @@ msgid ""
 "  a symbol of the same name is present, then it is uninterned.\n"
 "  The symbols are added to the Package-Shadowing-Symbols."
 msgstr ""
-"Importway SYMBOLS intoway PACKAGE, isregardingday anyway amenay onflictcay.  Ifway\n"
-"  away ymbolsay ofway ethay amesay amenay isway esentpray, enthay itway isway uninternedway.\n"
+"Importway SYMBOLS intoway PACKAGE, isregardingday anyway amenay onflictcay.  "
+"Ifway\n"
+"  away ymbolsay ofway ethay amesay amenay isway esentpray, enthay itway "
+"isway uninternedway.\n"
 "  Ethay ymbolssay areway addedway otay ethay Ackagepay-Adowingshay-Ymbolssay."
 
 #: src/code/package.lisp
 msgid ""
 "Make an internal symbol in PACKAGE with the same name as each of the\n"
-"  specified SYMBOLS, adding the new symbols to the Package-Shadowing-Symbols"
-".\n"
+"  specified SYMBOLS, adding the new symbols to the Package-Shadowing-"
+"Symbols.\n"
 "  If a symbol with the given name is already present in PACKAGE, then\n"
 "  the existing symbol is placed in the shadowing symbols list if it is\n"
 "  not already present."
 msgstr ""
-"Akemay anway internalway ymbolsay inway PACKAGE ithway ethay amesay amenay asway eachway ofway ethay\n"
-"  ecifiedspay SYMBOLS, addingway ethay ewnay ymbolssay otay ethay Ackagepay-Adowingshay-Ymbolssay"
-".\n"
-"  Ifway away ymbolsay ithway ethay ivengay amenay isway alreadyway esentpray inway PACKAGE, enthay\n"
-"  ethay existingway ymbolsay isway acedplay inway ethay adowingshay ymbolssay istlay ifway itway isway\n"
+"Akemay anway internalway ymbolsay inway PACKAGE ithway ethay amesay amenay "
+"asway eachway ofway ethay\n"
+"  ecifiedspay SYMBOLS, addingway ethay ewnay ymbolssay otay ethay Ackagepay-"
+"Adowingshay-Ymbolssay.\n"
+"  Ifway away ymbolsay ithway ethay ivengay amenay isway alreadyway esentpray "
+"inway PACKAGE, enthay\n"
+"  ethay existingway ymbolsay isway acedplay inway ethay adowingshay "
+"ymbolssay istlay ifway itway isway\n"
 "  otnay alreadyway esentpray."
 
 #: src/code/package.lisp
@@ -10358,17 +11873,22 @@ msgid ""
 "  the external symbols of the used packages are accessible as internal\n"
 "  symbols in PACKAGE."
 msgstr ""
-"Addway allway ethay PACKAGES-TO-USE otay ethay useway istlay orfay PACKAGE osay atthay\n"
-"  ethay externalway ymbolssay ofway ethay usedway ackagespay areway accessibleway asway internalway\n"
+"Addway allway ethay PACKAGES-TO-USE otay ethay useway istlay orfay PACKAGE "
+"osay atthay\n"
+"  ethay externalway ymbolssay ofway ethay usedway ackagespay areway "
+"accessibleway asway internalway\n"
 "  ymbolssay inway PACKAGE."
 
 #: src/code/package.lisp
 msgid "Unintern the conflicting symbols in the ~2*~A package."
-msgstr "Uninternway ethay onflictingcay ymbolssay inway ethay ~2*~Away ackagepay."
+msgstr ""
+"Uninternway ethay onflictingcay ymbolssay inway ethay ~2*~Away ackagepay."
 
 #: src/code/package.lisp
 msgid "Use'ing package ~A results in name conflicts for these symbols:~%~S"
-msgstr "Useway'ingway ackagepay ~Away esultsray inway amenay onflictscay orfay esethay ymbolssay:~%~S"
+msgstr ""
+"Useway'ingway ackagepay ~Away esultsray inway amenay onflictscay orfay "
+"esethay ymbolssay:~%~S"
 
 #: src/code/package.lisp
 msgid "Remove PACKAGES-TO-UNUSE from the use list for PACKAGE."
@@ -10376,7 +11896,9 @@ msgstr "Emoveray PACKAGES-TO-UNUSE omfray ethay useway istlay orfay PACKAGE."
 
 #: src/code/package.lisp
 msgid "Return a list of all symbols in the system having the specified name."
-msgstr "Eturnray away istlay ofway allway ymbolssay inway ethay ystemsay avinghay ethay ecifiedspay amenay."
+msgstr ""
+"Eturnray away istlay ofway allway ymbolssay inway ethay ystemsay avinghay "
+"ethay ecifiedspay amenay."
 
 #: src/code/describe.lisp src/code/package.lisp
 msgid "special variable"
@@ -10430,7 +11952,8 @@ msgid ""
 "  symbols exported from the specified package."
 msgstr ""
 "Allcay FUN ithway eachway ymbolsay atthay ontainscay STRING.\n"
-"  Ifway PACKAGE isway uppliedsay enthay onlyway useway ymbolssay esentpray inway\n"
+"  Ifway PACKAGE isway uppliedsay enthay onlyway useway ymbolssay esentpray "
+"inway\n"
 "  atthay ackagepay.  Ifway EXTERNAL-ONLY isway uetray enthay onlyway useway\n"
 "  ymbolssay exportedway omfray ethay ecifiedspay ackagepay."
 
@@ -10441,9 +11964,12 @@ msgid ""
 "  that package.  If EXTERNAL-ONLY is non-NIL then only describe\n"
 "  external symbols in the specified package."
 msgstr ""
-"Ieflybray escribeday allway ymbolssay ichwhay ontaincay ethay ecifiedspay STRING.\n"
-"  Ifway PACKAGE isway uppliedsay enthay onlyway escribeday ymbolssay esentpray inway\n"
-"  atthay ackagepay.  Ifway EXTERNAL-ONLY isway onnay-NIL enthay onlyway escribeday\n"
+"Ieflybray escribeday allway ymbolssay ichwhay ontaincay ethay ecifiedspay "
+"STRING.\n"
+"  Ifway PACKAGE isway uppliedsay enthay onlyway escribeday ymbolssay "
+"esentpray inway\n"
+"  atthay ackagepay.  Ifway EXTERNAL-ONLY isway onnay-NIL enthay onlyway "
+"escribeday\n"
 "  externalway ymbolssay inway ethay ecifiedspay ackagepay."
 
 #: src/code/package.lisp
@@ -10451,7 +11977,8 @@ msgid ""
 "Identical to APROPOS, except that it returns a list of the symbols\n"
 "  found instead of describing them."
 msgstr ""
-"Identicalway otay APROPOS, exceptway atthay itway eturnsray away istlay ofway ethay ymbolssay\n"
+"Identicalway otay APROPOS, exceptway atthay itway eturnsray away istlay "
+"ofway ethay ymbolssay\n"
 "  oundfay insteadway ofway escribingday emthay."
 
 #: src/code/reader.lisp
@@ -10475,12 +12002,15 @@ msgid ""
 "Standard lisp readtable. This is for recovery from broken\n"
 "   read-tables, and should not normally be user-visible."
 msgstr ""
-"Tandardsay isplay eadtableray. Isthay isway orfay ecoveryray omfray okenbray\n"
+"Tandardsay isplay eadtableray. Isthay isway orfay ecoveryray omfray "
+"okenbray\n"
 "   eadray-ablestay, andway ouldshay otnay ormallynay ebay userway-isiblevay."
 
 #: src/code/reader.lisp
 msgid "Value of *package* at the start of the last read or Nil."
-msgstr "Aluevay ofway *package* atway ethay tartsay ofway ethay astlay eadray orway Ilnay."
+msgstr ""
+"Aluevay ofway *package* atway ethay tartsay ofway ethay astlay eadray orway "
+"Ilnay."
 
 #: src/code/reader.lisp
 msgid "Undefined read-macro character ~S"
@@ -10488,7 +12018,9 @@ msgstr "Undefinedway eadray-acromay aracterchay ~S"
 
 #: src/code/reader.lisp
 msgid "A copy is made of from-readtable and place into to-readtable."
-msgstr "Away opycay isway ademay ofway omfray-eadtableray andway aceplay intoway otay-eadtableray."
+msgstr ""
+"Away opycay isway ademay ofway omfray-eadtableray andway aceplay intoway "
+"otay-eadtableray."
 
 #: src/code/reader.lisp
 msgid ""
@@ -10496,9 +12028,12 @@ msgid ""
 "  optional readtable (defaults to the current readtable).  The\n"
 "  from-table defaults the standard lisp readtable by being nil."
 msgstr ""
-"Ausescay ethay yntaxsay ofway otay-archay otay ebay ethay amesay asway omfray-archay inway ethay \n"
-"  optionalway eadtableray (efaultsday otay ethay urrentcay eadtableray).  Ethay\n"
-"  omfray-abletay efaultsday ethay tandardsay isplay eadtableray ybay eingbay ilnay."
+"Ausescay ethay yntaxsay ofway otay-archay otay ebay ethay amesay asway "
+"omfray-archay inway ethay \n"
+"  optionalway eadtableray (efaultsday otay ethay urrentcay eadtableray).  "
+"Ethay\n"
+"  omfray-abletay efaultsday ethay tandardsay isplay eadtableray ybay eingbay "
+"ilnay."
 
 #: src/code/reader.lisp
 msgid ""
@@ -10508,10 +12043,14 @@ msgid ""
 "   argument defaults to the current readtable.  Set-macro-character\n"
 "   returns T."
 msgstr ""
-"Ausescay archay otay ebay away acromay aracterchay ichwhay invokesway unctionfay enwhay\n"
-"   eensay ybay ethay eaderray.  Ethay onnay-erminatingptay agflay ancay ebay usedway otay\n"
-"   akemay ethay acromay aracterchay onnay-erminatingtay.  Ethay optionalway eadtableray\n"
-"   argumentway efaultsday otay ethay urrentcay eadtableray.  Etsay-acromay-aracterchay\n"
+"Ausescay archay otay ebay away acromay aracterchay ichwhay invokesway "
+"unctionfay enwhay\n"
+"   eensay ybay ethay eaderray.  Ethay onnay-erminatingptay agflay ancay ebay "
+"usedway otay\n"
+"   akemay ethay acromay aracterchay onnay-erminatingtay.  Ethay optionalway "
+"eadtableray\n"
+"   argumentway efaultsday otay ethay urrentcay eadtableray.  Etsay-acromay-"
+"aracterchay\n"
 "   eturnsray T."
 
 #: src/code/reader.lisp
@@ -10520,26 +12059,30 @@ msgid ""
 "  character.  The optional readtable argument defaults to the current\n"
 "  readtable."
 msgstr ""
-"Eturnsray ethay unctionfay associatedway ithway ethay ecifiedspay archay ichwhay isway away acromay\n"
-"  aracterchay.  Ethay optionalway eadtableray argumentway efaultsday otay ethay urrentcay\n"
+"Eturnsray ethay unctionfay associatedway ithway ethay ecifiedspay archay "
+"ichwhay isway away acromay\n"
+"  aracterchay.  Ethay optionalway eadtableray argumentway efaultsday otay "
+"ethay urrentcay\n"
 "  eadtableray."
 
 #: src/code/reader.lisp
 msgid "Bind *read-buffer* to a fresh buffer and execute Body."
-msgstr "Indbay *read-buffer* otay away eshfray ufferbay andway executeway Odybay."
+msgstr ""
+"Indbay *read-buffer* otay away eshfray ufferbay andway executeway Odybay."
 
 #: src/code/reader.lisp
-msgid ""
-"If true, only warn when there is an extra close paren, otherwise error."
+msgid "If true, only warn when there is an extra close paren, otherwise error."
 msgstr ""
-"Ifway uetray, onlyway arnway enwhay erethay isway anway extraway oseclay arenpay, otherwiseway errorway."
+"Ifway uetray, onlyway arnway enwhay erethay isway anway extraway oseclay "
+"arenpay, otherwiseway errorway."
 
 #: src/code/reader.lisp
 msgid ""
 "Reads from stream and returns the object read, preserving the whitespace\n"
 "   that followed the object."
 msgstr ""
-"Eadsray omfray eamstray andway eturnsray ethay objectway eadray, eservingpray ethay itespacewhay\n"
+"Eadsray omfray eamstray andway eturnsray ethay objectway eadray, "
+"eservingpray ethay itespacewhay\n"
 "   atthay ollowedfay ethay objectway."
 
 #: src/code/reader.lisp
@@ -10548,7 +12091,8 @@ msgid ""
 "   *standard-input*. For details see the I/O chapter of\n"
 "   the manual."
 msgstr ""
-"Eadsray inway ethay extnay objectway inway ethay eamstray, ichwhay efaultsday otay\n"
+"Eadsray inway ethay extnay objectway inway ethay eamstray, ichwhay "
+"efaultsday otay\n"
 "   *standard-input*. Orfay etailsday eesay ethay Iway/O apterchay ofway\n"
 "   ethay anualmay."
 
@@ -10558,8 +12102,10 @@ msgid ""
 "   object's representation is endchar.  A list of those objects read\n"
 "   is returned."
 msgstr ""
-"Eadsray objectsway omfray inputway-eamstray untilway ethay extnay aracterchay afterway anway\n"
-"   objectway's epresentationray isway endcharway.  Away istlay ofway osethay objectsway eadray\n"
+"Eadsray objectsway omfray inputway-eamstray untilway ethay extnay "
+"aracterchay afterway anway\n"
+"   objectway's epresentationray isway endcharway.  Away istlay ofway osethay "
+"objectsway eadray\n"
 "   isway eturnedray."
 
 #: src/code/reader.lisp
@@ -10575,10 +12121,12 @@ msgid "More than one object follows . in list."
 msgstr "Oremay anthay oneway objectway ollowsfay . inway istlay."
 
 #: src/code/reader.lisp
-msgid "Ignoring unmatched close parenthesis~\n"
-"		  ~@[ at file position ~D~]."
-msgstr "Ignoringway unmatchedway oseclay arenthesispay~\n"
-"		  ~@[ atway ilefay ositionpay ~D~]."
+msgid ""
+"Ignoring unmatched close parenthesis~\n"
+"\t\t  ~@[ at file position ~D~]."
+msgstr ""
+"Ignoringway unmatchedway oseclay arenthesispay~\n"
+"\t\t  ~@[ atway ilefay ositionpay ~D~]."
 
 #: src/code/reader.lisp
 msgid "Unmatched close parenthesis."
@@ -10642,7 +12190,9 @@ msgstr "Ymbolsay ~S otnay oundfay inway ethay ~Away ackagepay."
 
 #: src/code/reader.lisp
 msgid "This function is just an fsm that recognizes numbers and symbols."
-msgstr "Isthay unctionfay isway ustjay anway smfay atthay ecognizesray umbersnay andway ymbolssay."
+msgstr ""
+"Isthay unctionfay isway ustjay anway smfay atthay ecognizesray umbersnay "
+"andway ymbolssay."
 
 #: src/code/reader.lisp
 msgid ""
@@ -10650,8 +12200,10 @@ msgid ""
 "   a flag for whether there was an escape char, and the position of any\n"
 "   package delimiter."
 msgstr ""
-"Orfay emisay-externalway useway: eturnsray 3 aluesvay: ethay ingstray orfay ethay okentay,\n"
-"   away agflay orfay etherwhay erethay asway anway escapeway archay, andway ethay ositionpay ofway anyway\n"
+"Orfay emisay-externalway useway: eturnsray 3 aluesvay: ethay ingstray orfay "
+"ethay okentay,\n"
+"   away agflay orfay etherwhay erethay asway anway escapeway archay, andway "
+"ethay ositionpay ofway anyway\n"
 "   ackagepay elimiterday."
 
 #: src/code/reader.lisp
@@ -10663,25 +12215,30 @@ msgid ""
 "For semi-external use: read an extended token with the first character\n"
 "  escaped.  Returns the string for the token."
 msgstr ""
-"Orfay emisay-externalway useway: eadray anway extendedway okentay ithway ethay irstfay aracterchay\n"
+"Orfay emisay-externalway useway: eadray anway extendedway okentay ithway "
+"ethay irstfay aracterchay\n"
 "  escapedway.  Eturnsray ethay ingstray orfay ethay okentay."
 
 #: src/code/reader.lisp
 msgid ""
 "Holds the mapping of base to 'safe' number of digits to read for a fixnum."
 msgstr ""
-"Oldshay ethay appingmay ofway asebay otay 'afesay' umbernay ofway igitsday otay eadray orfay away ixnumfay."
+"Oldshay ethay appingmay ofway asebay otay 'afesay' umbernay ofway igitsday "
+"otay eadray orfay away ixnumfay."
 
 #: src/code/reader.lisp
 msgid "Holds the largest fixnum power of the base for make-integer."
-msgstr "Oldshay ethay argestlay ixnumfay owerpay ofway ethay asebay orfay akemay-integerway."
+msgstr ""
+"Oldshay ethay argestlay ixnumfay owerpay ofway ethay asebay orfay akemay-"
+"integerway."
 
 #: src/code/reader.lisp
 msgid ""
 "Minimizes bignum-fixnum multiplies by reading a 'safe' number of digits, \n"
 "  then multiplying by a power of the base and adding."
 msgstr ""
-"Inimizesmay ignumbay-ixnumfay ultipliesmay ybay eadingray away 'afesay' umbernay ofway igitsday, \n"
+"Inimizesmay ignumbay-ixnumfay ultipliesmay ybay eadingray away 'afesay' "
+"umbernay ofway igitsday, \n"
 "  enthay ultiplyingmay ybay away owerpay ofway ethay asebay andway addingway."
 
 #: src/code/reader.lisp
@@ -10692,10 +12249,12 @@ msgid ""
 "to\n"
 "the end of the stream."
 msgstr ""
-"Astfay ignumbay-eadingray interfaceway.  Eadsray omfray eamstray S anway integerway inway adixray\n"
-"R.  Ifway eway indfay omesay indkay ofway errorway (adbay aracterschay, EOF), enthay NIL isway\n"
-"eturnedray; otherwiseway ethay umbernay.  Eadsray atway eastlay oneway igitday, utbay aymay otnay etgay "
-"otay\n"
+"Astfay ignumbay-eadingray interfaceway.  Eadsray omfray eamstray S anway "
+"integerway inway adixray\n"
+"R.  Ifway eway indfay omesay indkay ofway errorway (adbay aracterschay, "
+"EOF), enthay NIL isway\n"
+"eturnedray; otherwiseway ethay umbernay.  Eadsray atway eastlay oneway "
+"igitday, utbay aymay otnay etgay otay\n"
 "ethay endway ofway ethay eamstray."
 
 #: src/code/reader.lisp
@@ -10725,9 +12284,12 @@ msgid ""
 "   flag is set to T, the char will be non-terminating.  Make-dispatch-\n"
 "   macro-character returns T."
 msgstr ""
-"Ausescay archay otay ecomebay away ispatchingday acromay aracterchay inway eadtableray\n"
-"   (ichwhay efaultsday otay ethay urrentcay eadtableray).  Ifway ethay onnay-erminatingtay-p\n"
-"   agflay isway etsay otay T, ethay archay illway ebay onnay-erminatingtay.  Akemay-ispatchday-\n"
+"Ausescay archay otay ecomebay away ispatchingday acromay aracterchay inway "
+"eadtableray\n"
+"   (ichwhay efaultsday otay ethay urrentcay eadtableray).  Ifway ethay onnay-"
+"erminatingtay-p\n"
+"   agflay isway etsay otay T, ethay archay illway ebay onnay-erminatingtay.  "
+"Akemay-ispatchday-\n"
 "   acromay-aracterchay eturnsray T."
 
 #: src/code/reader.lisp
@@ -10745,7 +12307,8 @@ msgid ""
 "   returns T."
 msgstr ""
 "Ausescay unctionfay otay ebay alledcay eneverwhay ethay eaderray eadsray\n"
-"   ispday-archay ollowedfay ybay ubsay-archay. Etsay-ispatchday-acromay-aracterchay\n"
+"   ispday-archay ollowedfay ybay ubsay-archay. Etsay-ispatchday-acromay-"
+"aracterchay\n"
 "   eturnsray T."
 
 #: src/code/reader.lisp
@@ -10753,7 +12316,8 @@ msgid ""
 "Returns the macro character function for sub-char under disp-char\n"
 "   or nil if there is no associated function."
 msgstr ""
-"Eturnsray ethay acromay aracterchay unctionfay orfay ubsay-archay underway ispday-archay\n"
+"Eturnsray ethay acromay aracterchay unctionfay orfay ubsay-archay underway "
+"ispday-archay\n"
 "   orway ilnay ifway erethay isway onay associatedway unctionfay."
 
 #: src/code/reader.lisp
@@ -10774,8 +12338,10 @@ msgid ""
 "   and the lisp object built by the reader is returned.  Macro chars\n"
 "   will take effect."
 msgstr ""
-"Ethay aracterschay ofway ingstray areway uccessivelysay ivengay otay ethay isplay eaderray\n"
-"   andway ethay isplay objectway uiltbay ybay ethay eaderray isway eturnedray.  Acromay arschay\n"
+"Ethay aracterschay ofway ingstray areway uccessivelysay ivengay otay ethay "
+"isplay eaderray\n"
+"   andway ethay isplay objectway uiltbay ybay ethay eaderray isway "
+"eturnedray.  Acromay arschay\n"
 "   illway aketay effectway."
 
 #: src/code/reader.lisp
@@ -10793,9 +12359,12 @@ msgid ""
 "  whitespace characters and then tries to parse an integer.  The\n"
 "  radix parameter must be between 2 and 36."
 msgstr ""
-"Examineway ethay ubstringsay ofway ingstray elimitedday ybay tartsay andway endway\n"
-"  (efaultday otay ethay eginningbay andway endway ofway ethay ingstray)  Itway kipssay overway\n"
-"  itespacewhay aracterschay andway enthay iestray otay arsepay anway integerway.  Ethay\n"
+"Examineway ethay ubstringsay ofway ingstray elimitedday ybay tartsay andway "
+"endway\n"
+"  (efaultday otay ethay eginningbay andway endway ofway ethay ingstray)  "
+"Itway kipssay overway\n"
+"  itespacewhay aracterschay andway enthay iestray otay arsepay anway "
+"integerway.  Ethay\n"
 "  adixray arameterpay ustmay ebay etweenbay 2 andway 36."
 
 #: src/code/sharpm.lisp
@@ -10820,7 +12389,9 @@ msgstr "Escapeway aracterchay appearedway afterway #*"
 
 #: src/code/sharpm.lisp
 msgid "You have to give a little bit for non-zero #* bit-vectors."
-msgstr "Ouyay avehay otay ivegay away ittlelay itbay orfay onnay-erozay #* itbay-ectorsvay."
+msgstr ""
+"Ouyay avehay otay ivegay away ittlelay itbay orfay onnay-erozay #* itbay-"
+"ectorsvay."
 
 #: src/code/sharpm.lisp
 msgid "Illegal element given for bit-vector: ~S"
@@ -10855,10 +12426,12 @@ msgid "#~A (base ~D) value is not a rational: ~S."
 msgstr "#~Away (asebay ~D) aluevay isway otnay away ationalray: ~S."
 
 #: src/code/sharpm.lisp
-msgid "#~DA axis ~D is empty, but axis ~\n"
-"				          ~D is non-empty."
-msgstr "#~DA axisway ~D isway emptyway, utbay axisway ~\n"
-"				          ~D isway onnay-emptyway."
+msgid ""
+"#~DA axis ~D is empty, but axis ~\n"
+"\t\t\t\t          ~D is non-empty."
+msgstr ""
+"#~DA axisway ~D isway emptyway, utbay axisway ~\n"
+"\t\t\t\t          ~D isway onnay-emptyway."
 
 #: src/code/sharpm.lisp
 msgid "Non-list following #S: ~S"
@@ -10944,14 +12517,20 @@ msgid ""
 "  splicing with other forms: a value of T or :NCONC meaning that an extra\n"
 "  level of parentheses should be added."
 msgstr ""
-"Ivengay away isplay ormfay ontainingcay ethay agicmay unctionsfay BACKQ-LIST, BACKQ-Ist*Lay,\n"
-"  BACKQ-APPEND, etcway. oducedpray ybay ethay ackquotebay eaderray acromay, illway eturnray away\n"
-"  orrespondingcay ackquotebay inputway ormfay.  Inway isthay ormfay, `,' `,@' andway `,.' areway\n"
-"  epresentedray ybay istslay osewhay arscay areway BACKQ-COMMA, BACKQ-COMMA-AT, andway\n"
-"  BACKQ-COMMA-DOT espectivelyray, andway osewhay adrscay areway ethay ormfay afterway ethay "
-"ommacay.\n"
-"  SPLICING indicatesway etherwhay away ommacay-escapeway eturnray ouldshay ebay odifiedmay orfay\n"
-"  licingspay ithway otherway ormsfay: away aluevay ofway T orway :NCONC eaningmay atthay anway extraway\n"
+"Ivengay away isplay ormfay ontainingcay ethay agicmay unctionsfay BACKQ-"
+"LIST, BACKQ-Ist*Lay,\n"
+"  BACKQ-APPEND, etcway. oducedpray ybay ethay ackquotebay eaderray acromay, "
+"illway eturnray away\n"
+"  orrespondingcay ackquotebay inputway ormfay.  Inway isthay ormfay, `,' `,"
+"@' andway `,.' areway\n"
+"  epresentedray ybay istslay osewhay arscay areway BACKQ-COMMA, BACKQ-COMMA-"
+"AT, andway\n"
+"  BACKQ-COMMA-DOT espectivelyray, andway osewhay adrscay areway ethay ormfay "
+"afterway ethay ommacay.\n"
+"  SPLICING indicatesway etherwhay away ommacay-escapeway eturnray ouldshay "
+"ebay odifiedmay orfay\n"
+"  licingspay ithway otherway ormsfay: away aluevay ofway T orway :NCONC "
+"eaningmay atthay anway extraway\n"
 "  evellay ofway arenthesespay ouldshay ebay addedway."
 
 #: src/code/backq.lisp
@@ -10963,7 +12542,8 @@ msgid ""
 "Make an object set for use by a RPC/xevent server.  Name is for\n"
 "      descriptive purposes only."
 msgstr ""
-"Akemay anway objectway etsay orfay useway ybay away RPC/eventxay erversay.  Amenay isway orfay\n"
+"Akemay anway objectway etsay orfay useway ybay away RPC/eventxay erversay.  "
+"Amenay isway orfay\n"
 "      escriptiveday urposespay onlyway."
 
 #: src/code/serve-event.lisp
@@ -10974,7 +12554,8 @@ msgstr "Ouyay oselay, objectway: ~S"
 msgid ""
 "Return as multiple values the object and object-set mapped to by xwindow."
 msgstr ""
-"Eturnray asway ultiplemay aluesvay ethay objectway andway objectway-etsay appedmay otay ybay windowxay."
+"Eturnray asway ultiplemay aluesvay ethay objectway andway objectway-etsay "
+"appedmay otay ybay windowxay."
 
 #: src/code/serve-event.lisp
 msgid "Add a new xwindow/object/object-set association."
@@ -10982,14 +12563,17 @@ msgstr "Addway away ewnay windowxay/objectway/objectway-etsay associationway."
 
 #: src/code/serve-event.lisp
 msgid "Remove xwindow and its associated object/object-set pair."
-msgstr "Emoveray windowxay andway itsway associatedway objectway/objectway-etsay airpay."
+msgstr ""
+"Emoveray windowxay andway itsway associatedway objectway/objectway-etsay "
+"airpay."
 
 #: src/code/serve-event.lisp
 msgid ""
 "Return the handler function in Object-Set for the operation specified by\n"
 "   Message-ID, if none, NIL is returned."
 msgstr ""
-"Eturnray ethay andlerhay unctionfay inway Objectway-Etsay orfay ethay operationway ecifiedspay ybay\n"
+"Eturnray ethay andlerhay unctionfay inway Objectway-Etsay orfay ethay "
+"operationway ecifiedspay ybay\n"
 "   Essagemay-ID, ifway onenay, NIL isway eturnedray."
 
 #: src/code/serve-event.lisp
@@ -10998,7 +12582,9 @@ msgstr "#<Andlerhay orfay ~Away onway ~:[~;BOGUS ~]escriptorday ~D: ~S>"
 
 #: src/code/serve-event.lisp
 msgid "List of all the currently active handlers for file descriptors"
-msgstr "Istlay ofway allway ethay urrentlycay activeway andlershay orfay ilefay escriptorsday"
+msgstr ""
+"Istlay ofway allway ethay urrentlycay activeway andlershay orfay ilefay "
+"escriptorsday"
 
 #: src/code/serve-event.lisp
 msgid ""
@@ -11006,8 +12592,10 @@ msgid ""
 "  either :INPUT or :OUTPUT. The value returned should be passed to\n"
 "  SYSTEM:REMOVE-FD-HANDLER when it is no longer needed."
 msgstr ""
-"Arangeway otay allcay FUNCTION eneverwhay FD isway usableway. DIRECTION ouldshay ebay\n"
-"  eitherway :INPUT orway :OUTPUT. Ethay aluevay eturnedray ouldshay ebay assedpay otay\n"
+"Arangeway otay allcay FUNCTION eneverwhay FD isway usableway. DIRECTION "
+"ouldshay ebay\n"
+"  eitherway :INPUT orway :OUTPUT. Ethay aluevay eturnedray ouldshay ebay "
+"assedpay otay\n"
 "  SYSTEM:REMOVE-FD-HANDLER enwhay itway isway onay ongerlay eedednay."
 
 #: src/code/serve-event.lisp
@@ -11023,7 +12611,8 @@ msgid ""
 "Remove any handers refering to FD. This should only be used when attempting\n"
 "  to recover from a detected inconsistency."
 msgstr ""
-"Emoveray anyway andershay eferingray otay FD. Isthay ouldshay onlyway ebay usedway enwhay attemptingway\n"
+"Emoveray anyway andershay eferingray otay FD. Isthay ouldshay onlyway ebay "
+"usedway enwhay attemptingway\n"
 "  otay ecoverray omfray away etectedday inconsistencyway."
 
 #: src/code/serve-event.lisp
@@ -11033,10 +12622,12 @@ msgid ""
 "to\n"
 "   use, and FUNCTION is the function to call whenever FD is usable."
 msgstr ""
-"Establishway away andlerhay ithway SYSTEM:ADD-FD-HANDLER orfay ethay urationday ofway BODY.\n"
-"   DIRECTION ouldshay ebay eitherway :INPUT orway :OUTPUT, FD isway ethay ilefay escriptorday "
-"otay\n"
-"   useway, andway FUNCTION isway ethay unctionfay otay allcay eneverwhay FD isway usableway."
+"Establishway away andlerhay ithway SYSTEM:ADD-FD-HANDLER orfay ethay "
+"urationday ofway BODY.\n"
+"   DIRECTION ouldshay ebay eitherway :INPUT orway :OUTPUT, FD isway ethay "
+"ilefay escriptorday otay\n"
+"   useway, andway FUNCTION isway ethay unctionfay otay allcay eneverwhay FD "
+"isway usableway."
 
 #.  This needs more work.
 #: src/code/serve-event.lisp
@@ -11068,9 +12659,10 @@ msgid ""
 "giving\n"
 "  up."
 msgstr ""
-"Aitway untilway FD isway usableway orfay DIRECTION. DIRECTION ouldshay ebay eitherway :INPUT orway\n"
-"  :OUTPUT. TIMEOUT, ifway uppliedsay, isway ethay umbernay ofway econdssay otay aitway eforebay "
-"ivinggay\n"
+"Aitway untilway FD isway usableway orfay DIRECTION. DIRECTION ouldshay ebay "
+"eitherway :INPUT orway\n"
+"  :OUTPUT. TIMEOUT, ifway uppliedsay, isway ethay umbernay ofway econdssay "
+"otay aitway eforebay ivinggay\n"
 "  upway."
 
 #: src/code/time.lisp src/code/serve-event.lisp
@@ -11084,9 +12676,12 @@ msgid ""
 "   this directly; use EXT:ENABLE-CLX-EVENT-HANDLING.  A given display\n"
 "   should be represented here only once."
 msgstr ""
-"Isthay isway anway alistway appingmay isplaysday otay userway unctionsfay otay ebay alledcay enwhay\n"
-"   SYSTEM:SERVE-EVENT oticesnay inputway onway away isplayday onnectioncay.  Oday otnay odifymay\n"
-"   isthay irectlyday; useway EXT:ENABLE-CLX-EVENT-HANDLING.  Away ivengay isplayday\n"
+"Isthay isway anway alistway appingmay isplaysday otay userway unctionsfay "
+"otay ebay alledcay enwhay\n"
+"   SYSTEM:SERVE-EVENT oticesnay inputway onway away isplayday onnectioncay.  "
+"Oday otnay odifymay\n"
+"   isthay irectlyday; useway EXT:ENABLE-CLX-EVENT-HANDLING.  Away ivengay "
+"isplayday\n"
 "   ouldshay ebay epresentedray erehay onlyway onceway."
 
 #: src/code/serve-event.lisp
@@ -11097,10 +12692,12 @@ msgid ""
 "  0 until all events have been served.  SERVE-ALL-EVENTS returns T if\n"
 "  SERVE-EVENT did something and NIL if not."
 msgstr ""
-"SERVE-ALL-EVENTS allscay SERVE-EVENT ithway ethay ecifiedspay imeouttay.  Ifway\n"
-"  SERVE-EVENT oesday omethingsay (eturnsray T) itway oopslay overway SERVE-EVENT ithway "
-"imeouttay\n"
-"  0 untilway allway eventsway avehay eenbay ervedsay.  SERVE-ALL-EVENTS eturnsray T ifway\n"
+"SERVE-ALL-EVENTS allscay SERVE-EVENT ithway ethay ecifiedspay imeouttay.  "
+"Ifway\n"
+"  SERVE-EVENT oesday omethingsay (eturnsray T) itway oopslay overway SERVE-"
+"EVENT ithway imeouttay\n"
+"  0 untilway allway eventsway avehay eenbay ervedsay.  SERVE-ALL-EVENTS "
+"eturnsray T ifway\n"
 "  SERVE-EVENT idday omethingsay andway NIL ifway otnay."
 
 #: src/code/serve-event.lisp
@@ -11111,34 +12708,41 @@ msgid ""
 "  seconds) and then return, otherwise it will wait until something happens.\n"
 "  Server returns T if something happened and NIL otherwise."
 msgstr ""
-"Eceiveray onway allway ortspay andway Eventsxay andway ispatchday otay ethay appropriateway andlerhay\n"
-"  unctionfay.  Ifway imeouttay isway ecifiedspay, erversay illway aitway ethay ecifiedspay imetay "
-"(inway\n"
-"  econdssay) andway enthay eturnray, otherwiseway itway illway aitway untilway omethingsay appenshay.\n"
+"Eceiveray onway allway ortspay andway Eventsxay andway ispatchday otay ethay "
+"appropriateway andlerhay\n"
+"  unctionfay.  Ifway imeouttay isway ecifiedspay, erversay illway aitway "
+"ethay ecifiedspay imetay (inway\n"
+"  econdssay) andway enthay eturnray, otherwiseway itway illway aitway "
+"untilway omethingsay appenshay.\n"
 "  Erversay eturnsray T ifway omethingsay appenedhay andway NIL otherwiseway."
 
 #: src/code/serve-event.lisp
 msgid "Event-listen was true, but handler didn't handle: ~%~S"
-msgstr "Eventway-istenlay asway uetray, utbay andlerhay idnday't andlehay: ~%~S"
+msgstr ""
+"Eventway-istenlay asway uetray, utbay andlerhay idnday't andlehay: ~%~S"
 
 #: src/code/extfmts.lisp
 msgid ""
 "The default external format to use if no other external format is\n"
 "  specified"
 msgstr ""
-"Ethay efaultday externalway ormatfay otay useway ifway onay otherway externalway ormatfay isway\n"
+"Ethay efaultday externalway ormatfay otay useway ifway onay otherway "
+"externalway ormatfay isway\n"
 "  ecifiedspay"
 
 #: src/code/extfmts.lisp
 msgid "Hash table of all the external formats that have been loaded"
-msgstr "Ashhay abletay ofway allway ethay externalway ormatsfay atthay avehay eenbay oadedlay"
+msgstr ""
+"Ashhay abletay ofway allway ethay externalway ormatsfay atthay avehay eenbay "
+"oadedlay"
 
 #: src/code/extfmts.lisp
 msgid ""
 "Hash table mapping an external format alias to the actual external\n"
 "  format implementation"
 msgstr ""
-"Ashhay abletay appingmay anway externalway ormatfay aliasway otay ethay actualway externalway\n"
+"Ashhay abletay appingmay anway externalway ormatfay aliasway otay ethay "
+"actualway externalway\n"
 "  ormatfay implementationway"
 
 #: src/code/extfmts.lisp
@@ -11164,9 +12768,12 @@ msgid ""
 "  format.  No distinction is made between external formats and\n"
 "  composing external formats."
 msgstr ""
-"Istlay ethay availableway externalway ormatsfay.  Away istlay isway eturnedray erewhay eachway\n"
-"  elementway isway istlay ofway ethay externalway ormatfay andway away istlay ofway aliasesway orfay ethay\n"
-"  ormatfay.  Onay istinctionday isway ademay etweenbay externalway ormatsfay andway\n"
+"Istlay ethay availableway externalway ormatsfay.  Away istlay isway "
+"eturnedray erewhay eachway\n"
+"  elementway isway istlay ofway ethay externalway ormatfay andway away "
+"istlay ofway aliasesway orfay ethay\n"
+"  ormatfay.  Onay istinctionday isway ademay etweenbay externalway ormatsfay "
+"andway\n"
 "  omposingcay externalway ormatsfay."
 
 #: src/code/extfmts.lisp
@@ -11175,8 +12782,10 @@ msgid ""
 "  the external format to be loaded (silently), if it is not already\n"
 "  loaded."
 msgstr ""
-"Intpray away escriptionday ofway ethay ivengay Externalway-Ormatfay.  Isthay aymay ausecay\n"
-"  ethay externalway ormatfay otay ebay oadedlay (ilentlysay), ifway itway isway otnay alreadyway\n"
+"Intpray away escriptionday ofway ethay ivengay Externalway-Ormatfay.  Isthay "
+"aymay ausecay\n"
+"  ethay externalway ormatfay otay ebay oadedlay (ilentlysay), ifway itway "
+"isway otnay alreadyway\n"
 "  oadedlay."
 
 #: src/code/extfmts.lisp
@@ -11221,7 +12830,9 @@ msgstr "Attemptingway Iway/O roughthay oidvay externalway-ormatfay."
 
 #: src/code/extfmts.lisp
 msgid "Void external format that signals an error on any input or output."
-msgstr "Oidvay externalway ormatfay atthay ignalssay anway errorway onway anyway inputway orway outputway."
+msgstr ""
+"Oidvay externalway ormatfay atthay ignalssay anway errorway onway anyway "
+"inputway orway outputway."
 
 #: src/code/extfmts.lisp
 msgid ""
@@ -11232,12 +12843,16 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"ISO8859-1 isway anway 8-itbay aracterchay encodingway enerallygay intendedway orfay\n"
-"Esternway Europeanway anguageslay includingway Englishway, Ermangay, Italianway,\n"
+"ISO8859-1 isway anway 8-itbay aracterchay encodingway enerallygay "
+"intendedway orfay\n"
+"Esternway Europeanway anguageslay includingway Englishway, Ermangay, "
+"Italianway,\n"
 "Orwegiannay, Ortuguesepay, Anishspay, Wedishsay andway anymay othersway.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 #: src/code/extfmts.lisp
 msgid ""
@@ -11246,9 +12861,12 @@ msgid ""
 "  the end of the string.  If Buffer is given, the octets are stored\n"
 "  there.  If not, a new buffer is created."
 msgstr ""
-"Onvertcay Ingstray otay octetsway usingway ethay ecifiedspay Externalway-ormatfay.  Ethay\n"
-"  ingstray isway oundedbay ybay Tartsay (efaultingday otay 0) andway Endway (efaultingday otay\n"
-"  ethay endway ofway ethay ingstray.  Ifway Ufferbay isway ivengay, ethay octetsway areway toredsay\n"
+"Onvertcay Ingstray otay octetsway usingway ethay ecifiedspay Externalway-"
+"ormatfay.  Ethay\n"
+"  ingstray isway oundedbay ybay Tartsay (efaultingday otay 0) andway Endway "
+"(efaultingday otay\n"
+"  ethay endway ofway ethay ingstray.  Ifway Ufferbay isway ivengay, ethay "
+"octetsway areway toredsay\n"
 "  erethay.  Ifway otnay, away ewnay ufferbay isway eatedcray."
 
 #: src/code/extfmts.lisp
@@ -11270,22 +12888,36 @@ msgid ""
 "  character would be read into the string, the number of octets\n"
 "  actually consumed and the new state of the external format."
 msgstr ""
-"Octetsway-otay-ingstray onvertscay anway arrayway ofway octetsway inway Octetsway otay away ingstray\n"
-"  accordingway otay ethay ecifiedspay Externalway-ormatfay.  Ethay arrayway ofway octetsway isway\n"
-"  oundedbay ybay Tartsay (efaultingday otway 0) andway Endway (efaultingday otay ethay endway ofway\n"
-"  ethay arrayway.  Ifway Ingstray isway otnay ivengay, away ewnay ingstray isway eatedcray.  Ifway\n"
-"  Ingstray isway ivengay, ethay onvertedcay octetsway areway toredsay inway Ingstray, tartingsay\n"
-"  atway S-Tartsay (efaultingday otay ethay 0) andway endingway atway S-Endway (efaultingday otay\n"
-"  ethay engthlay ofway Ingstray).  Ifway ethay ingstray isway otnay argelay enoughway otay oldhay\n"
-"  allway ofway aracterschay, enthay omesay octetsway illway otnay ebay onvertedcay.  Away Tatesay\n"
-"  aymay alsoway ebay ecifiedspay; isthay isway usedway asway ethay tatesay ofway ethay externalway\n"
-"  ormatfay.  Anway errorway ethodmay aymay alsoway ebay ecifiedspay ybay Errorway, ichwhay\n"
-"  efaultsday otay NIL otay eanmay ethay efaultday andlinghay ofway onversioncay errorsway isway\n"
+"Octetsway-otay-ingstray onvertscay anway arrayway ofway octetsway inway "
+"Octetsway otay away ingstray\n"
+"  accordingway otay ethay ecifiedspay Externalway-ormatfay.  Ethay arrayway "
+"ofway octetsway isway\n"
+"  oundedbay ybay Tartsay (efaultingday otway 0) andway Endway (efaultingday "
+"otay ethay endway ofway\n"
+"  ethay arrayway.  Ifway Ingstray isway otnay ivengay, away ewnay ingstray "
+"isway eatedcray.  Ifway\n"
+"  Ingstray isway ivengay, ethay onvertedcay octetsway areway toredsay inway "
+"Ingstray, tartingsay\n"
+"  atway S-Tartsay (efaultingday otay ethay 0) andway endingway atway S-"
+"Endway (efaultingday otay\n"
+"  ethay engthlay ofway Ingstray).  Ifway ethay ingstray isway otnay argelay "
+"enoughway otay oldhay\n"
+"  allway ofway aracterschay, enthay omesay octetsway illway otnay ebay "
+"onvertedcay.  Away Tatesay\n"
+"  aymay alsoway ebay ecifiedspay; isthay isway usedway asway ethay tatesay "
+"ofway ethay externalway\n"
+"  ormatfay.  Anway errorway ethodmay aymay alsoway ebay ecifiedspay ybay "
+"Errorway, ichwhay\n"
+"  efaultsday otay NIL otay eanmay ethay efaultday andlinghay ofway "
+"onversioncay errorsway isway\n"
 "  oneday.\n"
 "\n"
-"  Ourfay aluesvay areway eturnedray: ethay ingstray, ethay ositionpay ofway erewhay ethay extnay\n"
-"  aracterchay ouldway ebay eadray intoway ethay ingstray, ethay umbernay ofway octetsway\n"
-"  actuallyway onsumedcay andway ethay ewnay tatesay ofway ethay externalway ormatfay."
+"  Ourfay aluesvay areway eturnedray: ethay ingstray, ethay ositionpay ofway "
+"erewhay ethay extnay\n"
+"  aracterchay ouldway ebay eadray intoway ethay ingstray, ethay umbernay "
+"ofway octetsway\n"
+"  actuallyway onsumedcay andway ethay ewnay tatesay ofway ethay externalway "
+"ormatfay."
 
 #: src/code/extfmts.lisp
 msgid ""
@@ -11307,22 +12939,34 @@ msgid ""
 "  the number of octets actually consumed and the new state of the\n"
 "  external format."
 msgstr ""
-"Octetsway-otay-ingstray onvertscay anway arrayway ofway octetsway inway Octetsway otay away ingstray\n"
-"  accordingway otay ethay ecifiedspay Externalway-ormatfay.  Ethay arrayway ofway octetsway isway\n"
-"  oundedbay ybay Tartsay (efaultingday otway 0) andway Endway (efaultingday otay ethay endway ofway\n"
-"  ethay arrayway.  Ifway Ingstray isway otnay ivengay, away ewnay ingstray isway eatedcray.  Ifway\n"
-"  Ingstray isway ivengay, ethay onvertedcay octetsway areway toredsay inway Ingstray, tartingsay\n"
-"  atway S-Tartsay (efaultingday otay ethay 0) andway endingway atway S-Endway (efaultingday otay\n"
-"  ethay engthlay ofway Ingstray).  Ifway ethay ingstray isway otnay argelay enoughway otay oldhay\n"
-"  allway ofway aracterschay, enthay omesay octetsway illway otnay ebay onvertedcay.  Away Tatesay\n"
-"  aymay alsoway ebay ecifiedspay; isthay isway usedway asway ethay tatesay ofway ethay externalway\n"
+"Octetsway-otay-ingstray onvertscay anway arrayway ofway octetsway inway "
+"Octetsway otay away ingstray\n"
+"  accordingway otay ethay ecifiedspay Externalway-ormatfay.  Ethay arrayway "
+"ofway octetsway isway\n"
+"  oundedbay ybay Tartsay (efaultingday otway 0) andway Endway (efaultingday "
+"otay ethay endway ofway\n"
+"  ethay arrayway.  Ifway Ingstray isway otnay ivengay, away ewnay ingstray "
+"isway eatedcray.  Ifway\n"
+"  Ingstray isway ivengay, ethay onvertedcay octetsway areway toredsay inway "
+"Ingstray, tartingsay\n"
+"  atway S-Tartsay (efaultingday otay ethay 0) andway endingway atway S-"
+"Endway (efaultingday otay\n"
+"  ethay engthlay ofway Ingstray).  Ifway ethay ingstray isway otnay argelay "
+"enoughway otay oldhay\n"
+"  allway ofway aracterschay, enthay omesay octetsway illway otnay ebay "
+"onvertedcay.  Away Tatesay\n"
+"  aymay alsoway ebay ecifiedspay; isthay isway usedway asway ethay tatesay "
+"ofway ethay externalway\n"
 "  ormatfay.\n"
 "\n"
-"  Inway Ocountway, ethay umbernay ofway octetsway eadray orfay eachway aracterchay inway ethay\n"
+"  Inway Ocountway, ethay umbernay ofway octetsway eadray orfay eachway "
+"aracterchay inway ethay\n"
 "  ingstray isway avedsay\n"
 "\n"
-"  Ourfay aluesvay areway eturnedray: ethay ingstray, ethay umbernay ofway aracterschay eadray,\n"
-"  ethay umbernay ofway octetsway actuallyway onsumedcay andway ethay ewnay tatesay ofway ethay\n"
+"  Ourfay aluesvay areway eturnedray: ethay ingstray, ethay umbernay ofway "
+"aracterschay eadray,\n"
+"  ethay umbernay ofway octetsway actuallyway onsumedcay andway ethay ewnay "
+"tatesay ofway ethay\n"
 "  externalway ormatfay."
 
 #: src/code/extfmts.lisp
@@ -11332,9 +12976,12 @@ msgid ""
 "  encoded result, with each octet converted to a character via\n"
 "  code-char.  This is the inverse to String-Decode"
 msgstr ""
-"Encodeway ethay ivengay Ingstray usingway Externalway-Ormatfay andway eturnray away ewnay\n"
-"  ingstray.  Ethay aracterschay ofway ethay ewnay ingstray areway ethay octetsway ofway ethay\n"
-"  encodedway esultray, ithway eachway octetway onvertedcay otay away aracterchay iavay\n"
+"Encodeway ethay ivengay Ingstray usingway Externalway-Ormatfay andway "
+"eturnray away ewnay\n"
+"  ingstray.  Ethay aracterschay ofway ethay ewnay ingstray areway ethay "
+"octetsway ofway ethay\n"
+"  encodedway esultray, ithway eachway octetway onvertedcay otay away "
+"aracterchay iavay\n"
 "  odecay-archay.  Isthay isway ethay inverseway otay Ingstray-Ecodeday"
 
 #: src/code/extfmts.lisp
@@ -11344,9 +12991,12 @@ msgid ""
 "  octets, where the char-code of each character is the octet.  This is\n"
 "  the inverse of String-Encode."
 msgstr ""
-"Ecodeday Ingstray usingway ethay ivengay Externalway-Ormatfay andway eturnray ethay ewnay\n"
-"  ingstray.  Ethay inputway ingstray isway eatedtray asway ifway itway ereway anway arrayway ofway\n"
-"  octetsway, erewhay ethay archay-odecay ofway eachway aracterchay isway ethay octetway.  Isthay isway\n"
+"Ecodeday Ingstray usingway ethay ivengay Externalway-Ormatfay andway "
+"eturnray ethay ewnay\n"
+"  ingstray.  Ethay inputway ingstray isway eatedtray asway ifway itway "
+"ereway anway arrayway ofway\n"
+"  octetsway, erewhay ethay archay-odecay ofway eachway aracterchay isway "
+"ethay octetway.  Isthay isway\n"
 "  ethay inverseway ofway Ingstray-Encodeway."
 
 #: src/code/extfmts.lisp
@@ -11359,12 +13009,17 @@ msgid ""
 "  optional argument Filenames is gvien, then the filename encoding is\n"
 "  set to the specified format."
 msgstr ""
-"Angechay ethay externalway ormatfay ofway ethay tandardsay eamsstray otay Erminaltay.\n"
+"Angechay ethay externalway ormatfay ofway ethay tandardsay eamsstray otay "
+"Erminaltay.\n"
 "  Ethay tandardsay eamsstray areway yssay::*stdin*, yssay::*stdout*, andway\n"
-"  yssay::*stderr*, ichwhay areway ormallynay ethay inputway andway/orway outputway eamsstray\n"
-"  orfay *standard-input* andway *standard-output*.  Alsoway etssay yssay::*tty*\n"
-"  (ormallynay *terminal-io* otay ethay ivengay externalway ormatfay.  Ifway ethay\n"
-"  optionalway argumentway Ilenamesfay isway viengay, enthay ethay ilenamefay encodingway isway\n"
+"  yssay::*stderr*, ichwhay areway ormallynay ethay inputway andway/orway "
+"outputway eamsstray\n"
+"  orfay *standard-input* andway *standard-output*.  Alsoway etssay yssay::"
+"*tty*\n"
+"  (ormallynay *terminal-io* otay ethay ivengay externalway ormatfay.  Ifway "
+"ethay\n"
+"  optionalway argumentway Ilenamesfay isway viengay, enthay ethay ilenamefay "
+"encodingway isway\n"
 "  etsay otay ethay ecifiedspay ormatfay."
 
 #: src/code/extfmts.lisp
@@ -11377,14 +13032,17 @@ msgstr "Angechay itway anywayway."
 
 #: src/code/extfmts.lisp
 msgid "The external-format for encoding filenames is already set."
-msgstr "Ethay externalway-ormatfay orfay encodingway ilenamesfay isway alreadyway etsay."
+msgstr ""
+"Ethay externalway-ormatfay orfay encodingway ilenamesfay isway alreadyway "
+"etsay."
 
 #: src/code/fd-stream.lisp
 msgid ""
 "List of available buffers.  Each buffer is an sap pointing to\n"
 "  bytes-per-buffer of memory."
 msgstr ""
-"Istlay ofway availableway uffersbay.  Eachway ufferbay isway anway apsay ointingpay otay\n"
+"Istlay ofway availableway uffersbay.  Eachway ufferbay isway anway apsay "
+"ointingpay otay\n"
 "  ytesbay-erpay-ufferbay ofway emorymay."
 
 #: src/code/fd-stream.lisp
@@ -11393,7 +13051,9 @@ msgstr "Umbernay ofway ytesbay erpay ufferbay."
 
 #: src/code/fd-stream.lisp
 msgid "The maximum supported byte size for a stream element-type."
-msgstr "Ethay aximummay upportedsay ytebay izesay orfay away eamstray elementway-ypetay."
+msgstr ""
+"Ethay aximummay upportedsay ytebay izesay orfay away eamstray elementway-"
+"ypetay."
 
 #: src/code/fd-stream.lisp
 msgid "Timeout ~(~A~)ing ~S."
@@ -11406,9 +13066,10 @@ msgid ""
 "number\n"
 "  of bytes per element."
 msgstr ""
-"Istlay ofway allway availableway outputway outinesray. Eachway elementway isway away istlay ofway ethay\n"
-"  elementway-ypetay outputway, ethay indkay ofway ufferingbay, ethay unctionfay amenay, andway ethay "
-"umbernay\n"
+"Istlay ofway allway availableway outputway outinesray. Eachway elementway "
+"isway away istlay ofway ethay\n"
+"  elementway-ypetay outputway, ethay indkay ofway ufferingbay, ethay "
+"unctionfay amenay, andway ethay umbernay\n"
 "  ofway ytesbay erpay elementway."
 
 #: src/code/fd-stream.lisp
@@ -11425,8 +13086,8 @@ msgid ""
 "THING\n"
 "  is a SAP, END must be supplied (as length won't work)."
 msgstr ""
-"Outputway THING otay eamstray.  THING ancay ebay anyway indkay ofway ectorvay orway away apsay.  Ifway "
-"THING\n"
+"Outputway THING otay eamstray.  THING ancay ebay anyway indkay ofway "
+"ectorvay orway away apsay.  Ifway THING\n"
 "  isway away SAP, END ustmay ebay uppliedsay (asway engthlay onway't orkway)."
 
 #: src/code/fd-stream.lisp
@@ -11440,12 +13101,12 @@ msgstr "~S alledcay ithway :END eforebay :START!"
 #: src/code/fd-stream.lisp
 msgid ""
 "List of all available input routines. Each element is a list of the\n"
-"  element-type input, the function name, and the number of bytes per "
-"element."
+"  element-type input, the function name, and the number of bytes per element."
 msgstr ""
-"Istlay ofway allway availableway inputway outinesray. Eachway elementway isway away istlay ofway ethay\n"
-"  elementway-ypetay inputway, ethay unctionfay amenay, andway ethay umbernay ofway ytesbay erpay "
-"elementway."
+"Istlay ofway allway availableway inputway outinesray. Eachway elementway "
+"isway away istlay ofway ethay\n"
+"  elementway-ypetay inputway, ethay unctionfay amenay, andway ethay umbernay "
+"ofway ytesbay erpay elementway."
 
 #: src/code/fd-stream.lisp
 msgid "Error reading ~S: ~A"
@@ -11457,11 +13118,13 @@ msgstr "Ouldcay otnay indfay anyway inputway outineray orfay ~S"
 
 #: src/code/fd-stream.lisp
 msgid "Could not find any output routine for ~S buffered ~S."
-msgstr "Ouldcay otnay indfay anyway outputway outineray orfay ~S ufferedbay ~S."
+msgstr ""
+"Ouldcay otnay indfay anyway outputway outineray orfay ~S ufferedbay ~S."
 
 #: src/code/fd-stream.lisp
 msgid "Element sizes for input (~S:~S) and output (~S:~S) differ?"
-msgstr "Elementway izessay orfay inputway (~S:~S) andway outputway (~S:~S) ifferday?"
+msgstr ""
+"Elementway izessay orfay inputway (~S:~S) andway outputway (~S:~S) ifferday?"
 
 #: src/code/fd-stream.lisp
 msgid "Input type (~S) and output type (~S) are unrelated?"
@@ -11521,23 +13184,30 @@ msgstr ""
 "Eatecray away eamstray orfay ethay ivengay unixway ilefay escriptorday.\n"
 "  Ifway inputway isway onnay-ilnay, allowway inputway operationsway.\n"
 "  Ifway outputway isway onnay-ilnay, allowway outputway operationsway.\n"
-"  Ifway eithernay inputway ornay outputway areway ecifiedspay, efaultday otay allowingway inputway.\n"
-"  Elementway-ypetay indicatesway ethay elementway ypetay otay useway (asway orfay openway).\n"
+"  Ifway eithernay inputway ornay outputway areway ecifiedspay, efaultday "
+"otay allowingway inputway.\n"
+"  Elementway-ypetay indicatesway ethay elementway ypetay otay useway (asway "
+"orfay openway).\n"
 "  Ufferingbay indicatesway ethay indkay ofway ufferingbay otay useway.\n"
-"  Imeouttay (ifway uetray) isway ethay umbernay ofway econdssay otay aitway orfay inputway.  Ifway NIL "
-"(ethay\n"
-"    efaultday), enthay aitway oreverfay.  Enwhay eway imetay outway, eway ignalsay IO-TIMEOUT.\n"
-"  Ilefay isway ethay amenay ofway ethay ilefay (illway ebay eturnedray ybay PATHNAME).\n"
+"  Imeouttay (ifway uetray) isway ethay umbernay ofway econdssay otay aitway "
+"orfay inputway.  Ifway NIL (ethay\n"
+"    efaultday), enthay aitway oreverfay.  Enwhay eway imetay outway, eway "
+"ignalsay IO-TIMEOUT.\n"
+"  Ilefay isway ethay amenay ofway ethay ilefay (illway ebay eturnedray ybay "
+"PATHNAME).\n"
 "  Amenay isway usedway otay identifyway ethay eamstray enwhay intedpray.\n"
-"  Externalway-ormatfay isway ethay externalway ormatfay otay useway orfay ethay eamstray.\n"
-"  Ecodingday-errorway andway Encodingway-errorway indicateway owhay ecodingday/encodingway errorsway "
-"onway\n"
-"    ethay eamstray ouldshay ebay andledhay.  Ethay efaultday isway otay useway away eplacementray "
-"aracterchay."
+"  Externalway-ormatfay isway ethay externalway ormatfay otay useway orfay "
+"ethay eamstray.\n"
+"  Ecodingday-errorway andway Encodingway-errorway indicateway owhay "
+"ecodingday/encodingway errorsway onway\n"
+"    ethay eamstray ouldshay ebay andledhay.  Ethay efaultday isway otay "
+"useway away eplacementray aracterchay."
 
 #: src/code/fd-stream.lisp
 msgid "File descriptor must be opened either for input or output."
-msgstr "Ilefay escriptorday ustmay ebay openedway eitherway orfay inputway orway outputway."
+msgstr ""
+"Ilefay escriptorday ustmay ebay openedway eitherway orfay inputway orway "
+"outputway."
 
 #: src/code/fd-stream.lisp
 msgid "** Closed ~A~%"
@@ -11550,9 +13220,12 @@ msgid ""
 "   this can be a function that takes a namestring and returns a complete\n"
 "   namestring."
 msgstr ""
-"Isthay isway away ingstray atthay OPEN ackstay onway ethay endway ofway away ilefay amestringnay otay oducepray\n"
-"   away amenay orfay ethay :ifway-existsway :enameray-andway-eleteday andway :enameray optionsway.  Alsoway,\n"
-"   isthay ancay ebay away unctionfay atthay akestay away amestringnay andway eturnsray away ompletecay\n"
+"Isthay isway away ingstray atthay OPEN ackstay onway ethay endway ofway away "
+"ilefay amestringnay otay oducepray\n"
+"   away amenay orfay ethay :ifway-existsway :enameray-andway-eleteday "
+"andway :enameray optionsway.  Alsoway,\n"
+"   isthay ancay ebay away unctionfay atthay akestay away amestringnay andway "
+"eturnsray away ompletecay\n"
 "   amestringnay."
 
 #: src/code/fd-stream.lisp
@@ -11639,32 +13312,52 @@ msgid ""
 "\n"
 "  See the manual for details."
 msgstr ""
-"Eturnray away eamstray ichwhay eadsray omfray orway iteswray otay Ilenamefay.\n"
+"Eturnray away eamstray ichwhay eadsray omfray orway iteswray otay "
+"Ilenamefay.\n"
 "  Efinedday eywordskay:\n"
-"   :irectionday - oneway ofway :inputway, :outputway, :ioway, orway :obepray\n"
-"   :elementway-ypetay - Ypetay ofway objectway otay eadray orway itewray, efaultday BASE-CHAR\n"
-"   :ifway-existsway - oneway ofway :errorway, :ewnay-ersionvay, :enameray, :enameray-andway-eleteday,\n"
+"   :irectionday - oneway ofway :inputway, :outputway, :ioway, orway :"
+"obepray\n"
+"   :elementway-ypetay - Ypetay ofway objectway otay eadray orway itewray, "
+"efaultday BASE-CHAR\n"
+"   :ifway-existsway - oneway ofway :errorway, :ewnay-ersionvay, :enameray, :"
+"enameray-andway-eleteday,\n"
 "                       :overwriteway, :appendway, :upersedesay orway ilnay\n"
-"   :ifway-oesday-otnay-existway - oneway ofway :errorway, :eatecray orway ilnay\n"
+"   :ifway-oesday-otnay-existway - oneway ofway :errorway, :eatecray orway "
+"ilnay\n"
 "   :externalway-ormatfay - anway externalway ormatfay amenay\n"
-"   :ecodingday-errorway - Owhay otay andlehay ecodingday errorsway omfray ethay externalway "
-"ormatfay.\n"
-"                       Ifway away aracterchay, enthay atthay aracterchay isway usedway asway\n"
-"                       ethay eplacmentray aracterchay orfay allway errorsway.  Ifway T,\n"
-"                       enthay away ontinuablecay errorway isway ignaledsay.  Ifway\n"
-"                       ontinuedcay, ethay Unicodeway eplacementray aracterchay isway\n"
-"                       usedway.  Otherwiseway, itway ouldshay ebay away ymbolsay orway\n"
-"                       unctionfay ofway 3 argumentsway.  Ifway itway eturnsray, itway\n"
-"                       ouldshay eturnray away odecay ointpay otay useway asway ethay\n"
-"                       eplacmentray.  Ethay unctionfay argumentsway areway away\n"
-"                       ormatfay essagemay ingstray, ethay offendingway octetway, andway\n"
-"                       ethay umbernay ofway octetsway eadray inway ethay urrentcay\n"
+"   :ecodingday-errorway - Owhay otay andlehay ecodingday errorsway omfray "
+"ethay externalway ormatfay.\n"
+"                       Ifway away aracterchay, enthay atthay aracterchay "
+"isway usedway asway\n"
+"                       ethay eplacmentray aracterchay orfay allway "
+"errorsway.  Ifway T,\n"
+"                       enthay away ontinuablecay errorway isway ignaledsay.  "
+"Ifway\n"
+"                       ontinuedcay, ethay Unicodeway eplacementray "
+"aracterchay isway\n"
+"                       usedway.  Otherwiseway, itway ouldshay ebay away "
+"ymbolsay orway\n"
+"                       unctionfay ofway 3 argumentsway.  Ifway itway "
+"eturnsray, itway\n"
+"                       ouldshay eturnray away odecay ointpay otay useway "
+"asway ethay\n"
+"                       eplacmentray.  Ethay unctionfay argumentsway areway "
+"away\n"
+"                       ormatfay essagemay ingstray, ethay offendingway "
+"octetway, andway\n"
+"                       ethay umbernay ofway octetsway eadray inway ethay "
+"urrentcay\n"
 "                       encodingway.\n"
-"   :encodingway-errorway - Ikelay :ecodingday-errorway, utbay orfay errorsway enwhay encodingway ethay\n"
-"                       eamstray.  Ifway away aracterchay, atthay aracterchay isway usedway\n"
-"                       asway ethay eplacmentray odecay ointpay.  Otherwiseway, itway\n"
-"                       ouldshay ebay away ymbolsay orway unctionfay oofway wotay\n"
-"                       argumentsway: away ormatfay essagemay ingstray andway ethay\n"
+"   :encodingway-errorway - Ikelay :ecodingday-errorway, utbay orfay "
+"errorsway enwhay encodingway ethay\n"
+"                       eamstray.  Ifway away aracterchay, atthay aracterchay "
+"isway usedway\n"
+"                       asway ethay eplacmentray odecay ointpay.  "
+"Otherwiseway, itway\n"
+"                       ouldshay ebay away ymbolsay orway unctionfay oofway "
+"wotay\n"
+"                       argumentsway: away ormatfay essagemay ingstray andway "
+"ethay\n"
 "                       incorrectway odepointcay.\n"
 "\n"
 "  Eesay ethay anualmay orfay etailsday."
@@ -11690,23 +13383,32 @@ msgstr "Unableway otay openway eamsstray ofway assclay ~S."
 msgid ""
 "The stream connected to the controlling terminal or NIL if there is none."
 msgstr ""
-"Ethay eamstray onnectedcay otay ethay ontrollingcay erminaltay orway NIL ifway erethay isway onenay."
+"Ethay eamstray onnectedcay otay ethay ontrollingcay erminaltay orway NIL "
+"ifway erethay isway onenay."
 
 #: src/code/fd-stream.lisp
 msgid "The stream connected to the standard input (file descriptor 0)."
-msgstr "Ethay eamstray onnectedcay otay ethay tandardsay inputway (ilefay escriptorday 0)."
+msgstr ""
+"Ethay eamstray onnectedcay otay ethay tandardsay inputway (ilefay "
+"escriptorday 0)."
 
 #: src/code/fd-stream.lisp
 msgid "The stream connected to the standard output (file descriptor 1)."
-msgstr "Ethay eamstray onnectedcay otay ethay tandardsay outputway (ilefay escriptorday 1)."
+msgstr ""
+"Ethay eamstray onnectedcay otay ethay tandardsay outputway (ilefay "
+"escriptorday 1)."
 
 #: src/code/fd-stream.lisp
 msgid "The stream connected to the standard error output (file descriptor 2)."
-msgstr "Ethay eamstray onnectedcay otay ethay tandardsay errorway outputway (ilefay escriptorday 2)."
+msgstr ""
+"Ethay eamstray onnectedcay otay ethay tandardsay errorway outputway (ilefay "
+"escriptorday 2)."
 
 #: src/code/fd-stream.lisp
 msgid "This is called in BEEP to feep the user.  It takes a stream."
-msgstr "Isthay isway alledcay inway BEEP otay eepfay ethay userway.  Itway akestay away eamstray."
+msgstr ""
+"Isthay isway alledcay inway BEEP otay eepfay ethay userway.  Itway akestay "
+"away eamstray."
 
 #: src/code/fd-stream.lisp
 msgid ""
@@ -11714,8 +13416,10 @@ msgid ""
 "   Object to Stream.  Non-trivial only in implementations that support\n"
 "   international character sets."
 msgstr ""
-"Eturnray ethay eltaday inway Eamstray's FILE-POSITION atthay ouldway ebay ausedcay ybay itingwray\n"
-"   Objectway otay Eamstray.  Onnay-ivialtray onlyway inway implementationsway atthay upportsay\n"
+"Eturnray ethay eltaday inway Eamstray's FILE-POSITION atthay ouldway ebay "
+"ausedcay ybay itingwray\n"
+"   Objectway otay Eamstray.  Onnay-ivialtray onlyway inway "
+"implementationsway atthay upportsay\n"
 "   internationalway aracterchay etssay."
 
 #: src/code/fd-stream-extfmt.lisp
@@ -11728,7 +13432,8 @@ msgstr "Oadinglay implesay-eamsstray ouldshay edefineray isthay"
 
 #: src/code/fd-stream-extfmt.lisp
 msgid "Setting external-format on Gray streams not supported."
-msgstr "Ettingsay externalway-ormatfay onway Aygray eamsstray otnay upportedsay."
+msgstr ""
+"Ettingsay externalway-ormatfay onway Aygray eamsstray otnay upportedsay."
 
 #: src/code/fd-stream-comp.lisp
 msgid "Surrogate codepoint #x~~4,'0X is illegal for ~A"
@@ -11755,23 +13460,29 @@ msgid ""
 "When non-nil, attempt to load \"library:<host>.translations\" to resolve\n"
 "   an otherwise undefined logical host."
 msgstr ""
-"Enwhay onnay-ilnay, attemptway otay oadlay \"ibrarylay:<osthay>.anslationstray\" otay esolveray\n"
+"Enwhay onnay-ilnay, attemptway otay oadlay \"ibrarylay:<osthay>."
+"anslationstray\" otay esolveray\n"
 "   anway otherwiseway undefinedway ogicallay osthay."
 
 #: src/code/pathname.lisp
 msgid "A path specification, either a string, file-stream or pathname."
-msgstr "Away athpay ecificationspay, eitherway away ingstray, ilefay-eamstray orway athnamepay."
+msgstr ""
+"Away athpay ecificationspay, eitherway away ingstray, ilefay-eamstray orway "
+"athnamepay."
 
 #: src/code/pathname.lisp
 msgid "Convert thing (a pathname, string or stream) into a pathname."
-msgstr "Onvertcay ingthay (away athnamepay, ingstray orway eamstray) intoway away athnamepay."
+msgstr ""
+"Onvertcay ingthay (away athnamepay, ingstray orway eamstray) intoway away "
+"athnamepay."
 
 #: src/code/pathname.lisp
 msgid ""
 "Construct a filled in pathname by completing the unspecified components\n"
 "   from the defaults."
 msgstr ""
-"Onstructcay away illedfay inway athnamepay ybay ompletingcay ethay unspecifiedway omponentscay\n"
+"Onstructcay away illedfay inway athnamepay ybay ompletingcay ethay "
+"unspecifiedway omponentscay\n"
 "   omfray ethay efaultsday."
 
 #: src/code/pathname.lisp
@@ -11783,7 +13494,8 @@ msgid ""
 "Makes a new pathname from the component arguments.  Note that host is\n"
 "a host-structure or string."
 msgstr ""
-"Akesmay away ewnay athnamepay omfray ethay omponentcay argumentsway.  Otenay atthay osthay isway\n"
+"Akesmay away ewnay athnamepay omfray ethay omponentcay argumentsway.  Otenay "
+"atthay osthay isway\n"
 "away osthay-ucturestray orway ingstray."
 
 #: src/code/pathname.lisp
@@ -11797,12 +13509,11 @@ msgstr "Illysay argumentway orfay away unixway PATHNAME-NAME: ~S"
 #: src/code/pathname.lisp
 msgid ""
 "Illegal pathname: ~\n"
-"                                Directory with ~S immediately followed by "
-"~S"
+"                                Directory with ~S immediately followed by ~S"
 msgstr ""
 "Illegalway athnamepay: ~\n"
-"                                Irectoryday ithway ~S immediatelyway ollowedfay ybay "
-"~S"
+"                                Irectoryday ithway ~S immediatelyway "
+"ollowedfay ybay ~S"
 
 #: src/code/pathname.lisp
 msgid "Accessor for the pathname's host."
@@ -11831,18 +13542,18 @@ msgstr "Arsepay errorway inway amestringnay: ~?~%  ~Away~%  ~V@T^"
 #: src/code/pathname.lisp
 msgid ""
 "When Host arg is not supplied, Defaults arg must ~\n"
-"		  have a non-null PATHNAME-HOST."
+"\t\t  have a non-null PATHNAME-HOST."
 msgstr ""
 "Enwhay Osthay argway isway otnay uppliedsay, Efaultsday argway ustmay ~\n"
-"		  avehay away onnay-ullnay PATHNAME-HOST."
+"\t\t  avehay away onnay-ullnay PATHNAME-HOST."
 
 #: src/code/pathname.lisp
 msgid ""
 "Host in namestring: ~S~@\n"
-"		    does not match explicit host argument: ~S"
+"\t\t    does not match explicit host argument: ~S"
 msgstr ""
 "Osthay inway amestringnay: ~S~@\n"
-"		    oesday otnay atchmay explicitway osthay argumentway: ~S"
+"\t\t    oesday otnay atchmay explicitway osthay argumentway: ~S"
 
 #: src/code/pathname.lisp
 msgid ""
@@ -11850,8 +13561,10 @@ msgid ""
 "   for a physical pathname, returns the printed representation. Host may be\n"
 "   a physical host structure or host namestring."
 msgstr ""
-"Onvertscay athnamepay, away athnamepay esignatorday, intoway away athnamepay ucturestray,\n"
-"   orfay away ysicalphay athnamepay, eturnsray ethay intedpray epresentationray. Osthay aymay ebay\n"
+"Onvertscay athnamepay, away athnamepay esignatorday, intoway away athnamepay "
+"ucturestray,\n"
+"   orfay away ysicalphay athnamepay, eturnsray ethay intedpray "
+"epresentationray. Osthay aymay ebay\n"
 "   away ysicalphay osthay ucturestray orway osthay amestringnay."
 
 #: src/code/pathname.lisp
@@ -11860,7 +13573,8 @@ msgstr "Ostshay oday otnay atchmay: ~S andway ~S."
 
 #: src/code/pathname.lisp
 msgid "Can't figure out the file associated with stream:~%  ~S"
-msgstr "Ancay't igurefay outway ethay ilefay associatedway ithway eamstray:~%  ~S"
+msgstr ""
+"Ancay't igurefay outway ethay ilefay associatedway ithway eamstray:~%  ~S"
 
 #: src/code/pathname.lisp
 msgid ""
@@ -11868,51 +13582,62 @@ msgid ""
 "                              supported in this implementation:~%  ~S"
 msgstr ""
 "Away LIST epresentingray away athnamepay osthay isway otnay ~\n"
-"                              upportedsay inway isthay implementationway:~%  ~S"
+"                              upportedsay inway isthay implementationway:~%  "
+"~S"
 
 #: src/code/pathname.lisp
 msgid "Construct the full (name)string form of the pathname."
-msgstr "Onstructcay ethay ullfay (amenay)ingstray ormfay ofway ethay athnamepay."
+msgstr ""
+"Onstructcay ethay ullfay (amenay)ingstray ormfay ofway ethay athnamepay."
 
 #: src/code/pathname.lisp
 msgid ""
 "Cannot determine the namestring for pathnames with no ~\n"
-"		  host:~%  ~S"
+"\t\t  host:~%  ~S"
 msgstr ""
 "Annotcay etermineday ethay amestringnay orfay athnamespay ithway onay ~\n"
-"		  osthay:~%  ~S"
+"\t\t  osthay:~%  ~S"
 
 #: src/code/pathname.lisp
 msgid ""
 "Returns a string representation of the name of the host in the pathname."
 msgstr ""
-"Eturnsray away ingstray epresentationray ofway ethay amenay ofway ethay osthay inway ethay athnamepay."
+"Eturnsray away ingstray epresentationray ofway ethay amenay ofway ethay "
+"osthay inway ethay athnamepay."
 
 #: src/code/pathname.lisp
 msgid "Cannot determine the namestring for pathnames with no host:~%  ~S"
-msgstr "Annotcay etermineday ethay amestringnay orfay athnamespay ithway onay osthay:~%  ~S"
+msgstr ""
+"Annotcay etermineday ethay amestringnay orfay athnamespay ithway onay osthay:"
+"~%  ~S"
 
 #: src/code/pathname.lisp
 msgid ""
 "Returns a string representation of the directories used in the pathname."
 msgstr ""
-"Eturnsray away ingstray epresentationray ofway ethay irectoriesday usedway inway ethay athnamepay."
+"Eturnsray away ingstray epresentationray ofway ethay irectoriesday usedway "
+"inway ethay athnamepay."
 
 #: src/code/pathname.lisp
 msgid "Returns a string representation of the name used in the pathname."
-msgstr "Eturnsray away ingstray epresentationray ofway ethay amenay usedway inway ethay athnamepay."
+msgstr ""
+"Eturnsray away ingstray epresentationray ofway ethay amenay usedway inway "
+"ethay athnamepay."
 
 #: src/code/pathname.lisp
 msgid ""
 "Returns an abbreviated pathname sufficent to identify the pathname relative\n"
 "   to the defaults."
 msgstr ""
-"Eturnsray anway abbreviatedway athnamepay ufficentsay otay identifyway ethay athnamepay elativeray\n"
+"Eturnsray anway abbreviatedway athnamepay ufficentsay otay identifyway ethay "
+"athnamepay elativeray\n"
 "   otay ethay efaultsday."
 
 #: src/code/pathname.lisp
 msgid "Predicate for determining whether pathname contains any wildcards."
-msgstr "Edicatepray orfay eterminingday etherwhay athnamepay ontainscay anyway ildcardsway."
+msgstr ""
+"Edicatepray orfay eterminingday etherwhay athnamepay ontainscay anyway "
+"ildcardsway."
 
 #: src/code/pathname.lisp
 msgid "Pathname matches the wildname template?"
@@ -11921,40 +13646,46 @@ msgstr "Athnamepay atchesmay ethay ildnameway emplatetay?"
 #: src/code/pathname.lisp
 msgid ""
 "Not enough wildcards in FROM pattern to match ~\n"
-"		       TO pattern:~%  ~S"
+"\t\t       TO pattern:~%  ~S"
 msgstr ""
 "Otnay enoughway ildcardsway inway FROM atternpay otay atchmay ~\n"
-"		       TO atternpay:~%  ~S"
+"\t\t       TO atternpay:~%  ~S"
 
 #: src/code/pathname.lisp
-msgid "Can't substitute this into the middle of a word:~\n"
-"			  ~%  ~S"
-msgstr "Ancay't ubstitutesay isthay intoway ethay iddlemay ofway away ordway:~\n"
-"			  ~%  ~S"
+msgid ""
+"Can't substitute this into the middle of a word:~\n"
+"\t\t\t  ~%  ~S"
+msgstr ""
+"Ancay't ubstitutesay isthay intoway ethay iddlemay ofway away ordway:~\n"
+"\t\t\t  ~%  ~S"
 
 #: src/code/pathname.lisp
 msgid ""
 "Pathname components from Source and From args to TRANSLATE-PATHNAME~@\n"
-"	  did not match:~%  ~S ~S"
+"\t  did not match:~%  ~S ~S"
 msgstr ""
-"Athnamepay omponentscay omfray Ourcesay andway Omfray argsway otay TRANSLATE-PATHNAME~@\n"
-"	  idday otnay atchmay:~%  ~S ~S"
+"Athnamepay omponentscay omfray Ourcesay andway Omfray argsway otay TRANSLATE-"
+"PATHNAME~@\n"
+"\t  idday otnay atchmay:~%  ~S ~S"
 
 #: src/code/pathname.lisp
-msgid ":WILD-INFERIORS not paired in from and to ~\n"
-"			   patterns:~%  ~S ~S"
-msgstr ":WILD-INFERIORS otnay airedpay inway omfray andway otay ~\n"
-"			   atternspay:~%  ~S ~S"
+msgid ""
+":WILD-INFERIORS not paired in from and to ~\n"
+"\t\t\t   patterns:~%  ~S ~S"
+msgstr ""
+":WILD-INFERIORS otnay airedpay inway omfray andway otay ~\n"
+"\t\t\t   atternspay:~%  ~S ~S"
 
 #: src/code/pathname.lisp
 msgid ""
 "Use the source pathname to translate the from-wildname's wild and\n"
-"   unspecified elements into a completed to-pathname based on the to-wildnam"
-"e."
+"   unspecified elements into a completed to-pathname based on the to-"
+"wildname."
 msgstr ""
-"Useway ethay ourcesay athnamepay otay anslatetray ethay omfray-ildnameway's ildway andway\n"
-"   unspecifiedway elementsway intoway away ompletedcay otay-athnamepay asedbay onway ethay otay-ildnamway"
-"e."
+"Useway ethay ourcesay athnamepay otay anslatetray ethay omfray-ildnameway's "
+"ildway andway\n"
+"   unspecifiedway elementsway intoway away ompletedcay otay-athnamepay "
+"asedbay onway ethay otay-ildnamwaye."
 
 #: src/code/pathname.lisp
 msgid "~S doesn't match ~S"
@@ -11969,7 +13700,8 @@ msgid ""
 "Clear the current definition for the search-list NAME.  Returns T if such\n"
 "   a definition existed, and NIL if not."
 msgstr ""
-"Earclay ethay urrentcay efinitionday orfay ethay earchsay-istlay NAME.  Eturnsray T ifway uchsay\n"
+"Earclay ethay urrentcay efinitionday orfay ethay earchsay-istlay NAME.  "
+"Eturnsray T ifway uchsay\n"
 "   away efinitionday existedway, andway NIL ifway otnay."
 
 #: src/code/pathname.lisp
@@ -11977,7 +13709,8 @@ msgid ""
 "Clear the definition for all search-lists.  Only use this if you know\n"
 "   what you are doing."
 msgstr ""
-"Earclay ethay efinitionday orfay allway earchsay-istslay.  Onlyway useway isthay ifway ouyay nowkay\n"
+"Earclay ethay efinitionday orfay allway earchsay-istslay.  Onlyway useway "
+"isthay ifway ouyay nowkay\n"
 "   atwhay ouyay areway oingday."
 
 #: src/code/pathname.lisp
@@ -11991,10 +13724,14 @@ msgid ""
 "   the search-list has not been defined yet, then an error is signaled.\n"
 "   The expansion for a search-list can be set with SETF."
 msgstr ""
-"Eturnray ethay expansionsway orfay ethay earchsay-istlay tartingsay PATHNAME.  Ifway PATHNAME\n"
-"   oesday otnay tartsay ithway away earchsay-istlay, enthay anway errorway isway ignaledsay.  Ifway\n"
-"   ethay earchsay-istlay ashay otnay eenbay efinedday etyay, enthay anway errorway isway ignaledsay.\n"
-"   Ethay expansionway orfay away earchsay-istlay ancay ebay etsay ithway SETF."
+"Eturnray ethay expansionsway orfay ethay earchsay-istlay tartingsay "
+"PATHNAME.  Ifway PATHNAME\n"
+"   oesday otnay tartsay ithway away earchsay-istlay, enthay anway errorway "
+"isway ignaledsay.  Ifway\n"
+"   ethay earchsay-istlay ashay otnay eenbay efinedday etyay, enthay anway "
+"errorway isway ignaledsay.\n"
+"   Ethay expansionway orfay away earchsay-istlay ancay ebay etsay ithway "
+"SETF."
 
 #: src/code/pathname.lisp
 msgid "Search list ~S has not been defined yet."
@@ -12006,23 +13743,27 @@ msgid ""
 "   NIL otherwise.  An error is signaled if PATHNAME does not start with a\n"
 "   search-list."
 msgstr ""
-"Eturnsray T ifway ethay earchsay-istlay tartingsay PATHNAME isway urrentlycay efinedday, andway\n"
-"   NIL otherwiseway.  Anway errorway isway ignaledsay ifway PATHNAME oesday otnay tartsay ithway away\n"
+"Eturnsray T ifway ethay earchsay-istlay tartingsay PATHNAME isway "
+"urrentlycay efinedday, andway\n"
+"   NIL otherwiseway.  Anway errorway isway ignaledsay ifway PATHNAME oesday "
+"otnay tartsay ithway away\n"
 "   earchsay-istlay."
 
 #: src/code/pathname.lisp
-msgid "That would result in a circularity:~%  ~\n"
-"		     ~A~{ -> ~A~} -> ~A"
-msgstr "Atthay ouldway esultray inway away ircularitycay:~%  ~\n"
-"		     ~Away~{ -> ~Away~} -> ~Away"
+msgid ""
+"That would result in a circularity:~%  ~\n"
+"\t\t     ~A~{ -> ~A~} -> ~A"
+msgstr ""
+"Atthay ouldway esultray inway away ircularitycay:~%  ~\n"
+"\t\t     ~Away~{ -> ~Away~} -> ~Away"
 
 #: src/code/pathname.lisp
 msgid ""
 "Search-lists cannot expand into pathnames that have ~\n"
-"		       a name, type, or ~%version specified:~%  ~S"
+"\t\t       a name, type, or ~%version specified:~%  ~S"
 msgstr ""
 "Earchsay-istslay annotcay expandway intoway athnamespay atthay avehay ~\n"
-"		       away amenay, ypetay, orway ~%ersionvay ecifiedspay:~%  ~S"
+"\t\t       away amenay, ypetay, orway ~%ersionvay ecifiedspay:~%  ~S"
 
 #: src/code/pathname.lisp
 msgid ""
@@ -12032,10 +13773,14 @@ msgid ""
 "   in a block named NIL, so RETURN can be used to terminate early.  Note:\n"
 "   VAR is *not* bound inside of RESULT."
 msgstr ""
-"Executeway BODY ithway VAR oundbay otay eachway uccessivesay ossiblepay expansionway orfay\n"
-"   PATHNAME andway enthay eturnray RESULT.  Otenay: ifway PATHNAME oesday otnay ontaincay away\n"
-"   earchsay-istlay, enthay BODY isway executedway exactlyway onceway.  Everythingway isway appedwray\n"
-"   inway away ockblay amednay NIL, osay RETURN ancay ebay usedway otay erminatetay earlyway.  Otenay:\n"
+"Executeway BODY ithway VAR oundbay otay eachway uccessivesay ossiblepay "
+"expansionway orfay\n"
+"   PATHNAME andway enthay eturnray RESULT.  Otenay: ifway PATHNAME oesday "
+"otnay ontaincay away\n"
+"   earchsay-istlay, enthay BODY isway executedway exactlyway onceway.  "
+"Everythingway isway appedwray\n"
+"   inway away ockblay amednay NIL, osay RETURN ancay ebay usedway otay "
+"erminatetay earlyway.  Otenay:\n"
 "   VAR isway *not* oundbay insideway ofway RESULT."
 
 #: src/code/pathname.lisp
@@ -12045,20 +13790,22 @@ msgstr "Undefinedway earchsay istlay: ~Away"
 #: src/code/pathname.lisp
 msgid ""
 "Logical namestring character ~\n"
-"			     is not alphanumeric or hyphen:~%  ~S"
+"\t\t\t     is not alphanumeric or hyphen:~%  ~S"
 msgstr ""
 "Ogicallay amestringnay aracterchay ~\n"
-"			     isway otnay alphanumericway orway yphenhay:~%  ~S"
+"\t\t\t     isway otnay alphanumericway orway yphenhay:~%  ~S"
 
 #: src/code/pathname.lisp
 msgid "Logical host not yet defined: ~S"
 msgstr "Ogicallay osthay otnay etyay efinedday: ~S"
 
 #: src/code/pathname.lisp
-msgid "Double asterisk inside of logical ~\n"
-"				     word: ~S"
-msgstr "Oubleday asteriskway insideway ofway ogicallay ~\n"
-"				     ordway: ~S"
+msgid ""
+"Double asterisk inside of logical ~\n"
+"\t\t\t\t     word: ~S"
+msgstr ""
+"Oubleday asteriskway insideway ofway ogicallay ~\n"
+"\t\t\t\t     ordway: ~S"
 
 #: src/code/pathname.lisp
 msgid "Illegal character for logical pathname:~%  ~S"
@@ -12093,10 +13840,12 @@ msgid "Expecting ~A, got ~:[nothing~;~:*~S~]."
 msgstr "Expectingway ~Away, otgay ~:[othingnay~;~:*~S~]."
 
 #: src/code/pathname.lisp
-msgid "Expected a positive integer, ~\n"
-"					    got ~S"
-msgstr "Expectedway away ositivepay integerway, ~\n"
-"					    otgay ~S"
+msgid ""
+"Expected a positive integer, ~\n"
+"\t\t\t\t\t    got ~S"
+msgstr ""
+"Expectedway away ositivepay integerway, ~\n"
+"\t\t\t\t\t    otgay ~S"
 
 #: src/code/pathname.lisp
 msgid "Extra stuff after end of file name."
@@ -12104,7 +13853,9 @@ msgstr "Extraway tuffsay afterway endway ofway ilefay amenay."
 
 #: src/code/pathname.lisp
 msgid "Converts the pathspec argument to a logical-pathname and returns it."
-msgstr "Onvertscay ethay athspecpay argumentway otay away ogicallay-athnamepay andway eturnsray itway."
+msgstr ""
+"Onvertscay ethay athspecpay argumentway otay away ogicallay-athnamepay "
+"andway eturnsray itway."
 
 #: src/code/pathname.lisp
 msgid "Logical namestring does not specify a host:~%  ~S"
@@ -12120,11 +13871,14 @@ msgstr "Invalidway eywordkay: ~S"
 
 #: src/code/pathname.lisp
 msgid "Logical pathname translation is not a two-list:~%  ~S"
-msgstr "Ogicallay athnamepay anslationtray isway otnay away wotay-istlay:~%  ~S"
+msgstr ""
+"Ogicallay athnamepay anslationtray isway otnay away wotay-istlay:~%  ~S"
 
 #: src/code/pathname.lisp
 msgid "Return the (logical) host object argument's list of translations."
-msgstr "Eturnray ethay (ogicallay) osthay objectway argumentway's istlay ofway anslationstray."
+msgstr ""
+"Eturnray ethay (ogicallay) osthay objectway argumentway's istlay ofway "
+"anslationstray."
 
 #: src/code/pathname.lisp
 msgid ""
@@ -12151,11 +13905,12 @@ msgid ""
 "loaded\n"
 "   successfully, T is returned, else error."
 msgstr ""
-"Earchsay orfay away ogicallay athnamepay amednay osthay, ifway otnay alreadyway efinedday. Ifway "
-"alreadyway\n"
-"   efinedday onay attemptway otay indfay orway oadlay away efinitionday isway attemptedway andway NIL isway\n"
-"   eturnedray. Ifway osthay isway otnay alreadyway efinedday, utbay efinitionday isway oundfay andway "
-"oadedlay\n"
+"Earchsay orfay away ogicallay athnamepay amednay osthay, ifway otnay "
+"alreadyway efinedday. Ifway alreadyway\n"
+"   efinedday onay attemptway otay indfay orway oadlay away efinitionday "
+"isway attemptedway andway NIL isway\n"
+"   eturnedray. Ifway osthay isway otnay alreadyway efinedday, utbay "
+"efinitionday isway oundfay andway oadedlay\n"
 "   uccessfullysay, T isway eturnedray, elseway errorway."
 
 #: src/code/pathname.lisp
@@ -12164,7 +13919,9 @@ msgstr ";; Oadinglay athnamepay anslationstray omfray ~Away~%"
 
 #: src/code/pathname.lisp
 msgid "Translates pathname to a physical pathname, which is returned."
-msgstr "Anslatestray athnamepay otay away ysicalphay athnamepay, ichwhay isway eturnedray."
+msgstr ""
+"Anslatestray athnamepay otay away ysicalphay athnamepay, ichwhay isway "
+"eturnedray."
 
 #: src/code/pathname.lisp
 msgid "No translation for ~S"
@@ -12175,7 +13932,8 @@ msgid ""
 "Remove any occurrences of \\ from the string because we've already\n"
 "   checked for whatever may have been backslashed."
 msgstr ""
-"Emoveray anyway occurrencesway ofway \\ omfray ethay ingstray ecausebay eway'evay alreadyway\n"
+"Emoveray anyway occurrencesway ofway \\ omfray ethay ingstray ecausebay "
+"eway'evay alreadyway\n"
 "   eckedchay orfay ateverwhay aymay avehay eenbay ackslashedbay."
 
 #: src/code/filesys.lisp
@@ -12190,10 +13948,14 @@ msgid ""
 "  wildcards when parsing a namestring, and are not escaped when\n"
 "  printing pathnames."
 msgstr ""
-"Ifway onnay-NIL, Unixway ellshay-tylesay ildcardsway areway ignoredway enwhay arsingpay\n"
-"  athnamepay amestringsnay.  Eythay areway alsoway ignoredway enwhay omputingcay\n"
-"  amestringsnay orfay athnamepay objectsway.  Usthay, *, ?, etcway. areway otnay\n"
-"  ildcardsway enwhay arsingpay away amestringnay, andway areway otnay escapedway enwhay\n"
+"Ifway onnay-NIL, Unixway ellshay-tylesay ildcardsway areway ignoredway "
+"enwhay arsingpay\n"
+"  athnamepay amestringsnay.  Eythay areway alsoway ignoredway enwhay "
+"omputingcay\n"
+"  amestringsnay orfay athnamepay objectsway.  Usthay, *, ?, etcway. areway "
+"otnay\n"
+"  ildcardsway enwhay arsingpay away amestringnay, andway areway otnay "
+"escapedway enwhay\n"
 "  intingpray athnamespay."
 
 #: src/code/filesys.lisp
@@ -12214,11 +13976,15 @@ msgstr ":BACK annotcay ebay epresentedray inway amestringsnay."
 
 #: src/code/filesys.lisp
 msgid "Cannot specify a directory separator in a pathname name: ~S"
-msgstr "Annotcay ecifyspay away irectoryday eparatorsay inway away athnamepay amenay: ~S"
+msgstr ""
+"Annotcay ecifyspay away irectoryday eparatorsay inway away athnamepay "
+"amenay: ~S"
 
 #: src/code/filesys.lisp
 msgid "Cannot specify a dot in a pathname name without a pathname type: ~S"
-msgstr "Annotcay ecifyspay away otday inway away athnamepay amenay ithoutway away athnamepay ypetay: ~S"
+msgstr ""
+"Annotcay ecifyspay away otday inway away athnamepay amenay ithoutway away "
+"athnamepay ypetay: ~S"
 
 #: src/code/filesys.lisp
 msgid "Invalid value for a pathname name: ~S"
@@ -12230,7 +13996,9 @@ msgstr "Annotcay ecifyspay ethay ypetay ithoutway away ilefay: ~S"
 
 #: src/code/filesys.lisp
 msgid "Cannot specify a directory separator in a pathname type: ~S"
-msgstr "Annotcay ecifyspay away irectoryday eparatorsay inway away athnamepay ypetay: ~S"
+msgstr ""
+"Annotcay ecifyspay away irectoryday eparatorsay inway away athnamepay "
+"ypetay: ~S"
 
 #: src/code/filesys.lisp
 msgid "Cannot specify a dot in a pathname type: ~S"
@@ -12256,10 +14024,14 @@ msgid ""
 "   If optional argument EXECUTABLE-ONLY is true, NIL is returned\n"
 "   unless an executable version of PATHNAME exists."
 msgstr ""
-"Onvertcay PATHNAME intoway away ingstray atthay ancay ebay usedway ithway UNIX ystemsay allscay.\n"
-"   Earchsay-istslay andway ildway-ardscay areway expandedway. Ifway optionalway argumentway\n"
-"   FOR-INPUT isway uetray andway PATHNAME oesnday't existway, NIL isway eturnedray.\n"
-"   Ifway optionalway argumentway EXECUTABLE-ONLY isway uetray, NIL isway eturnedray\n"
+"Onvertcay PATHNAME intoway away ingstray atthay ancay ebay usedway ithway "
+"UNIX ystemsay allscay.\n"
+"   Earchsay-istslay andway ildway-ardscay areway expandedway. Ifway "
+"optionalway argumentway\n"
+"   FOR-INPUT isway uetray andway PATHNAME oesnday't existway, NIL isway "
+"eturnedray.\n"
+"   Ifway optionalway argumentway EXECUTABLE-ONLY isway uetray, NIL isway "
+"eturnedray\n"
 "   unlessway anway executableway ersionvay ofway PATHNAME existsway."
 
 #: src/code/filesys.lisp
@@ -12272,8 +14044,10 @@ msgid ""
 "  An error of type file-error is signalled if no such file exists,\n"
 "  or the pathname is wild."
 msgstr ""
-"Eturnray ethay athnamepay orfay ethay actualway ilefay escribedday ybay ethay athnamepay\n"
-"  Anway errorway ofway ypetay ilefay-errorway isway ignalledsay ifway onay uchsay ilefay existsway,\n"
+"Eturnray ethay athnamepay orfay ethay actualway ilefay escribedday ybay "
+"ethay athnamepay\n"
+"  Anway errorway ofway ypetay ilefay-errorway isway ignalledsay ifway onay "
+"uchsay ilefay existsway,\n"
 "  orway ethay athnamepay isway ildway."
 
 #: src/code/filesys.lisp
@@ -12289,15 +14063,18 @@ msgid ""
 "Return a pathname which is the truename of the file if it exists, NIL\n"
 "  otherwise. An error of type file-error is signalled if pathname is wild."
 msgstr ""
-"Eturnray away athnamepay ichwhay isway ethay uenametray ofway ethay ilefay ifway itway existsway, NIL\n"
-"  otherwiseway. Anway errorway ofway ypetay ilefay-errorway isway ignalledsay ifway athnamepay isway ildway."
+"Eturnray away athnamepay ichwhay isway ethay uenametray ofway ethay ilefay "
+"ifway itway existsway, NIL\n"
+"  otherwiseway. Anway errorway ofway ypetay ilefay-errorway isway "
+"ignalledsay ifway athnamepay isway ildway."
 
 #: src/code/filesys.lisp
 msgid ""
 "Rename File to have the specified New-Name.  If file is a stream open to a\n"
 "  file, then the associated file is renamed."
 msgstr ""
-"Enameray Ilefay otay avehay ethay ecifiedspay Ewnay-Amenay.  Ifway ilefay isway away eamstray openway otay away\n"
+"Enameray Ilefay otay avehay ethay ecifiedspay Ewnay-Amenay.  Ifway ilefay "
+"isway away eamstray openway otay away\n"
 "  ilefay, enthay ethay associatedway ilefay isway enamedray."
 
 #: src/code/filesys.lisp
@@ -12325,7 +14102,8 @@ msgid ""
 "Delete old versions of files matching the given Pathname,\n"
 "optionally keeping some of the most recent old versions."
 msgstr ""
-"Eleteday oldway ersionsvay ofway ilesfay atchingmay ethay ivengay Athnamepay,\n"
+"Eleteday oldway ersionsvay ofway ilesfay atchingmay ethay ivengay "
+"Athnamepay,\n"
 "optionallyway eepingkay omesay ofway ethay ostmay ecentray oldway ersionsvay."
 
 #: src/code/filesys.lisp
@@ -12333,7 +14111,8 @@ msgid ""
 "Returns the home directory of the logged in user as a pathname.\n"
 "  This is obtained from the logical name \"home:\"."
 msgstr ""
-"Eturnsray ethay omehay irectoryday ofway ethay oggedlay inway userway asway away athnamepay.\n"
+"Eturnsray ethay omehay irectoryday ofway ethay oggedlay inway userway asway "
+"away athnamepay.\n"
 "  Isthay isway obtainedway omfray ethay ogicallay amenay \"omehay:\"."
 
 #: src/code/filesys.lisp
@@ -12341,8 +14120,10 @@ msgid ""
 "Return file's creation date, or NIL if it doesn't exist.\n"
 " An error of type file-error is signalled if file is a wild pathname"
 msgstr ""
-"Eturnray ilefay's eationcray ateday, orway NIL ifway itway oesnday't existway.\n"
-" Anway errorway ofway ypetay ilefay-errorway isway ignalledsay ifway ilefay isway away ildway athnamepay"
+"Eturnray ilefay's eationcray ateday, orway NIL ifway itway oesnday't "
+"existway.\n"
+" Anway errorway ofway ypetay ilefay-errorway isway ignalledsay ifway ilefay "
+"isway away ildway athnamepay"
 
 #: src/code/filesys.lisp
 msgid ""
@@ -12350,8 +14131,10 @@ msgid ""
 " determined.  Signals an error of type file-error if file doesn't exist,\n"
 " or file is a wild pathname."
 msgstr ""
-"Eturnsray ethay ilefay authorway asway away ingstray, orway ilnay ifway ethay authorway annotcay ebay\n"
-" eterminedday.  Ignalssay anway errorway ofway ypetay ilefay-errorway ifway ilefay oesnday't existway,\n"
+"Eturnsray ethay ilefay authorway asway away ingstray, orway ilnay ifway "
+"ethay authorway annotcay ebay\n"
+" eterminedday.  Ignalssay anway errorway ofway ypetay ilefay-errorway ifway "
+"ilefay oesnday't existway,\n"
 " orway ilefay isway away ildway athnamepay."
 
 #: src/code/filesys.lisp
@@ -12359,8 +14142,8 @@ msgid ""
 "Returns a list of pathnames, one for each file that matches the given\n"
 "   pathname.  Supplying :ALL as nil causes this to ignore Unix dot files.  "
 "This\n"
-"   never includes Unix dot and dot-dot in the result.  If :TRUENAMEP is NIL,"
-"\n"
+"   never includes Unix dot and dot-dot in the result.  If :TRUENAMEP is "
+"NIL,\n"
 "   then symbolic links in the result are not expanded, which is not the\n"
 "   default because TRUENAME does follow links and the result pathnames are\n"
 "   defined to be the TRUENAME of the pathname (the truename of a link may "
@@ -12369,17 +14152,20 @@ msgid ""
 "are\n"
 "   not followed."
 msgstr ""
-"Eturnsray away istlay ofway athnamespay, oneway orfay eachway ilefay atthay atchesmay ethay ivengay\n"
-"   athnamepay.  Upplyingsay :ALL asway ilnay ausescay isthay otay ignoreway Unixway otday ilesfay.  "
-"Isthay\n"
-"   evernay includesway Unixway otday andway otday-otday inway ethay esultray.  Ifway :TRUENAMEP isway NIL,"
-"\n"
-"   enthay ymbolicsay inkslay inway ethay esultray areway otnay expandedway, ichwhay isway otnay ethay\n"
-"   efaultday ecausebay TRUENAME oesday ollowfay inkslay andway ethay esultray athnamespay areway\n"
-"   efinedday otay ebay ethay TRUENAME ofway ethay athnamepay (ethay uenametray ofway away inklay aymay "
-"ellway\n"
-"   ebay inway anotherway irectoryday).  Ifway FOLLOW-LINKS isway NIL enthay ymbolicsay inkslay "
-"areway\n"
+"Eturnsray away istlay ofway athnamespay, oneway orfay eachway ilefay atthay "
+"atchesmay ethay ivengay\n"
+"   athnamepay.  Upplyingsay :ALL asway ilnay ausescay isthay otay ignoreway "
+"Unixway otday ilesfay.  Isthay\n"
+"   evernay includesway Unixway otday andway otday-otday inway ethay "
+"esultray.  Ifway :TRUENAMEP isway NIL,\n"
+"   enthay ymbolicsay inkslay inway ethay esultray areway otnay expandedway, "
+"ichwhay isway otnay ethay\n"
+"   efaultday ecausebay TRUENAME oesday ollowfay inkslay andway ethay "
+"esultray athnamespay areway\n"
+"   efinedday otay ebay ethay TRUENAME ofway ethay athnamepay (ethay "
+"uenametray ofway away inklay aymay ellway\n"
+"   ebay inway anotherway irectoryday).  Ifway FOLLOW-LINKS isway NIL enthay "
+"ymbolicsay inkslay areway\n"
 "   otnay ollowedfay."
 
 #: src/code/filesys.lisp
@@ -12390,10 +14176,14 @@ msgid ""
 "   is supplied and non-nil, then a long listing of miscellaneous\n"
 "   information is output one file per line."
 msgstr ""
-"Ikelay Irectoryday, utbay intspray away ersetay, ultimay-olumncay irectoryday istinglay\n"
-"   insteadway ofway eturningray away istlay ofway athnamespay.  Enwhay :allway isway uppliedsay andway\n"
-"   onnay-ilnay, enthay Unixway otday ilesfay areway includedway ootay (asway slay -away).  Enwhay :erbosevay\n"
-"   isway uppliedsay andway onnay-ilnay, enthay away onglay istinglay ofway iscellaneousmay\n"
+"Ikelay Irectoryday, utbay intspray away ersetay, ultimay-olumncay "
+"irectoryday istinglay\n"
+"   insteadway ofway eturningray away istlay ofway athnamespay.  Enwhay :"
+"allway isway uppliedsay andway\n"
+"   onnay-ilnay, enthay Unixway otday ilesfay areway includedway ootay (asway "
+"slay -away).  Enwhay :erbosevay\n"
+"   isway uppliedsay andway onnay-ilnay, enthay away onglay istinglay ofway "
+"iscellaneousmay\n"
 "   informationway isway outputway oneway ilefay erpay inelay."
 
 #: src/code/filesys.lisp
@@ -12410,8 +14200,10 @@ msgid ""
 "   We look in the directory specified by Defaults as well as looking down\n"
 "   the search list."
 msgstr ""
-"Eturnray away istlay ofway allway ilesfay ichwhay areway ossiblepay ompletionscay ofway Athnamepay.\n"
-"   Eway ooklay inway ethay irectoryday ecifiedspay ybay Efaultsday asway ellway asway ookinglay ownday\n"
+"Eturnray away istlay ofway allway ilesfay ichwhay areway ossiblepay "
+"ompletionscay ofway Athnamepay.\n"
+"   Eway ooklay inway ethay irectoryday ecifiedspay ybay Efaultsday asway "
+"ellway asway ookinglay ownday\n"
 "   ethay earchsay istlay."
 
 #: src/code/filesys.lisp
@@ -12419,7 +14211,8 @@ msgid ""
 "File-writable accepts a pathname and returns T if the current\n"
 "  process can write it, and NIL otherwise."
 msgstr ""
-"Ilefay-itablewray acceptsway away athnamepay andway eturnsray T ifway ethay urrentcay\n"
+"Ilefay-itablewray acceptsway away athnamepay andway eturnsray T ifway ethay "
+"urrentcay\n"
 "  ocesspray ancay itewray itway, andway NIL otherwiseway."
 
 #: src/code/filesys.lisp
@@ -12428,8 +14221,10 @@ msgid ""
 "  a file will be written if no directory is specified.  This may be changed\n"
 "  with setf."
 msgstr ""
-"Eturnsray ethay athnamepay orfay ethay efaultday irectoryday.  Isthay isway ethay aceplay erewhay\n"
-"  away ilefay illway ebay ittenwray ifway onay irectoryday isway ecifiedspay.  Isthay aymay ebay angedchay\n"
+"Eturnsray ethay athnamepay orfay ethay efaultday irectoryday.  Isthay isway "
+"ethay aceplay erewhay\n"
+"  away ilefay illway ebay ittenwray ifway onay irectoryday isway "
+"ecifiedspay.  Isthay aymay ebay angedchay\n"
 "  ithway etfsay."
 
 #: src/code/filesys.lisp
@@ -12439,8 +14234,10 @@ msgid ""
 "  Portable programs should avoid using the :MODE keyword argument."
 msgstr ""
 "Eststay etherwhay ethay irectoriesday ontainingcay ethay ecifiedspay ilefay\n"
-"  actuallyway existway, andway attemptsway otay eatecray emthay ifway eythay oday otnay.\n"
-"  Ortablepay ogramspray ouldshay avoidway usingway ethay :MODE eywordkay argumentway."
+"  actuallyway existway, andway attemptsway otay eatecray emthay ifway eythay "
+"oday otnay.\n"
+"  Ortablepay ogramspray ouldshay avoidway usingway ethay :MODE eywordkay "
+"argumentway."
 
 #: src/code/filesys.lisp
 msgid "~&Creating directory: ~A~%"
@@ -12460,13 +14257,15 @@ msgstr "Ethay ourcesay ilefay ypestay ichwhay LOAD ecognizesray."
 
 #: src/code/load.lisp
 msgid "A list of the object file types recognized by LOAD."
-msgstr "Away istlay ofway ethay objectway ilefay ypestay ecognizedray ybay LOAD."
+msgstr ""
+"Away istlay ofway ethay objectway ilefay ypestay ecognizedray ybay LOAD."
 
 #: src/code/load.lisp
 msgid ""
 "A list of the object file types recognized by LOAD for logical pathnames."
 msgstr ""
-"Away istlay ofway ethay objectway ilefay ypestay ecognizedray ybay LOAD orfay ogicallay athnamespay."
+"Away istlay ofway ethay objectway ilefay ypestay ecognizedray ybay LOAD "
+"orfay ogicallay athnamespay."
 
 #: src/code/load.lisp
 msgid "The default for the :VERBOSE argument to Load."
@@ -12478,7 +14277,8 @@ msgstr "Ethay efaultday orfay ethay :PRINT argumentway otay Oadlay."
 
 #: src/code/load.lisp
 msgid "The TRUENAME of the file that LOAD is currently loading."
-msgstr "Ethay TRUENAME ofway ethay ilefay atthay LOAD isway urrentlycay oadinglay."
+msgstr ""
+"Ethay TRUENAME ofway ethay ilefay atthay LOAD isway urrentlycay oadinglay."
 
 #: src/code/load.lisp
 msgid "The defaulted pathname that LOAD is currently loading."
@@ -12506,14 +14306,16 @@ msgstr "Ethay opfay tacksay (eway onlyway eednay oneway!)."
 
 #: src/code/load.lisp
 msgid "Vector indexed by a FaslOP that yields the FOP's name."
-msgstr "Ectorvay indexedway ybay away Aslopfay atthay ieldsyay ethay FOP's amenay."
+msgstr ""
+"Ectorvay indexedway ybay away Aslopfay atthay ieldsyay ethay FOP's amenay."
 
 #: src/code/load.lisp
 msgid ""
 "Vector indexed by a FaslOP that yields a function of 0 arguments which\n"
 "  will perform the operation."
 msgstr ""
-"Ectorvay indexedway ybay away Aslopfay atthay ieldsyay away unctionfay ofway 0 argumentsway ichwhay\n"
+"Ectorvay indexedway ybay away Aslopfay atthay ieldsyay away unctionfay ofway "
+"0 argumentsway ichwhay\n"
 "  illway erformpay ethay operationway."
 
 #: src/code/load.lisp
@@ -12542,12 +14344,12 @@ msgid ""
 "   (a.k.a extension) is defaulted if missing.  These options are defined:\n"
 "\n"
 "   :IF-SOURCE-NEWER <keyword>\n"
-"	If the file type is not specified, and both source and object files\n"
+"\tIf the file type is not specified, and both source and object files\n"
 "        exist, then this argument controls which is loaded:\n"
-"	    :LOAD-OBJECT - load object file (default),\n"
-"	    :LOAD-SOURCE - load the source file,\n"
-"	    :COMPILE - compile the source and then load the object file, or\n"
-"	    :QUERY - ask the user which to load.\n"
+"\t    :LOAD-OBJECT - load object file (default),\n"
+"\t    :LOAD-SOURCE - load the source file,\n"
+"\t    :COMPILE - compile the source and then load the object file, or\n"
+"\t    :QUERY - ask the user which to load.\n"
 "\n"
 "   :IF-DOES-NOT-EXIST {:ERROR | NIL}\n"
 "       If :ERROR (the default), signal an error if the file can't be "
@@ -12568,8 +14370,8 @@ msgid ""
 "       defaulting.  Probably only necessary if you have source files with a\n"
 "       \"fasl\" type. \n"
 "\n"
-"   The variables *LOAD-VERBOSE*, *LOAD-PRINT* and EXT:*LOAD-IF-SOURCE-NEWER"
-"*\n"
+"   The variables *LOAD-VERBOSE*, *LOAD-PRINT* and EXT:*LOAD-IF-SOURCE-"
+"NEWER*\n"
 "   determine the defaults for the corresponding keyword arguments.  These\n"
 "   variables are also bound to the specified argument values, so specifying "
 "a\n"
@@ -12578,45 +14380,58 @@ msgid ""
 "file\n"
 "   types that we use for defaulting when none is specified."
 msgstr ""
-"Oadslay ethay ilefay amednay ybay Ilenamefay intoway ethay Isplay environmentway.  Ethay ilefay ypetay\n"
-"   (away.k.away extensionway) isway efaultedday ifway issingmay.  Esethay optionsway areway efinedday:\n"
+"Oadslay ethay ilefay amednay ybay Ilenamefay intoway ethay Isplay "
+"environmentway.  Ethay ilefay ypetay\n"
+"   (away.k.away extensionway) isway efaultedday ifway issingmay.  Esethay "
+"optionsway areway efinedday:\n"
 "\n"
 "   :IF-SOURCE-NEWER <eywordkay>\n"
-"	Ifway ethay ilefay ypetay isway otnay ecifiedspay, andway othbay ourcesay andway objectway ilesfay\n"
-"        existway, enthay isthay argumentway ontrolscay ichwhay isway oadedlay:\n"
-"	    :LOAD-OBJECT - oadlay objectway ilefay (efaultday),\n"
-"	    :LOAD-SOURCE - oadlay ethay ourcesay ilefay,\n"
-"	    :COMPILE - ompilecay ethay ourcesay andway enthay oadlay ethay objectway ilefay, orway\n"
-"	    :QUERY - askway ethay userway ichwhay otay oadlay.\n"
+"\tIfway ethay ilefay ypetay isway otnay ecifiedspay, andway othbay ourcesay "
+"andway objectway ilesfay\n"
+"        existway, enthay isthay argumentway ontrolscay ichwhay isway "
+"oadedlay:\n"
+"\t    :LOAD-OBJECT - oadlay objectway ilefay (efaultday),\n"
+"\t    :LOAD-SOURCE - oadlay ethay ourcesay ilefay,\n"
+"\t    :COMPILE - ompilecay ethay ourcesay andway enthay oadlay ethay "
+"objectway ilefay, orway\n"
+"\t    :QUERY - askway ethay userway ichwhay otay oadlay.\n"
 "\n"
 "   :IF-DOES-NOT-EXIST {:ERROR | NIL}\n"
-"       Ifway :ERROR (ethay efaultday), ignalsay anway errorway ifway ethay ilefay ancay't ebay "
-"ocatedlay.\n"
+"       Ifway :ERROR (ethay efaultday), ignalsay anway errorway ifway ethay "
+"ilefay ancay't ebay ocatedlay.\n"
 "       Ifway NIL, implysay eturnray NIL (LOAD ormallynay eturnsray T.)\n"
 "\n"
 "   :VERBOSE {T | NIL}\n"
-"       Ifway uetray (ethay efaultday), intpray away inelay escribingday eachway ilefay oadedlay.\n"
+"       Ifway uetray (ethay efaultday), intpray away inelay escribingday "
+"eachway ilefay oadedlay.\n"
 "\n"
 "   :PRINT {T | NIL}\n"
-"       Ifway uetray, intpray informationway aboutway oadedlay aluesvay.  Enwhay oadinglay ethay\n"
-"       ourcesay, ethay esultray ofway evaluatingway eachway optay-evellay ormfay isway intedpray.\n"
+"       Ifway uetray, intpray informationway aboutway oadedlay aluesvay.  "
+"Enwhay oadinglay ethay\n"
+"       ourcesay, ethay esultray ofway evaluatingway eachway optay-evellay "
+"ormfay isway intedpray.\n"
 "\n"
 "   :CONTENTS {NIL | :SOURCE | :BINARY}\n"
-"       Orcesfay ethay inputway otay ebay interpretedway asway away ourcesay orway objectway ilefay, "
-"insteadway\n"
-"       ofway uessinggay asedbay onway ethay ilefay ypetay.  Isthay alsoway inhibitsway ilefay ypetay\n"
-"       efaultingday.  Obablypray onlyway ecessarynay ifway ouyay avehay ourcesay ilesfay ithway away\n"
+"       Orcesfay ethay inputway otay ebay interpretedway asway away ourcesay "
+"orway objectway ilefay, insteadway\n"
+"       ofway uessinggay asedbay onway ethay ilefay ypetay.  Isthay alsoway "
+"inhibitsway ilefay ypetay\n"
+"       efaultingday.  Obablypray onlyway ecessarynay ifway ouyay avehay "
+"ourcesay ilesfay ithway away\n"
 "       \"aslfay\" ypetay. \n"
 "\n"
-"   Ethay ariablesvay *LOAD-VERBOSE*, *LOAD-PRINT* andway EXT:load-if-source-newer*ay"
-"*\n"
-"   etermineday ethay efaultsday orfay ethay orrespondingcay eywordkay argumentsway.  Esethay\n"
-"   ariablesvay areway alsoway oundbay otay ethay ecifiedspay argumentway aluesvay, osay ecifyingspay "
-"away\n"
-"   eywordkay affectsway estednay oadslay.  Ethay ariablesvay EXT:*LOAD-SOURCE-TYPES*,\n"
-"   EXT:*LOAD-OBJECT-TYPES*, andway EXT:*LOAD-LP-OBJECT-TYPES* etermineday ethay "
-"ilefay\n"
-"   ypestay atthay eway useway orfay efaultingday enwhay onenay isway ecifiedspay."
+"   Ethay ariablesvay *LOAD-VERBOSE*, *LOAD-PRINT* andway EXT:load-if-source-"
+"newer*ay*\n"
+"   etermineday ethay efaultsday orfay ethay orrespondingcay eywordkay "
+"argumentsway.  Esethay\n"
+"   ariablesvay areway alsoway oundbay otay ethay ecifiedspay argumentway "
+"aluesvay, osay ecifyingspay away\n"
+"   eywordkay affectsway estednay oadslay.  Ethay ariablesvay EXT:*LOAD-"
+"SOURCE-TYPES*,\n"
+"   EXT:*LOAD-OBJECT-TYPES*, andway EXT:*LOAD-LP-OBJECT-TYPES* etermineday "
+"ethay ilefay\n"
+"   ypestay atthay eway useway orfay efaultingday enwhay onenay isway "
+"ecifiedspay."
 
 #: src/code/load.lisp
 msgid "Return NIL from load of ~S."
@@ -12644,33 +14459,38 @@ msgstr "Oadlay itway asway away ourcesay ilefay."
 
 #: src/code/load.lisp
 msgid "File has a fasl file type, but no fasl file header:~%  ~S"
-msgstr "Ilefay ashay away aslfay ilefay ypetay, utbay onay aslfay ilefay eaderhay:~%  ~S"
+msgstr ""
+"Ilefay ashay away aslfay ilefay ypetay, utbay onay aslfay ilefay eaderhay:~"
+"%  ~S"
 
 #: src/code/load.lisp
 msgid ""
 "Loading object file ~A,~@\n"
-"		  which is older than the presumed source:~%  ~A."
+"\t\t  which is older than the presumed source:~%  ~A."
 msgstr ""
 "Oadinglay objectway ilefay ~Away,~@\n"
-"		  ichwhay isway olderway anthay ethay esumedpray ourcesay:~%  ~Away."
+"\t\t  ichwhay isway olderway anthay ethay esumedpray ourcesay:~%  ~Away."
 
 #: src/code/load.lisp
 msgid ""
 "Loading source file ~A,~@\n"
-"		  which is newer than the presumed object file:~%  ~A."
+"\t\t  which is newer than the presumed object file:~%  ~A."
 msgstr ""
 "Oadinglay ourcesay ilefay ~Away,~@\n"
-"		  ichwhay isway ewernay anthay ethay esumedpray objectway ilefay:~%  ~Away."
+"\t\t  ichwhay isway ewernay anthay ethay esumedpray objectway ilefay:~%  "
+"~Away."
 
 #: src/code/load.lisp
 msgid "Compile of source failed, cannot load object."
 msgstr "Ompilecay ofway ourcesay ailedfay, annotcay oadlay objectway."
 
 #: src/code/load.lisp
-msgid "Object file ~A is~@\n"
-"		       older than the presumed source:~%  ~A."
-msgstr "Objectway ilefay ~Away isway~@\n"
-"		       olderway anthay ethay esumedpray ourcesay:~%  ~Away."
+msgid ""
+"Object file ~A is~@\n"
+"\t\t       older than the presumed source:~%  ~A."
+msgstr ""
+"Objectway ilefay ~Away isway~@\n"
+"\t\t       olderway anthay ethay esumedpray ourcesay:~%  ~Away."
 
 #: src/code/load.lisp
 msgid "load source file"
@@ -12733,7 +14553,8 @@ msgid ""
 "This is a list of module names that have been loaded into Lisp so far.\n"
 "   It is used by PROVIDE and REQUIRE."
 msgstr ""
-"Isthay isway away istlay ofway odulemay amesnay atthay avehay eenbay oadedlay intoway Isplay osay arfay.\n"
+"Isthay isway away istlay ofway odulemay amesnay atthay avehay eenbay "
+"oadedlay intoway Isplay osay arfay.\n"
 "   Itway isway usedway ybay PROVIDE andway REQUIRE."
 
 #: src/code/module.lisp
@@ -12750,8 +14571,10 @@ msgid ""
 "   the module is required.  If name is a symbol, its print name is used\n"
 "   after downcasing it."
 msgstr ""
-"Efinesday away odulemay ybay egisteringray ethay ilesfay atthay eednay otay ebay oadedlay enwhay\n"
-"   ethay odulemay isway equiredray.  Ifway amenay isway away ymbolsay, itsway intpray amenay isway usedway\n"
+"Efinesday away odulemay ybay egisteringray ethay ilesfay atthay eednay otay "
+"ebay oadedlay enwhay\n"
+"   ethay odulemay isway equiredray.  Ifway amenay isway away ymbolsay, "
+"itsway intpray amenay isway usedway\n"
 "   afterway owncasingday itway."
 
 #: src/code/module.lisp
@@ -12761,9 +14584,12 @@ msgid ""
 "  comparisons are done using string=, i.e. module names are\n"
 "  case-sensitive."
 msgstr ""
-"Addsway away ewnay odulemay amenay otay *modules* indicatingway atthay itway ashay eenbay\n"
-"  oadedlay.  Odulemay-amenay aymay ebay anyway alidvay ingstray esignatorday.  Allway\n"
-"  omparisonscay areway oneday usingway ingstray=, i.e. odulemay amesnay areway\n"
+"Addsway away ewnay odulemay amenay otay *modules* indicatingway atthay itway "
+"ashay eenbay\n"
+"  oadedlay.  Odulemay-amenay aymay ebay anyway alidvay ingstray "
+"esignatorday.  Allway\n"
+"  omparisonscay areway oneday usingway ingstray=, i.e. odulemay amesnay "
+"areway\n"
 "  asecay-ensitivesay."
 
 #: src/code/module.lisp
@@ -12791,27 +14617,44 @@ msgid ""
 "  While loading any files, *load-verbose* is bound to *require-verbose*\n"
 "  which defaults to t."
 msgstr ""
-"Oadslay away odulemay enwhay itway ashay otnay eenbay alreadyway.  Athnamepay, ifway\n"
-"  uppliedsay, isway away inglesay athnamepay orway istlay ofway athnamespay otay ebay oadedlay ifway\n"
-"  ethay odulemay eedsnay otay ebay.  Ifway athnamepay isway otnay uppliedsay, enthay unctionsfay\n"
-"  omfray ethay istlay *MODULE-PROVIDER-FUNCTIONS* areway alledcay inway orderway ithway\n"
-"  ethay ingifiedstray MODULE-NAME asway ethay argumentway, untilway oneway ofway emthay\n"
+"Oadslay away odulemay enwhay itway ashay otnay eenbay alreadyway.  "
+"Athnamepay, ifway\n"
+"  uppliedsay, isway away inglesay athnamepay orway istlay ofway athnamespay "
+"otay ebay oadedlay ifway\n"
+"  ethay odulemay eedsnay otay ebay.  Ifway athnamepay isway otnay "
+"uppliedsay, enthay unctionsfay\n"
+"  omfray ethay istlay *MODULE-PROVIDER-FUNCTIONS* areway alledcay inway "
+"orderway ithway\n"
+"  ethay ingifiedstray MODULE-NAME asway ethay argumentway, untilway oneway "
+"ofway emthay\n"
 "  eturnsray onnay-NIL.  Ybay efaultday ethay unctionsfay\n"
-"  MODULE-PROVIDE-CMUCL-DEFMODULE andway MODULE-PROVIDE- CMUCL-LIBRARY areway\n"
-"  onway isthay istlay ofway unctionsfay, inway atthay orderway.  Ethay irstfay ofway osethay ookslay\n"
-"  orfay away istlay ofway ilesfay atthay asway egisteredray ybay away EXT:DEFMODULE ormfay.  Ifway\n"
-"  ethay odulemay ashay otnay eenbay efinedday, enthay ethay econdsay unctionfay ausescay away\n"
-"  ilefay otay ebay oadedlay osewhay amenay isway ormedfay ybay ergingmay \"odulesmay:\" andway\n"
-"  ethay oncatenationcay ofway odulemay-amenay ithway ethay uffixsay \"-LIBRARY\".  Otenay\n"
-"  atthay othbay ethay odulemay-amenay andway ethay uffixsay areway eachway, eparatelysay,\n"
-"  onvertedcay omfray :asecay :ommoncay otay :asecay :ocallay.  Isthay ergedmay amenay illway\n"
-"  ebay obedpray ithway othbay away .isplay andway .aslfay extensionsway, allingcay LOAD ifway itway\n"
+"  MODULE-PROVIDE-CMUCL-DEFMODULE andway MODULE-PROVIDE- CMUCL-LIBRARY "
+"areway\n"
+"  onway isthay istlay ofway unctionsfay, inway atthay orderway.  Ethay "
+"irstfay ofway osethay ookslay\n"
+"  orfay away istlay ofway ilesfay atthay asway egisteredray ybay away EXT:"
+"DEFMODULE ormfay.  Ifway\n"
+"  ethay odulemay ashay otnay eenbay efinedday, enthay ethay econdsay "
+"unctionfay ausescay away\n"
+"  ilefay otay ebay oadedlay osewhay amenay isway ormedfay ybay ergingmay "
+"\"odulesmay:\" andway\n"
+"  ethay oncatenationcay ofway odulemay-amenay ithway ethay uffixsay \"-"
+"LIBRARY\".  Otenay\n"
+"  atthay othbay ethay odulemay-amenay andway ethay uffixsay areway eachway, "
+"eparatelysay,\n"
+"  onvertedcay omfray :asecay :ommoncay otay :asecay :ocallay.  Isthay "
+"ergedmay amenay illway\n"
+"  ebay obedpray ithway othbay away .isplay andway .aslfay extensionsway, "
+"allingcay LOAD ifway itway\n"
 "  existsway.\n"
 "\n"
-"  Otenay atthay inway allway asescay overedcay aboveway, userway odecay isway esponsibleray orfay\n"
-"  allingcay PROVIDE otay indicateway away uccessfulsay oadlay ofway ethay odulemay.\n"
+"  Otenay atthay inway allway asescay overedcay aboveway, userway odecay "
+"isway esponsibleray orfay\n"
+"  allingcay PROVIDE otay indicateway away uccessfulsay oadlay ofway ethay "
+"odulemay.\n"
 "\n"
-"  Ilewhay oadinglay anyway ilesfay, *load-verbose* isway oundbay otay *require-verbose*\n"
+"  Ilewhay oadinglay anyway ilesfay, *load-verbose* isway oundbay otay "
+"*require-verbose*\n"
 "  ichwhay efaultsday otay t."
 
 #: src/code/module.lisp
@@ -12830,18 +14673,24 @@ msgid ""
 "  with \"modules:\".  Note that both the module-name and the suffix\n"
 "  are each, separately, converted from :case :common to :case :local."
 msgstr ""
-"Eriveday away efaultday athnamepay otay ytray otay oadlay orfay anway undefinedway odulemay\n"
-"  amednay odulemay-amenay.  Ethay efaultday athnamepay isway onstructedcay omfray ethay\n"
-"  odulemay-amenay ybay appendingway ethay uffixsay \"-LIBRARY\" otay itway, andway ergingmay\n"
-"  ithway \"odulesmay:\".  Otenay atthay othbay ethay odulemay-amenay andway ethay uffixsay\n"
-"  areway eachway, eparatelysay, onvertedcay omfray :asecay :ommoncay otay :asecay :ocallay."
+"Eriveday away efaultday athnamepay otay ytray otay oadlay orfay anway "
+"undefinedway odulemay\n"
+"  amednay odulemay-amenay.  Ethay efaultday athnamepay isway onstructedcay "
+"omfray ethay\n"
+"  odulemay-amenay ybay appendingway ethay uffixsay \"-LIBRARY\" otay itway, "
+"andway ergingmay\n"
+"  ithway \"odulesmay:\".  Otenay atthay othbay ethay odulemay-amenay andway "
+"ethay uffixsay\n"
+"  areway eachway, eparatelysay, onvertedcay omfray :asecay :ommoncay otay :"
+"asecay :ocallay."
 
 #: src/code/eval.lisp
 msgid ""
 "Keywords that you can put in a lambda-list, supposing you should want\n"
 "  to do such a thing."
 msgstr ""
-"Eywordskay atthay ouyay ancay utpay inway away ambdalay-istlay, upposingsay ouyay ouldshay antway\n"
+"Eywordskay atthay ouyay ancay utpay inway away ambdalay-istlay, upposingsay "
+"ouyay ouldshay antway\n"
 "  otay oday uchsay away ingthay."
 
 #: src/code/eval.lisp
@@ -12849,7 +14698,8 @@ msgid ""
 "The exclusive upper bound on the number of arguments which may be passed\n"
 "  to a function, including rest args."
 msgstr ""
-"Ethay exclusiveway upperway oundbay onway ethay umbernay ofway argumentsway ichwhay aymay ebay assedpay\n"
+"Ethay exclusiveway upperway oundbay onway ethay umbernay ofway argumentsway "
+"ichwhay aymay ebay assedpay\n"
 "  otay away unctionfay, includingway estray argsway."
 
 #: src/code/eval.lisp
@@ -12859,9 +14709,10 @@ msgid ""
 "optional\n"
 "  parameters.  With &key and &aux you can get more."
 msgstr ""
-"Ethay exclusiveway upperway oundbay onway ethay umbernay ofway arameterspay ichwhay aymay ebay ecifedspay\n"
-"  inway away ivengay ambdalay istlay.  Isthay isway actuallyway ethay imitlay onway equiredray andway "
-"optionalway\n"
+"Ethay exclusiveway upperway oundbay onway ethay umbernay ofway arameterspay "
+"ichwhay aymay ebay ecifedspay\n"
+"  inway away ivengay ambdalay istlay.  Isthay isway actuallyway ethay "
+"imitlay onway equiredray andway optionalway\n"
 "  arameterspay.  Ithway &eykay andway &auxway ouyay ancay etgay oremay."
 
 #: src/code/eval.lisp
@@ -12869,13 +14720,14 @@ msgid ""
 "The exclusive upper bound on the number of multiple-values that you can\n"
 "  have."
 msgstr ""
-"Ethay exclusiveway upperway oundbay onway ethay umbernay ofway ultiplemay-aluesvay atthay ouyay ancay\n"
+"Ethay exclusiveway upperway oundbay onway ethay umbernay ofway ultiplemay-"
+"aluesvay atthay ouyay ancay\n"
 "  avehay."
 
 #: src/code/eval.lisp
 msgid ""
-"This variable controls whether assignments to unknown variables at top-level"
-"\n"
+"This variable controls whether assignments to unknown variables at top-"
+"level\n"
 "   (or in any other call to EVAL of SETQ) will implicitly declare the "
 "variable\n"
 "   SPECIAL.  These values are meaningful:\n"
@@ -12884,22 +14736,24 @@ msgid ""
 "      T     -- Quietly declare the variable special.\n"
 "      NIL   -- Never declare the variable, giving warnings on each use."
 msgstr ""
-"Isthay ariablevay ontrolscay etherwhay assignmentsway otay unknownway ariablesvay atway optay-evellay"
-"\n"
-"   (orway inway anyway otherway allcay otay EVAL ofway SETQ) illway implicitlyway eclareday ethay "
-"ariablevay\n"
+"Isthay ariablevay ontrolscay etherwhay assignmentsway otay unknownway "
+"ariablesvay atway optay-evellay\n"
+"   (orway inway anyway otherway allcay otay EVAL ofway SETQ) illway "
+"implicitlyway eclareday ethay ariablevay\n"
 "   SPECIAL.  Esethay aluesvay areway eaningfulmay:\n"
-"     :WARN  -- Intpray away arningway, utbay eclareday ethay ariablevay ecialspay (ethay "
-"efaultday.)\n"
+"     :WARN  -- Intpray away arningway, utbay eclareday ethay ariablevay "
+"ecialspay (ethay efaultday.)\n"
 "      T     -- Ietlyquay eclareday ethay ariablevay ecialspay.\n"
-"      NIL   -- Evernay eclareday ethay ariablevay, ivinggay arningsway onway eachway useway."
+"      NIL   -- Evernay eclareday ethay ariablevay, ivinggay arningsway onway "
+"eachway useway."
 
 #: src/code/eval.lisp
 msgid ""
 "Evaluates its single arg in a null lexical environment, returns the\n"
 "  result or results."
 msgstr ""
-"Evaluatesway itsway inglesay argway inway away ullnay exicallay environmentway, eturnsray ethay\n"
+"Evaluatesway itsway inglesay argway inway away ullnay exicallay "
+"environmentway, eturnsray ethay\n"
 "  esultray orway esultsray."
 
 #: src/code/eval.lisp
@@ -12933,18 +14787,20 @@ msgstr "Adbay Evalway-Enwhay ituationsay istlay: ~S."
 #: src/code/eval.lisp
 msgid ""
 "Attempt to evaluation a complex expression:~%     ~S~@\n"
-"	  This expression must be compiled, but the compiler is not loaded."
+"\t  This expression must be compiled, but the compiler is not loaded."
 msgstr ""
 "Attemptway otay evaluationway away omplexcay expressionway:~%     ~S~@\n"
-"	  Isthay expressionway ustmay ebay ompiledcay, utbay ethay ompilercay isway otnay oadedlay."
+"\t  Isthay expressionway ustmay ebay ompiledcay, utbay ethay ompilercay "
+"isway otnay oadedlay."
 
 #: src/code/eval.lisp
 msgid ""
 "EVAL called on #'(lambda (x) ...) when the compiler isn't loaded:~\n"
-"	  ~%     ~S~%"
+"\t  ~%     ~S~%"
 msgstr ""
-"EVAL alledcay onway #'(ambdalay (x) ...) enwhay ethay ompilercay isnway't oadedlay:~\n"
-"	  ~%     ~S~%"
+"EVAL alledcay onway #'(ambdalay (x) ...) enwhay ethay ompilercay isnway't "
+"oadedlay:~\n"
+"\t  ~%     ~S~%"
 
 #: src/code/eval.lisp
 msgid ""
@@ -12952,27 +14808,30 @@ msgid ""
 "   1] A lambda expression that could be used to define the function, or NIL "
 "if\n"
 "      the definition isn't available.\n"
-"   2] NIL if the function was definitely defined in a null lexical environme"
-"nt,\n"
+"   2] NIL if the function was definitely defined in a null lexical "
+"environment,\n"
 "      and T otherwise.\n"
 "   3] Some object that \"names\" the function.  Although this is allowed to "
 "be\n"
 "      any object, CMU CL always returns a valid function name or a string."
 msgstr ""
 "Ivengay away unctionfay, eturnray reethay aluesvay:\n"
-"   1] Away ambdalay expressionway atthay ouldcay ebay usedway otay efineday ethay unctionfay, orway NIL "
-"ifway\n"
+"   1] Away ambdalay expressionway atthay ouldcay ebay usedway otay efineday "
+"ethay unctionfay, orway NIL ifway\n"
 "      ethay efinitionday isnway't availableway.\n"
-"   2] NIL ifway ethay unctionfay asway efinitelyday efinedday inway away ullnay exicallay environmeway"
-"tnay,\n"
+"   2] NIL ifway ethay unctionfay asway efinitelyday efinedday inway away "
+"ullnay exicallay environmewaytnay,\n"
 "      andway T otherwiseway.\n"
-"   3] Omesay objectway atthay \"amesnay\" ethay unctionfay.  Althoughway isthay isway allowedway otay "
-"ebay\n"
-"      anyway objectway, CMU CL alwaysway eturnsray away alidvay unctionfay amenay orway away ingstray."
+"   3] Omesay objectway atthay \"amesnay\" ethay unctionfay.  Althoughway "
+"isthay isway allowedway otay ebay\n"
+"      anyway objectway, CMU CL alwaysway eturnsray away alidvay unctionfay "
+"amenay orway away ingstray."
 
 #: src/code/eval.lisp
 msgid "If the symbol globally names a special form, returns T, otherwise NIL."
-msgstr "Ifway ethay ymbolsay oballyglay amesnay away ecialspay ormfay, eturnsray T, otherwiseway NIL."
+msgstr ""
+"Ifway ethay ymbolsay oballyglay amesnay away ecialspay ormfay, eturnsray T, "
+"otherwiseway NIL."
 
 #: src/code/eval.lisp
 msgid ""
@@ -12983,11 +14842,16 @@ msgid ""
 "  whenever a runtime expansion is needed.  Initially this is set to\n"
 "  FUNCALL."
 msgstr ""
-"Ethay aluevay ofway isthay ariablevay ustmay ebay away unctionfay atthay ancay aketay reethay\n"
-"  argumentsway, away acromay expanderway unctionfay, ethay acromay ormfay otay ebay expandedway,\n"
-"  andway ethay exicallay environmentway otay expandway inway.  Ethay unctionfay ouldshay\n"
-"  eturnray ethay expandedway ormfay.  Isthay unctionfay isway alledcay ybay MACROEXPAND-1\n"
-"  eneverwhay away untimeray expansionway isway eedednay.  Initiallyway isthay isway etsay otay\n"
+"Ethay aluevay ofway isthay ariablevay ustmay ebay away unctionfay atthay "
+"ancay aketay reethay\n"
+"  argumentsway, away acromay expanderway unctionfay, ethay acromay ormfay "
+"otay ebay expandedway,\n"
+"  andway ethay exicallay environmentway otay expandway inway.  Ethay "
+"unctionfay ouldshay\n"
+"  eturnray ethay expandedway ormfay.  Isthay unctionfay isway alledcay ybay "
+"MACROEXPAND-1\n"
+"  eneverwhay away untimeray expansionway isway eedednay.  Initiallyway "
+"isthay isway etsay otay\n"
 "  FUNCALL."
 
 #: src/code/eval.lisp
@@ -12995,7 +14859,8 @@ msgid ""
 "Invoke *MACROEXPAND-HOOK* on FUN, FORM, and ENV after coercing it to\n"
 "   a function."
 msgstr ""
-"Invokeway *MACROEXPAND-HOOK* onway FUN, FORM, andway ENV afterway oercingcay itway otay\n"
+"Invokeway *MACROEXPAND-HOOK* onway FUN, FORM, andway ENV afterway oercingcay "
+"itway otay\n"
 "   away unctionfay."
 
 #: src/code/eval.lisp
@@ -13004,8 +14869,10 @@ msgid ""
 "   else returns NIL.  If ENV is unspecified or NIL, use the global\n"
 "   environment only."
 msgstr ""
-"Ifway SYMBOL amesnay away acromay inway ENV, eturnsray ethay expansionway unctionfay,\n"
-"   elseway eturnsray NIL.  Ifway ENV isway unspecifiedway orway NIL, useway ethay obalglay\n"
+"Ifway SYMBOL amesnay away acromay inway ENV, eturnsray ethay expansionway "
+"unctionfay,\n"
+"   elseway eturnsray NIL.  Ifway ENV isway unspecifiedway orway NIL, useway "
+"ethay obalglay\n"
 "   environmentway onlyway."
 
 #: src/code/eval.lisp
@@ -13025,11 +14892,12 @@ msgid ""
 "defaults\n"
 "   to the null environment."
 msgstr ""
-"Ifway ormfay isway away acromay (orway ymbolsay acromay), expandsway itway onceway.  Eturnsray wotay aluesvay,\n"
-"   ethay expandedway ormfay andway away T-orway-NIL agflay indicatingway etherwhay ethay ormfay asway, "
-"inway\n"
-"   actfay, away acromay.  Envway isway ethay exicallay environmentway otay expandway inway, ichwhay "
-"efaultsday\n"
+"Ifway ormfay isway away acromay (orway ymbolsay acromay), expandsway itway "
+"onceway.  Eturnsray wotay aluesvay,\n"
+"   ethay expandedway ormfay andway away T-orway-NIL agflay indicatingway "
+"etherwhay ethay ormfay asway, inway\n"
+"   actfay, away acromay.  Envway isway ethay exicallay environmentway otay "
+"expandway inway, ichwhay efaultsday\n"
 "   otay ethay ullnay environmentway."
 
 #: src/code/eval.lisp
@@ -13039,9 +14907,12 @@ msgid ""
 "   lexical environment to expand in, or NIL (the default) for the null\n"
 "   environment."
 msgstr ""
-"Epetitivelyray allcay MACROEXPAND-1 untilway ethay ormfay ancay onay ongerlay ebay expandedway.\n"
-"   Eturnsray ethay inalfay esultantray ormfay, andway T ifway itway asway expandedway.  ENV isway ethay\n"
-"   exicallay environmentway otay expandway inway, orway NIL (ethay efaultday) orfay ethay ullnay\n"
+"Epetitivelyray allcay MACROEXPAND-1 untilway ethay ormfay ancay onay "
+"ongerlay ebay expandedway.\n"
+"   Eturnsray ethay inalfay esultantray ormfay, andway T ifway itway asway "
+"expandedway.  ENV isway ethay\n"
+"   exicallay environmentway otay expandway inway, orway NIL (ethay "
+"efaultday) orfay ethay ullnay\n"
 "   environmentway."
 
 #: src/code/eval.lisp
@@ -13051,9 +14922,12 @@ msgid ""
 "   definition, or declared NOTINLINE, NIL is returned.  Can be\n"
 "   set with SETF."
 msgstr ""
-"Ifway NAME amesnay away ompilercay-acromay, eturnsray ethay expansionway unctionfay,\n"
-"   elseway eturnsray NIL.  Otenay: ifway ethay amenay isway adowedshay inway ENV ybay away ocallay\n"
-"   efinitionday, orway eclaredday NOTINLINE, NIL isway eturnedray.  Ancay ebay\n"
+"Ifway NAME amesnay away ompilercay-acromay, eturnsray ethay expansionway "
+"unctionfay,\n"
+"   elseway eturnsray NIL.  Otenay: ifway ethay amenay isway adowedshay inway "
+"ENV ybay away ocallay\n"
+"   efinitionday, orway eclaredday NOTINLINE, NIL isway eturnedray.  Ancay "
+"ebay\n"
 "   etsay ithway SETF."
 
 #: src/code/eval.lisp
@@ -13062,9 +14936,12 @@ msgid ""
 "   invoke the expander function using *macroexpand-hook* and return the\n"
 "   results and T.  Otherwise, return the original form and NIL."
 msgstr ""
-"Ifway FORM isway away unctionfay allcay orfay ichwhay away ompilercay-acromay ashay eenbay efinedday,\n"
-"   invokeway ethay expanderway unctionfay usingway *macroexpand-hook* andway eturnray ethay\n"
-"   esultsray andway T.  Otherwiseway, eturnray ethay originalway ormfay andway NIL."
+"Ifway FORM isway away unctionfay allcay orfay ichwhay away ompilercay-"
+"acromay ashay eenbay efinedday,\n"
+"   invokeway ethay expanderway unctionfay usingway *macroexpand-hook* andway "
+"eturnray ethay\n"
+"   esultsray andway T.  Otherwiseway, eturnray ethay originalway ormfay "
+"andway NIL."
 
 #: src/code/eval.lisp
 msgid ""
@@ -13072,8 +14949,10 @@ msgid ""
 "   expanded.  ENV is the lexical environment to expand in, or NIL (the\n"
 "   default) for the null environment."
 msgstr ""
-"Epetitivelyray allcay COMPILER-MACROEXPAND-1 untilway ethay ormfay ancay onay ongerlay ebay\n"
-"   expandedway.  ENV isway ethay exicallay environmentway otay expandway inway, orway NIL (ethay\n"
+"Epetitivelyray allcay COMPILER-MACROEXPAND-1 untilway ethay ormfay ancay "
+"onay ongerlay ebay\n"
+"   expandedway.  ENV isway ethay exicallay environmentway otay expandway "
+"inway, orway NIL (ethay\n"
 "   efaultday) orfay ethay ullnay environmentway."
 
 #: src/code/eval.lisp
@@ -13081,8 +14960,10 @@ msgid ""
 "True of any Lisp object that has a constant value: types that eval to\n"
 "  themselves, keywords, constants, and list whose car is QUOTE."
 msgstr ""
-"Uetray ofway anyway Isplay objectway atthay ashay away onstantcay aluevay: ypestay atthay evalway otay\n"
-"  emselvesthay, eywordskay, onstantscay, andway istlay osewhay arcay isway QUOTE."
+"Uetray ofway anyway Isplay objectway atthay ashay away onstantcay aluevay: "
+"ypestay atthay evalway otay\n"
+"  emselvesthay, eywordskay, onstantscay, andway istlay osewhay arcay isway "
+"QUOTE."
 
 #: src/code/eval.lisp
 msgid ""
@@ -13093,11 +14974,12 @@ msgid ""
 "a\n"
 "  list."
 msgstr ""
-"Appliesway FUNCTION otay away istlay ofway argumentsway oducedpray ybay evaluatingway ARGS inway\n"
-"  ethay annermay ofway Ist*Lay.  Atthay isway, away istlay isway ademay ofway ethay aluesvay ofway allway utbay "
-"ethay\n"
-"  astlay argumentway, appendedway otay ethay aluevay ofway ethay astlay argumentway, ichwhay ustmay ebay "
-"away\n"
+"Appliesway FUNCTION otay away istlay ofway argumentsway oducedpray ybay "
+"evaluatingway ARGS inway\n"
+"  ethay annermay ofway Ist*Lay.  Atthay isway, away istlay isway ademay "
+"ofway ethay aluesvay ofway allway utbay ethay\n"
+"  astlay argumentway, appendedway otay ethay aluevay ofway ethay astlay "
+"argumentway, ichwhay ustmay ebay away\n"
 "  istlay."
 
 #: src/code/eval.lisp
@@ -13106,11 +14988,14 @@ msgstr "Allscay Unctionfay ithway ethay ivengay Argumentsway."
 
 #: src/code/eval.lisp
 msgid "Returns all of its arguments, in order, as values."
-msgstr "Eturnsray allway ofway itsway argumentsway, inway orderway, asway aluesvay."
+msgstr ""
+"Eturnsray allway ofway itsway argumentsway, inway orderway, asway aluesvay."
 
 #: src/code/eval.lisp
 msgid "Returns all of the elements of List, in order, as values."
-msgstr "Eturnsray allway ofway ethay elementsway ofway Istlay, inway orderway, asway aluesvay."
+msgstr ""
+"Eturnsray allway ofway ethay elementsway ofway Istlay, inway orderway, asway "
+"aluesvay."
 
 #: src/code/signal.lisp
 msgid "A list of unix signal structures."
@@ -13125,15 +15010,18 @@ msgid ""
 "Return the name of the signal as a string.  Signal should be a valid\n"
 "  signal number or a keyword of the standard UNIX signal name."
 msgstr ""
-"Eturnray ethay amenay ofway ethay ignalsay asway away ingstray.  Ignalsay ouldshay ebay away alidvay\n"
-"  ignalsay umbernay orway away eywordkay ofway ethay tandardsay UNIX ignalsay amenay."
+"Eturnray ethay amenay ofway ethay ignalsay asway away ingstray.  Ignalsay "
+"ouldshay ebay away alidvay\n"
+"  ignalsay umbernay orway away eywordkay ofway ethay tandardsay UNIX "
+"ignalsay amenay."
 
 #: src/code/signal.lisp
 msgid ""
 "Return a string describing signal.  Signal should be a valid signal\n"
 "  number or a keyword of the standard UNIX signal name."
 msgstr ""
-"Eturnray away ingstray escribingday ignalsay.  Ignalsay ouldshay ebay away alidvay ignalsay\n"
+"Eturnray away ingstray escribingday ignalsay.  Ignalsay ouldshay ebay away "
+"alidvay ignalsay\n"
 "  umbernay orway away eywordkay ofway ethay tandardsay UNIX ignalsay amenay."
 
 #: src/code/signal.lisp
@@ -13141,8 +15029,10 @@ msgid ""
 "Return the number of the given signal.  Signal should be a valid\n"
 "  signal number or a keyword of the standard UNIX signal name."
 msgstr ""
-"Eturnray ethay umbernay ofway ethay ivengay ignalsay.  Ignalsay ouldshay ebay away alidvay\n"
-"  ignalsay umbernay orway away eywordkay ofway ethay tandardsay UNIX ignalsay amenay."
+"Eturnray ethay umbernay ofway ethay ivengay ignalsay.  Ignalsay ouldshay "
+"ebay away alidvay\n"
+"  ignalsay umbernay orway away eywordkay ofway ethay tandardsay UNIX "
+"ignalsay amenay."
 
 #: src/code/signal.lisp
 msgid "Check"
@@ -13274,8 +15164,10 @@ msgid ""
 "   id pid.  Signal should be a valid signal number or a keyword of the\n"
 "   standard UNIX signal name."
 msgstr ""
-"Unixway-illkay endssay ethay ignalsay ignalsay otay ethay ocesspray ithway ocesspray \n"
-"   idway idpay.  Ignalsay ouldshay ebay away alidvay ignalsay umbernay orway away eywordkay ofway ethay\n"
+"Unixway-illkay endssay ethay ignalsay ignalsay otay ethay ocesspray ithway "
+"ocesspray \n"
+"   idway idpay.  Ignalsay ouldshay ebay away alidvay ignalsay umbernay orway "
+"away eywordkay ofway ethay\n"
 "   tandardsay UNIX ignalsay amenay."
 
 #: src/code/signal.lisp
@@ -13284,8 +15176,10 @@ msgid ""
 "  group PGRP.  Signal should be a valid signal number or a keyword of\n"
 "  the standard UNIX signal name."
 msgstr ""
-"Unixway-illpgkay endssay ethay ignalsay ignalsay otay ethay allway ethay ocesspray inway ocesspray\n"
-"  oupgray PGRP.  Ignalsay ouldshay ebay away alidvay ignalsay umbernay orway away eywordkay ofway\n"
+"Unixway-illpgkay endssay ethay ignalsay ignalsay otay ethay allway ethay "
+"ocesspray inway ocesspray\n"
+"  oupgray PGRP.  Ignalsay ouldshay ebay away alidvay ignalsay umbernay orway "
+"away eywordkay ofway\n"
 "  ethay tandardsay UNIX ignalsay amenay."
 
 #: src/code/signal.lisp
@@ -13294,9 +15188,12 @@ msgid ""
 "   added to the set of signals currently being blocked from\n"
 "   delivery.  The macro sigmask is provided to create masks."
 msgstr ""
-"Unixway-igblocksay ausecay ethay ignalssay ecifiedspay inway askmay otay ebay\n"
-"   addedway otay ethay etsay ofway ignalssay urrentlycay eingbay ockedblay omfray\n"
-"   eliveryday.  Ethay acromay igmasksay isway ovidedpray otay eatecray asksmay."
+"Unixway-igblocksay ausecay ethay ignalssay ecifiedspay inway askmay otay "
+"ebay\n"
+"   addedway otay ethay etsay ofway ignalssay urrentlycay eingbay ockedblay "
+"omfray\n"
+"   eliveryday.  Ethay acromay igmasksay isway ovidedpray otay eatecray "
+"asksmay."
 
 #: src/code/signal.lisp
 msgid ""
@@ -13304,8 +15201,10 @@ msgid ""
 "   and then waits for a signal to arrive, restoring the previous\n"
 "   mask upon its return."
 msgstr ""
-"Unixway-igpausesay etssay ethay etsay ofway askedmay ignalssay otay itsway argumentway\n"
-"   andway enthay aitsway orfay away ignalsay otay arriveway, estoringray ethay eviouspray\n"
+"Unixway-igpausesay etssay ethay etsay ofway askedmay ignalssay otay itsway "
+"argumentway\n"
+"   andway enthay aitsway orfay away ignalsay otay arriveway, estoringray "
+"ethay eviouspray\n"
 "   askmay uponway itsway eturnray."
 
 #: src/code/signal.lisp
@@ -13315,14 +15214,19 @@ msgid ""
 "   can be used to create the mask.  The previous value of the signal\n"
 "   mask is returned."
 msgstr ""
-"Unixway-igsetmasksay etssay ethay urrentcay etsay ofway askedmay ignalssay (osethay\n"
-"   eingbay ockedblay omfray eliveryday) otay ethay argumentway.  Ethay acromay igmasksay\n"
-"   ancay ebay usedway otay eatecray ethay askmay.  Ethay eviouspray aluevay ofway ethay ignalsay\n"
+"Unixway-igsetmasksay etssay ethay urrentcay etsay ofway askedmay ignalssay "
+"(osethay\n"
+"   eingbay ockedblay omfray eliveryday) otay ethay argumentway.  Ethay "
+"acromay igmasksay\n"
+"   ancay ebay usedway otay eatecray ethay askmay.  Ethay eviouspray aluevay "
+"ofway ethay ignalsay\n"
 "   askmay isway eturnedray."
 
 #: src/code/signal.lisp
 msgid "Enable all the default signals that Lisp knows how to deal with."
-msgstr "Enableway allway ethay efaultday ignalssay atthay Isplay nowskay owhay otay ealday ithway."
+msgstr ""
+"Enableway allway ethay efaultday ignalssay atthay Isplay nowskay owhay otay "
+"ealday ithway."
 
 #: src/code/signal.lisp
 msgid "Execute BODY in a context impervious to interrupts."
@@ -13333,7 +15237,8 @@ msgid ""
 "Allow interrupts while executing BODY.  As interrupts are normally allowed,\n"
 "  this is only useful inside a WITHOUT-INTERRUPTS."
 msgstr ""
-"Allowway interruptsway ilewhay executingway BODY.  Asway interruptsway areway ormallynay allowedway,\n"
+"Allowway interruptsway ilewhay executingway BODY.  Asway interruptsway "
+"areway ormallynay allowedway,\n"
 "  isthay isway onlyway usefulway insideway away WITHOUT-INTERRUPTS."
 
 #: src/code/signal.lisp
@@ -13343,7 +15248,8 @@ msgid ""
 "   should be a number between 1 and 31 inclusive."
 msgstr ""
 "Ithway-enabledway-interruptsway ({(interruptway unctionfay)}*) {ormfay}*\n"
-"   Establishway unctionfay asway away andlerhay orfay ethay Unixway ignalsay interruptway ichwhay\n"
+"   Establishway unctionfay asway away andlerhay orfay ethay Unixway ignalsay "
+"interruptway ichwhay\n"
 "   ouldshay ebay away umbernay etweenbay 1 andway 31 inclusiveway."
 
 #: src/code/interr.lisp
@@ -13360,7 +15266,9 @@ msgstr "Attemptway otay useway VALUES-LIST onway away ottedday-istlay:~%  ~S"
 
 #: src/code/interr.lisp
 msgid "Attempt to RETURN-FROM a block or GO to a tag that no longer exists"
-msgstr "Attemptway otay RETURN-FROM away ockblay orway GO otay away agtay atthay onay ongerlay existsway"
+msgstr ""
+"Attemptway otay RETURN-FROM away ockblay orway GO otay away agtay atthay "
+"onay ongerlay existsway"
 
 #: src/code/interr.lisp
 msgid "Attempt to THROW to a tag that does not exist: ~S"
@@ -13372,17 +15280,21 @@ msgstr "Unctionfay ithway eclaredday esultray ypetay NIL eturnedray:~%  ~S"
 
 #: src/code/interr.lisp
 msgid "Invalid array index, ~D for ~S.  Array has no elements."
-msgstr "Invalidway arrayway indexway, ~D orfay ~S.  Arrayway ashay onay elementsway."
+msgstr ""
+"Invalidway arrayway indexway, ~D orfay ~S.  Arrayway ashay onay elementsway."
 
 #: src/code/interr.lisp
 msgid ""
 "Invalid array index, ~D for ~S.  Should have greater than or equal to 0."
 msgstr ""
-"Invalidway arrayway indexway, ~D orfay ~S.  Ouldshay avehay eatergray anthay orway equalway otay 0."
+"Invalidway arrayway indexway, ~D orfay ~S.  Ouldshay avehay eatergray anthay "
+"orway equalway otay 0."
 
 #: src/code/interr.lisp
 msgid "Invalid array index, ~D for ~S.  Should have been less than ~D"
-msgstr "Invalidway arrayway indexway, ~D orfay ~S.  Ouldshay avehay eenbay esslay anthay ~D"
+msgstr ""
+"Invalidway arrayway indexway, ~D orfay ~S.  Ouldshay avehay eenbay esslay "
+"anthay ~D"
 
 #: src/code/interr.lisp
 msgid "Undefined foreign symbol: ~S"
@@ -13393,7 +15305,8 @@ msgid ""
 "The maximum number of nested errors allowed.  Internal errors are\n"
 "   double-counted."
 msgstr ""
-"Ethay aximummay umbernay ofway estednay errorsway allowedway.  Internalway errorsway areway\n"
+"Ethay aximummay umbernay ofway estednay errorsway allowedway.  Internalway "
+"errorsway areway\n"
 "   oubleday-ountedcay."
 
 #: src/code/interr.lisp
@@ -13409,16 +15322,21 @@ msgid "Internal error ~D: ~A.  args=~S"
 msgstr "Internalway errorway ~D: ~Away.  argsway=~S"
 
 #: src/code/interr.lisp
+#, fuzzy
 msgid ""
-"~2&~@<A control stack overflow has occurred: ~\n"
-"            the program has entered the yellow control stack guard zone.  ~\n"
-"            Please note that you will be returned to the Top-Level if you ~\n"
+"~2&~@<A control stack overflow has occurred:~%~\n"
+"            the program has entered the yellow control stack guard zone.~%~\n"
+"            Please note that you will be returned to the Top-Level if you~"
+"%~\n"
 "            enter the red control stack guard zone while debugging.~@:>~2%"
 msgstr ""
 "~2&~@<Away ontrolcay tacksay overflowway ashay occurredway: ~\n"
-"            ethay ogrampray ashay enteredway ethay ellowyay ontrolcay tacksay uardgay onezay.  ~\n"
-"            Easeplay otenay atthay ouyay illway ebay eturnedray otay ethay Optay-Evellay ifway ouyay ~\n"
-"            enterway ethay edray ontrolcay tacksay uardgay onezay ilewhay ebuggingday.~@:>~2%"
+"            ethay ogrampray ashay enteredway ethay ellowyay ontrolcay "
+"tacksay uardgay onezay.  ~\n"
+"            Easeplay otenay atthay ouyay illway ebay eturnedray otay ethay "
+"Optay-Evellay ifway ouyay ~\n"
+"            enterway ethay edray ontrolcay tacksay uardgay onezay ilewhay "
+"ebuggingday.~@:>~2%"
 
 #: src/code/interr.lisp
 msgid ""
@@ -13427,34 +15345,40 @@ msgid ""
 "           Returning to Top-Level.~@:>~2%"
 msgstr ""
 "~2&~@<Atalfay ontrolcay tacksay overflowway.  Ouyay avehay enteredway~%~\n"
-"           ethay edray ontrolcay tacksay uardgay onezay ilewhay ebuggingday.~%~\n"
+"           ethay edray ontrolcay tacksay uardgay onezay ilewhay ebuggingday.~"
+"%~\n"
 "           Eturningray otay Optay-Evellay.~@:>~2%"
 
 #: src/code/interr.lisp
 msgid ""
 "~2&~@<Imminent dynamic space overflow has occurred:~%~\n"
 "            Only a small amount of dynamic space is available now.~%~\n"
-"            Please note that you will be returned to the Top-Level "
-"without~%~\n"
+"            Please note that you will be returned to the Top-Level without~"
+"%~\n"
 "            warning if you run out of space while debugging.~@:>~%"
 msgstr ""
 "~2&~@<Imminentway ynamicday acespay overflowway ashay occurredway:~%~\n"
-"            Onlyway away mallsay amountway ofway ynamicday acespay isway availableway ownay.~%~\n"
-"            Easeplay otenay atthay ouyay illway ebay eturnedray otay ethay Optay-Evellay "
-"ithoutway~%~\n"
-"            arningway ifway ouyay unray outway ofway acespay ilewhay ebuggingday.~@:>~%"
+"            Onlyway away mallsay amountway ofway ynamicday acespay isway "
+"availableway ownay.~%~\n"
+"            Easeplay otenay atthay ouyay illway ebay eturnedray otay ethay "
+"Optay-Evellay ithoutway~%~\n"
+"            arningway ifway ouyay unray outway ofway acespay ilewhay "
+"ebuggingday.~@:>~%"
 
 #: src/code/debug-int.lisp
 msgid ""
 "All debug-conditions inherit from this type.  These are serious conditions\n"
 "    that must be handled, but they are not programmer errors."
 msgstr ""
-"Allway ebugday-onditionscay inheritway omfray isthay ypetay.  Esethay areway erioussay onditionscay\n"
-"    atthay ustmay ebay andledhay, utbay eythay areway otnay ogrammerpray errorsway."
+"Allway ebugday-onditionscay inheritway omfray isthay ypetay.  Esethay areway "
+"erioussay onditionscay\n"
+"    atthay ustmay ebay andledhay, utbay eythay areway otnay ogrammerpray "
+"errorsway."
 
 #: src/code/debug-int.lisp
 msgid "There is absolutely no debugging information available."
-msgstr "Erethay isway absolutelyway onay ebuggingday informationway availableway."
+msgstr ""
+"Erethay isway absolutelyway onay ebuggingday informationway availableway."
 
 #: src/code/debug-int.lisp
 msgid "No debugging information available."
@@ -13465,18 +15389,19 @@ msgid ""
 "The system could not return values from a frame with debug-function since\n"
 "    it lacked information about returning values."
 msgstr ""
-"Ethay ystemsay ouldcay otnay eturnray aluesvay omfray away amefray ithway ebugday-unctionfay incesay\n"
+"Ethay ystemsay ouldcay otnay eturnray aluesvay omfray away amefray ithway "
+"ebugday-unctionfay incesay\n"
 "    itway ackedlay informationway aboutway eturningray aluesvay."
 
 #: src/code/debug-int.lisp
 msgid ""
 "~&Cannot return values from ~:[frame~;~:*~S~] since ~\n"
-"			the debug information lacks details about returning ~\n"
-"			values here."
+"\t\t\tthe debug information lacks details about returning ~\n"
+"\t\t\tvalues here."
 msgstr ""
 "~&Annotcay eturnray aluesvay omfray ~:[amefray~;~:*~S~] incesay ~\n"
-"			ethay ebugday informationway ackslay etailsday aboutway eturningray ~\n"
-"			aluesvay erehay."
+"\t\t\tethay ebugday informationway ackslay etailsday aboutway eturningray ~\n"
+"\t\t\taluesvay erehay."
 
 #: src/code/debug-int.lisp
 msgid "The debug-function has no debug-block information."
@@ -13499,7 +15424,8 @@ msgid ""
 "The debug-function has no lambda-list since argument debug-variables are\n"
 "    unavailable."
 msgstr ""
-"Ethay ebugday-unctionfay ashay onay ambdalay-istlay incesay argumentway ebugday-ariablesvay areway\n"
+"Ethay ebugday-unctionfay ashay onay ambdalay-istlay incesay argumentway "
+"ebugday-ariablesvay areway\n"
 "    unavailableway."
 
 #: src/code/debug-int.lisp
@@ -13519,7 +15445,8 @@ msgid ""
 "All programmer errors from using the interface for building debugging\n"
 "    tools inherit from this type."
 msgstr ""
-"Allway ogrammerpray errorsway omfray usingway ethay interfaceway orfay uildingbay ebuggingday\n"
+"Allway ogrammerpray errorsway omfray usingway ethay interfaceway orfay "
+"uildingbay ebuggingday\n"
 "    oolstay inheritway omfray isthay ypetay."
 
 #: src/code/debug-int.lisp
@@ -13540,14 +15467,16 @@ msgstr "Invalidway ontrolcay tacksay ointerpay."
 
 #: src/code/debug-int.lisp
 msgid "~&Form was preprocessed for ~S,~% but called on ~S:~%  ~S"
-msgstr "~&Ormfay asway eprocessedpray orfay ~S,~% utbay alledcay onway ~S:~%  ~S"
+msgstr ""
+"~&Ormfay asway eprocessedpray orfay ~S,~% utbay alledcay onway ~S:~%  ~S"
 
 #: src/code/debug-int.lisp
 msgid ""
 "Returns the name of the debug-variable.  The name is the name of the symbol\n"
 "   used as an identifier when writing the code."
 msgstr ""
-"Eturnsray ethay amenay ofway ethay ebugday-ariablevay.  Ethay amenay isway ethay amenay ofway ethay ymbolsay\n"
+"Eturnsray ethay amenay ofway ethay ebugday-ariablevay.  Ethay amenay isway "
+"ethay amenay ofway ethay ymbolsay\n"
 "   usedway asway anway identifierway enwhay itingwray ethay odecay."
 
 #: src/code/debug-int.lisp
@@ -13556,9 +15485,10 @@ msgid ""
 "of\n"
 "   the symbol used as an identifier when writing the code."
 msgstr ""
-"Eturnsray ethay ackagepay amenay ofway ethay ebugday-ariablevay.  Isthay isway ethay ackagepay amenay "
-"ofway\n"
-"   ethay ymbolsay usedway asway anway identifierway enwhay itingwray ethay odecay."
+"Eturnsray ethay ackagepay amenay ofway ethay ebugday-ariablevay.  Isthay "
+"isway ethay ackagepay amenay ofway\n"
+"   ethay ymbolsay usedway asway anway identifierway enwhay itingwray ethay "
+"odecay."
 
 #: src/code/debug-int.lisp
 msgid ""
@@ -13566,23 +15496,26 @@ msgid ""
 "unique\n"
 "   with respect to other debug-variable's in the same function."
 msgstr ""
-"Eturnsray ethay integerway atthay akesmay ebugday-ariablevay's amenay andway ackagepay amenay "
-"uniqueway\n"
-"   ithway espectray otay otherway ebugday-ariablevay's inway ethay amesay unctionfay."
+"Eturnsray ethay integerway atthay akesmay ebugday-ariablevay's amenay andway "
+"ackagepay amenay uniqueway\n"
+"   ithway espectray otay otherway ebugday-ariablevay's inway ethay amesay "
+"unctionfay."
 
 #: src/code/debug-int.lisp
 msgid ""
 "Returns the frame immediately above frame on the stack.  When frame is\n"
 "   the top of the stack, this returns nil."
 msgstr ""
-"Eturnsray ethay amefray immediatelyway aboveway amefray onway ethay tacksay.  Enwhay amefray isway\n"
+"Eturnsray ethay amefray immediatelyway aboveway amefray onway ethay "
+"tacksay.  Enwhay amefray isway\n"
 "   ethay optay ofway ethay tacksay, isthay eturnsray ilnay."
 
 #: src/code/debug-int.lisp
 msgid ""
 "Returns the debug-function for the function whose call frame represents."
 msgstr ""
-"Eturnsray ethay ebugday-unctionfay orfay ethay unctionfay osewhay allcay amefray epresentsray."
+"Eturnsray ethay ebugday-unctionfay orfay ethay unctionfay osewhay allcay "
+"amefray epresentsray."
 
 #: src/code/debug-int.lisp
 msgid ""
@@ -13590,9 +15523,12 @@ msgid ""
 "   running when program execution returns to this frame.  If someone\n"
 "   interrupted this frame, the result could be an unknown code-location."
 msgstr ""
-"Eturnsray ethay odecay-ocationlay erewhay ethay amefray's ebugday-unctionfay illway ontinuecay\n"
-"   unningray enwhay ogrampray executionway eturnsray otay isthay amefray.  Ifway omeonesay\n"
-"   interruptedway isthay amefray, ethay esultray ouldcay ebay anway unknownway odecay-ocationlay."
+"Eturnsray ethay odecay-ocationlay erewhay ethay amefray's ebugday-unctionfay "
+"illway ontinuecay\n"
+"   unningray enwhay ogrampray executionway eturnsray otay isthay amefray.  "
+"Ifway omeonesay\n"
+"   interruptedway isthay amefray, ethay esultray ouldcay ebay anway "
+"unknownway odecay-ocationlay."
 
 #: src/code/debug-int.lisp
 msgid "#<Compiled-Frame ~S~:[~;, interrupted~]>"
@@ -13607,8 +15543,10 @@ msgid ""
 "Returns the list of possible code-locations where execution may continue\n"
 "   when the basic-block represented by debug-block completes its execution."
 msgstr ""
-"Eturnsray ethay istlay ofway ossiblepay odecay-ocationslay erewhay executionway aymay ontinuecay\n"
-"   enwhay ethay asicbay-ockblay epresentedray ybay ebugday-ockblay ompletescay itsway executionway."
+"Eturnsray ethay istlay ofway ossiblepay odecay-ocationslay erewhay "
+"executionway aymay ontinuecay\n"
+"   enwhay ethay asicbay-ockblay epresentedray ybay ebugday-ockblay "
+"ompletescay itsway executionway."
 
 #: src/code/debug-int.lisp
 msgid "Returns whether debug-block represents elsewhere code."
@@ -13616,13 +15554,14 @@ msgstr "Eturnsray etherwhay ebugday-ockblay epresentsray elsewhereway odecay."
 
 #: src/code/debug-int.lisp
 msgid ""
-"Returns the breakpoint's function the system calls when execution encounters"
-"\n"
+"Returns the breakpoint's function the system calls when execution "
+"encounters\n"
 "   the breakpoint, and it is active.  This is SETF'able."
 msgstr ""
-"Eturnsray ethay eakpointbray's unctionfay ethay ystemsay allscay enwhay executionway encountersway"
-"\n"
-"   ethay eakpointbray, andway itway isway activeway.  Isthay isway SETF'ableway."
+"Eturnsray ethay eakpointbray's unctionfay ethay ystemsay allscay enwhay "
+"executionway encountersway\n"
+"   ethay eakpointbray, andway itway isway activeway.  Isthay isway "
+"SETF'ableway."
 
 #: src/code/debug-int.lisp
 msgid "Returns the breakpoint's what specification."
@@ -13637,7 +15576,8 @@ msgid ""
 "Returns the debug-function representing information about the function\n"
 "   corresponding to the code-location."
 msgstr ""
-"Eturnsray ethay ebugday-unctionfay epresentingray informationway aboutway ethay unctionfay\n"
+"Eturnsray ethay ebugday-unctionfay epresentingray informationway aboutway "
+"ethay unctionfay\n"
 "   orrespondingcay otay ethay odecay-ocationlay."
 
 #: src/code/debug-int.lisp
@@ -13651,28 +15591,31 @@ msgid ""
 "of\n"
 "   zero -- the compiler saw no other top-level forms before it."
 msgstr ""
-"Eturnsray ethay umbernay ofway optay-evellay ormsfay ocessedpray ybay ethay ompilercay eforebay\n"
-"   ompilingcay isthay ourcesay.  Ifway isthay ourcesay isway uncompiledway, isthay isway erozay.  "
-"Isthay\n"
-"   aymay ebay erozay evenway ifway ethay ourcesay isway ompiledcay incesay ethay irstfay ormfay inway ethay "
-"irstfay\n"
-"   ilefay ompiledcay inway oneway ompilationcay, orfay exampleway, ustmay avehay away ootray umbernay "
-"ofway\n"
-"   erozay -- ethay ompilercay awsay onay otherway optay-evellay ormsfay eforebay itway."
+"Eturnsray ethay umbernay ofway optay-evellay ormsfay ocessedpray ybay ethay "
+"ompilercay eforebay\n"
+"   ompilingcay isthay ourcesay.  Ifway isthay ourcesay isway uncompiledway, "
+"isthay isway erozay.  Isthay\n"
+"   aymay ebay erozay evenway ifway ethay ourcesay isway ompiledcay incesay "
+"ethay irstfay ormfay inway ethay irstfay\n"
+"   ilefay ompiledcay inway oneway ompilationcay, orfay exampleway, ustmay "
+"avehay away ootray umbernay ofway\n"
+"   erozay -- ethay ompilercay awsay onay otherway optay-evellay ormsfay "
+"eforebay itway."
 
 #: src/code/debug-int.lisp
 msgid ""
-"Returns an indication of the type of source.  The following are the possible"
-"\n"
+"Returns an indication of the type of source.  The following are the "
+"possible\n"
 "   values:\n"
 "      :file    from a file (obtained by COMPILE-FILE if compiled).\n"
 "      :lisp    from Lisp (obtained by COMPILE if compiled).\n"
 "      :stream  from a non-file stream."
 msgstr ""
-"Eturnsray anway indicationway ofway ethay ypetay ofway ourcesay.  Ethay ollowingfay areway ethay ossiblepay"
-"\n"
+"Eturnsray anway indicationway ofway ethay ypetay ofway ourcesay.  Ethay "
+"ollowingfay areway ethay ossiblepay\n"
 "   aluesvay:\n"
-"      :ilefay    omfray away ilefay (obtainedway ybay COMPILE-FILE ifway ompiledcay).\n"
+"      :ilefay    omfray away ilefay (obtainedway ybay COMPILE-FILE ifway "
+"ompiledcay).\n"
 "      :isplay    omfray Isplay (obtainedway ybay COMPILE ifway ompiledcay).\n"
 "      :eamstray  omfray away onnay-ilefay eamstray."
 
@@ -13684,18 +15627,21 @@ msgid ""
 "      :lisp    a lambda-expression.\n"
 "      :stream  some descriptive string that's otherwise useless."
 msgstr ""
-"Eturnsray ethay actualway ourcesay inway omesay ensesay epresentedray ybay ebugday-ourcesay, ichwhay\n"
+"Eturnsray ethay actualway ourcesay inway omesay ensesay epresentedray ybay "
+"ebugday-ourcesay, ichwhay\n"
 "   isway elatedray otay DEBUG-SOURCE-FROM:\n"
 "      :ilefay    ethay athnamepay ofway ethay ilefay.\n"
 "      :isplay    away ambdalay-expressionway.\n"
-"      :eamstray  omesay escriptiveday ingstray atthay's otherwiseway uselessway."
+"      :eamstray  omesay escriptiveday ingstray atthay's otherwiseway "
+"uselessway."
 
 #: src/code/debug-int.lisp
 msgid ""
 "Returns the universal time someone created the source.  This may be nil if\n"
 "   it is unavailable."
 msgstr ""
-"Eturnsray ethay universalway imetay omeonesay eatedcray ethay ourcesay.  Isthay aymay ebay ilnay ifway\n"
+"Eturnsray ethay universalway imetay omeonesay eatedcray ethay ourcesay.  "
+"Isthay aymay ebay ilnay ifway\n"
 "   itway isway unavailableway."
 
 #: src/code/debug-int.lisp
@@ -13703,19 +15649,21 @@ msgid ""
 "Returns the time someone compiled the source.  This is nil if the source\n"
 "   is uncompiled."
 msgstr ""
-"Eturnsray ethay imetay omeonesay ompiledcay ethay ourcesay.  Isthay isway ilnay ifway ethay ourcesay\n"
+"Eturnsray ethay imetay omeonesay ompiledcay ethay ourcesay.  Isthay isway "
+"ilnay ifway ethay ourcesay\n"
 "   isway uncompiledway."
 
 #: src/code/debug-int.lisp
 msgid ""
 "This function returns the file position of each top-level form as an array\n"
-"   if debug-source is from a :file.  If DEBUG-SOURCE-FROM is :lisp or "
-":stream,\n"
+"   if debug-source is from a :file.  If DEBUG-SOURCE-FROM is :lisp or :"
+"stream,\n"
 "   this returns nil."
 msgstr ""
-"Isthay unctionfay eturnsray ethay ilefay ositionpay ofway eachway optay-evellay ormfay asway anway arrayway\n"
-"   ifway ebugday-ourcesay isway omfray away :ilefay.  Ifway DEBUG-SOURCE-FROM isway :isplay orway "
-":eamstray,\n"
+"Isthay unctionfay eturnsray ethay ilefay ositionpay ofway eachway optay-"
+"evellay ormfay asway anway arrayway\n"
+"   ifway ebugday-ourcesay isway omfray away :ilefay.  Ifway DEBUG-SOURCE-"
+"FROM isway :isplay orway :eamstray,\n"
 "   isthay eturnsray ilnay."
 
 #: src/code/debug-int.lisp
@@ -13727,7 +15675,8 @@ msgid ""
 "Returns the top frame of the control stack as it was before calling this\n"
 "   function."
 msgstr ""
-"Eturnsray ethay optay amefray ofway ethay ontrolcay tacksay asway itway asway eforebay allingcay isthay\n"
+"Eturnsray ethay optay amefray ofway ethay ontrolcay tacksay asway itway "
+"asway eforebay allingcay isthay\n"
 "   unctionfay."
 
 #: src/code/debug-int.lisp
@@ -13735,7 +15684,8 @@ msgid ""
 "Flush all of the frames above FRAME, and renumber all the frames below\n"
 "   FRAME."
 msgstr ""
-"Ushflay allway ofway ethay amesfray aboveway FRAME, andway enumberray allway ethay amesfray elowbay\n"
+"Ushflay allway ofway ethay amesfray aboveway FRAME, andway enumberray allway "
+"ethay amesfray elowbay\n"
 "   FRAME."
 
 #: src/code/debug-int.lisp
@@ -13743,7 +15693,8 @@ msgid ""
 "Returns the frame immediately below frame on the stack.  When frame is\n"
 "   the bottom of the stack, this returns nil."
 msgstr ""
-"Eturnsray ethay amefray immediatelyway elowbay amefray onway ethay tacksay.  Enwhay amefray isway\n"
+"Eturnsray ethay amefray immediatelyway elowbay amefray onway ethay tacksay.  "
+"Enwhay amefray isway\n"
 "   ethay ottombay ofway ethay tacksay, isthay eturnsray ilnay."
 
 #: src/code/debug-int.lisp
@@ -13751,20 +15702,22 @@ msgid ""
 "When set, the debugger foregoes making interpreted-frames, so you can\n"
 "   debug the functions that manifest the interpreter."
 msgstr ""
-"Enwhay etsay, ethay ebuggerday oregoesfay akingmay interpretedway-amesfray, osay ouyay ancay\n"
+"Enwhay etsay, ethay ebuggerday oregoesfay akingmay interpretedway-amesfray, "
+"osay ouyay ancay\n"
 "   ebugday ethay unctionsfay atthay anifestmay ethay interpreterway."
 
 #: src/code/debug-int.lisp
 msgid ""
 "Zero or more than one ~A variable in ~\n"
-"			   EVAL::INTERNAL-APPLY-LOOP?"
+"\t\t\t   EVAL::INTERNAL-APPLY-LOOP?"
 msgstr ""
 "Erozay orway oremay anthay oneway ~Away ariablevay inway ~\n"
-"			   EVAL::INTERNAL-APPLY-LOOP?"
+"\t\t\t   EVAL::INTERNAL-APPLY-LOOP?"
 
 #: src/code/debug-int.lisp
 msgid "Return a string describing the foreign function near ADDRESS"
-msgstr "Eturnray away ingstray escribingday ethay oreignfay unctionfay earnay ADDRESS"
+msgstr ""
+"Eturnray away ingstray escribingday ethay oreignfay unctionfay earnay ADDRESS"
 
 #: src/code/debug-int.lisp
 msgid "Foreign function call land"
@@ -13772,15 +15725,18 @@ msgstr "Oreignfay unctionfay allcay andlay"
 
 #: src/code/debug-int.lisp
 msgid "Return t if COMPONENT contains code from assembly routines."
-msgstr "Eturnray t ifway COMPONENT ontainscay odecay omfray assemblyway outinesray."
+msgstr ""
+"Eturnray t ifway COMPONENT ontainscay odecay omfray assemblyway outinesray."
 
 #: src/code/debug-int.lisp
 msgid ""
 "Return the name of the assembly routine at offset PC in COMPONENT.\n"
 "The result is a symbol or nil if the routine cannot be found."
 msgstr ""
-"Eturnray ethay amenay ofway ethay assemblyway outineray atway offsetway PC inway COMPONENT.\n"
-"Ethay esultray isway away ymbolsay orway ilnay ifway ethay outineray annotcay ebay oundfay."
+"Eturnray ethay amenay ofway ethay assemblyway outineray atway offsetway PC "
+"inway COMPONENT.\n"
+"Ethay esultray isway away ymbolsay orway ilnay ifway ethay outineray "
+"annotcay ebay oundfay."
 
 #: src/code/debug-int.lisp
 msgid ""
@@ -13788,8 +15744,10 @@ msgid ""
 "   code-locations at which execution would continue with frame as the top\n"
 "   frame if someone threw to the corresponding tag."
 msgstr ""
-"Eturnsray anway away-istlay appingmay atchcay agstay otay odecay-ocationslay.  Esethay areway\n"
-"   odecay-ocationslay atway ichwhay executionway ouldway ontinuecay ithway amefray asway ethay optay\n"
+"Eturnsray anway away-istlay appingmay atchcay agstay otay odecay-"
+"ocationslay.  Esethay areway\n"
+"   odecay-ocationslay atway ichwhay executionway ouldway ontinuecay ithway "
+"amefray asway ethay optay\n"
 "   amefray ifway omeonesay rewthay otay ethay orrespondingcay agtay."
 
 #: src/code/debug-int.lisp
@@ -13800,10 +15758,14 @@ msgid ""
 "   result form.  This signals a no-debug-blocks condition when the\n"
 "   debug-function lacks debug-block information."
 msgstr ""
-"Executesway ethay ormsfay inway away ontextcay ithway ockblay-arvay oundbay otay eachway ebugday-ockblay inway\n"
-"   ebugday-unctionfay uccessivelysay.  Esultray isway anway optionalway ormfay otay executeway orfay\n"
-"   eturnray aluesvay, andway DO-DEBUG-FUNCTION-BLOCKS eturnsray ilnay ifway erethay isway onay\n"
-"   esultray ormfay.  Isthay ignalssay away onay-ebugday-ocksblay onditioncay enwhay ethay\n"
+"Executesway ethay ormsfay inway away ontextcay ithway ockblay-arvay oundbay "
+"otay eachway ebugday-ockblay inway\n"
+"   ebugday-unctionfay uccessivelysay.  Esultray isway anway optionalway "
+"ormfay otay executeway orfay\n"
+"   eturnray aluesvay, andway DO-DEBUG-FUNCTION-BLOCKS eturnsray ilnay ifway "
+"erethay isway onay\n"
+"   esultray ormfay.  Isthay ignalssay away onay-ebugday-ocksblay onditioncay "
+"enwhay ethay\n"
 "   ebugday-unctionfay ackslay ebugday-ockblay informationway."
 
 #: src/code/debug-int.lisp
@@ -13815,11 +15777,14 @@ msgid ""
 "   depending on debug policy; for example, possibly the compilation only\n"
 "   preserved argument information."
 msgstr ""
-"Executesway odybay inway away ontextcay ithway arvay oundbay otay eachway ebugday-ariablevay inway\n"
-"   ebugday-unctionfay.  Isthay eturnsray ethay aluevay ofway executingway esultray (efaultsday otay\n"
-"   ilnay).  Isthay aymay iterateway overway onlyway omesay ofway ebugday-unctionfay's ariablesvay orway "
-"onenay\n"
-"   ependingday onway ebugday olicypay; orfay exampleway, ossiblypay ethay ompilationcay onlyway\n"
+"Executesway odybay inway away ontextcay ithway arvay oundbay otay eachway "
+"ebugday-ariablevay inway\n"
+"   ebugday-unctionfay.  Isthay eturnsray ethay aluevay ofway executingway "
+"esultray (efaultsday otay\n"
+"   ilnay).  Isthay aymay iterateway overway onlyway omesay ofway ebugday-"
+"unctionfay's ariablesvay orway onenay\n"
+"   ependingday onway ebugday olicypay; orfay exampleway, ossiblypay ethay "
+"ompilationcay onlyway\n"
 "   eservedpray argumentway informationway."
 
 #: src/code/debug-int.lisp
@@ -13828,8 +15793,10 @@ msgid ""
 "   returns nil if the function is unavailable or is non-existent as a user\n"
 "   callable function object."
 msgstr ""
-"Eturnsray ethay Ommoncay Isplay unctionfay associatedway ithway ethay ebugday-unctionfay.  Isthay\n"
-"   eturnsray ilnay ifway ethay unctionfay isway unavailableway orway isway onnay-existentway asway away userway\n"
+"Eturnsray ethay Ommoncay Isplay unctionfay associatedway ithway ethay "
+"ebugday-unctionfay.  Isthay\n"
+"   eturnsray ilnay ifway ethay unctionfay isway unavailableway orway isway "
+"onnay-existentway asway away userway\n"
 "   allablecay unctionfay objectway."
 
 #: src/code/debug-int.lisp
@@ -13837,45 +15804,54 @@ msgid ""
 "Returns the name of the function represented by debug-function.  This may\n"
 "   be a string or a cons; do not assume it is a symbol."
 msgstr ""
-"Eturnsray ethay amenay ofway ethay unctionfay epresentedray ybay ebugday-unctionfay.  Isthay aymay\n"
-"   ebay away ingstray orway away onscay; oday otnay assumeway itway isway away ymbolsay."
+"Eturnsray ethay amenay ofway ethay unctionfay epresentedray ybay ebugday-"
+"unctionfay.  Isthay aymay\n"
+"   ebay away ingstray orway away onscay; oday otnay assumeway itway isway "
+"away ymbolsay."
 
 #: src/code/debug-int.lisp
 msgid ""
 "Returns a debug-function that represents debug information for function."
 msgstr ""
-"Eturnsray away ebugday-unctionfay atthay epresentsray ebugday informationway orfay unctionfay."
+"Eturnsray away ebugday-unctionfay atthay epresentsray ebugday informationway "
+"orfay unctionfay."
 
 #: src/code/debug-int.lisp
 msgid ""
 "Returns the kind of the function which is one of :optional, :external,\n"
 "   :top-level, :cleanup, nil."
 msgstr ""
-"Eturnsray ethay indkay ofway ethay unctionfay ichwhay isway oneway ofway :optionalway, :externalway,\n"
+"Eturnsray ethay indkay ofway ethay unctionfay ichwhay isway oneway ofway :"
+"optionalway, :externalway,\n"
 "   :optay-evellay, :eanupclay, ilnay."
 
 #: src/code/debug-int.lisp
 msgid "Returns whether there is any variable information for debug-function."
-msgstr "Eturnsray etherwhay erethay isway anyway ariablevay informationway orfay ebugday-unctionfay."
+msgstr ""
+"Eturnsray etherwhay erethay isway anyway ariablevay informationway orfay "
+"ebugday-unctionfay."
 
 #: src/code/debug-int.lisp
 msgid ""
 "Returns a list of debug-variables in debug-function having the same name\n"
-"   and package as symbol.  If symbol is uninterned, then this returns a "
-"list of\n"
+"   and package as symbol.  If symbol is uninterned, then this returns a list "
+"of\n"
 "   debug-variables without package names and with the same name as symbol.  "
 "The\n"
 "   result of this function is limited to the availability of variable\n"
 "   information in debug-function; for example, possibly debug-function only\n"
 "   knows about its arguments."
 msgstr ""
-"Eturnsray away istlay ofway ebugday-ariablesvay inway ebugday-unctionfay avinghay ethay amesay amenay\n"
-"   andway ackagepay asway ymbolsay.  Ifway ymbolsay isway uninternedway, enthay isthay eturnsray away "
-"istlay ofway\n"
-"   ebugday-ariablesvay ithoutway ackagepay amesnay andway ithway ethay amesay amenay asway ymbolsay.  "
-"Ethay\n"
-"   esultray ofway isthay unctionfay isway imitedlay otay ethay availabilityway ofway ariablevay\n"
-"   informationway inway ebugday-unctionfay; orfay exampleway, ossiblypay ebugday-unctionfay onlyway\n"
+"Eturnsray away istlay ofway ebugday-ariablesvay inway ebugday-unctionfay "
+"avinghay ethay amesay amenay\n"
+"   andway ackagepay asway ymbolsay.  Ifway ymbolsay isway uninternedway, "
+"enthay isthay eturnsray away istlay ofway\n"
+"   ebugday-ariablesvay ithoutway ackagepay amesnay andway ithway ethay "
+"amesay amenay asway ymbolsay.  Ethay\n"
+"   esultray ofway isthay unctionfay isway imitedlay otay ethay "
+"availabilityway ofway ariablevay\n"
+"   informationway inway ebugday-unctionfay; orfay exampleway, ossiblypay "
+"ebugday-unctionfay onlyway\n"
 "   nowskay aboutway itsway argumentsway."
 
 #: src/code/debug-int.lisp
@@ -13887,12 +15863,14 @@ msgid ""
 "for\n"
 "    example, possibly debug-function only knows about its arguments."
 msgstr ""
-"Eturnsray away istlay ofway ebugday-ariablesvay inway ebugday-unctionfay osewhay amesnay ontaincay\n"
-"    amenay-efixpray-ingstray asway anway intialway ubstringsay.  Ethay esultray ofway isthay unctionfay "
-"isway\n"
-"    imitedlay otay ethay availabilityway ofway ariablevay informationway inway ebugday-unctionfay; "
-"orfay\n"
-"    exampleway, ossiblypay ebugday-unctionfay onlyway nowskay aboutway itsway argumentsway."
+"Eturnsray away istlay ofway ebugday-ariablesvay inway ebugday-unctionfay "
+"osewhay amesnay ontaincay\n"
+"    amenay-efixpray-ingstray asway anway intialway ubstringsay.  Ethay "
+"esultray ofway isthay unctionfay isway\n"
+"    imitedlay otay ethay availabilityway ofway ariablevay informationway "
+"inway ebugday-unctionfay; orfay\n"
+"    exampleway, ossiblypay ebugday-unctionfay onlyway nowskay aboutway "
+"itsway argumentsway."
 
 #: src/code/debug-int.lisp
 msgid ""
@@ -13910,11 +15888,12 @@ msgid ""
 "       ...\n"
 "      )\n"
 "   Each VARi is a debug-variable; however it may be the symbol :deleted it\n"
-"   is unreferenced in debug-function.  This signals a lambda-list-unavaliabl"
-"e\n"
+"   is unreferenced in debug-function.  This signals a lambda-list-"
+"unavaliable\n"
 "   condition when there is no argument list information."
 msgstr ""
-"Eturnsray away istlay epresentingray ethay ambdalay-istlay orfay ebugday-unctionfay.  Ethay istlay\n"
+"Eturnsray away istlay epresentingray ethay ambdalay-istlay orfay ebugday-"
+"unctionfay.  Ethay istlay\n"
 "   ashay ethay ollowingfay ucturestray:\n"
 "      (equiredray-arvay1 equiredray-arvay2\n"
 "       ...\n"
@@ -13927,9 +15906,10 @@ msgstr ""
 "       (:eywordkay eywordkay-ymbolsay arvay10)\n"
 "       ...\n"
 "      )\n"
-"   Eachway Arivay isway away ebugday-ariablevay; oweverhay itway aymay ebay ethay ymbolsay :eletedday itway\n"
-"   isway unreferencedway inway ebugday-unctionfay.  Isthay ignalssay away ambdalay-istlay-unavaliablway"
-"e\n"
+"   Eachway Arivay isway away ebugday-ariablevay; oweverhay itway aymay ebay "
+"ethay ymbolsay :eletedday itway\n"
+"   isway unreferencedway inway ebugday-unctionfay.  Isthay ignalssay away "
+"ambdalay-istlay-unavaliablwaye\n"
 "   onditioncay enwhay erethay isway onay argumentway istlay informationway."
 
 #: src/code/debug-int.lisp
@@ -13941,19 +15921,21 @@ msgid ""
 "Returns whether basic-code-location is unknown.  It returns nil when the\n"
 "   code-location is known."
 msgstr ""
-"Eturnsray etherwhay asicbay-odecay-ocationlay isway unknownway.  Itway eturnsray ilnay enwhay ethay\n"
+"Eturnsray etherwhay asicbay-odecay-ocationlay isway unknownway.  Itway "
+"eturnsray ilnay enwhay ethay\n"
 "   odecay-ocationlay isway nownkay."
 
 #: src/code/debug-int.lisp
 msgid ""
 "Returns the debug-block containing code-location if it is available.  Some\n"
-"   debug policies inhibit debug-block information, and if none is available,"
-"\n"
+"   debug policies inhibit debug-block information, and if none is "
+"available,\n"
 "   then this signals a no-debug-blocks condition."
 msgstr ""
-"Eturnsray ethay ebugday-ockblay ontainingcay odecay-ocationlay ifway itway isway availableway.  Omesay\n"
-"   ebugday oliciespay inhibitway ebugday-ockblay informationway, andway ifway onenay isway availableway,"
-"\n"
+"Eturnsray ethay ebugday-ockblay ontainingcay odecay-ocationlay ifway itway "
+"isway availableway.  Omesay\n"
+"   ebugday oliciespay inhibitway ebugday-ockblay informationway, andway "
+"ifway onenay isway availableway,\n"
 "   enthay isthay ignalssay away onay-ebugday-ocksblay onditioncay."
 
 #: src/code/debug-int.lisp
@@ -13967,9 +15949,12 @@ msgid ""
 "   compilation unit is not necessarily a single file, see the section on\n"
 "   debug-sources."
 msgstr ""
-"Eturnsray ethay umbernay ofway optay-evellay ormsfay eforebay ethay oneway ontainingcay\n"
-"   odecay-ocationlay asway eensay ybay ethay ompilercay inway omesay ompilationcay unitway.  Away\n"
-"   ompilationcay unitway isway otnay ecessarilynay away inglesay ilefay, eesay ethay ectionsay onway\n"
+"Eturnsray ethay umbernay ofway optay-evellay ormsfay eforebay ethay oneway "
+"ontainingcay\n"
+"   odecay-ocationlay asway eensay ybay ethay ompilercay inway omesay "
+"ompilationcay unitway.  Away\n"
+"   ompilationcay unitway isway otnay ecessarilynay away inglesay ilefay, "
+"eesay ethay ectionsay onway\n"
 "   ebugday-ourcessay."
 
 #: src/code/debug-int.lisp
@@ -13982,8 +15967,10 @@ msgid ""
 "   number is derived by a walking the subforms of a top-level form in\n"
 "   depth-first order."
 msgstr ""
-"Eturnsray ethay umbernay ofway ethay ormfay orrespondingcay otay odecay-ocationlay.  Ethay ormfay\n"
-"   umbernay isway erivedday ybay away alkingway ethay ubformssay ofway away optay-evellay ormfay inway\n"
+"Eturnsray ethay umbernay ofway ethay ormfay orrespondingcay otay odecay-"
+"ocationlay.  Ethay ormfay\n"
+"   umbernay isway erivedday ybay away alkingway ethay ubformssay ofway away "
+"optay-evellay ormfay inway\n"
 "   epthday-irstfay orderway."
 
 #: src/code/debug-int.lisp
@@ -13994,13 +15981,17 @@ msgid ""
 "     :non-local-entry"
 msgstr ""
 "Eturnray ethay indkay ofway CODE-LOCATION, oneway ofway:\n"
-"     :interpretedway, :unknownway-eturnray, :nownkay-eturnray, :internalway-errorway,\n"
-"     :onnay-ocallay-exitway, :ockblay-tartsay, :allcay-itesay, :inglesay-aluevay-eturnray,\n"
+"     :interpretedway, :unknownway-eturnray, :nownkay-eturnray, :internalway-"
+"errorway,\n"
+"     :onnay-ocallay-exitway, :ockblay-tartsay, :allcay-itesay, :inglesay-"
+"aluevay-eturnray,\n"
 "     :onnay-ocallay-entryway"
 
 #: src/code/debug-int.lisp
 msgid "Returns whether obj1 and obj2 are the same place in the code."
-msgstr "Eturnsray etherwhay objway1 andway objway2 areway ethay amesay aceplay inway ethay odecay."
+msgstr ""
+"Eturnsray etherwhay objway1 andway objway2 areway ethay amesay aceplay inway "
+"ethay odecay."
 
 #: src/code/debug-int.lisp
 msgid ""
@@ -14008,9 +15999,10 @@ msgid ""
 "   debug-block.  This returns the value of executing result (defaults to "
 "nil)."
 msgstr ""
-"Executesway ormsfay inway away ontextcay ithway odecay-arvay oundbay otay eachway odecay-ocationlay inway\n"
-"   ebugday-ockblay.  Isthay eturnsray ethay aluevay ofway executingway esultray (efaultsday otay "
-"ilnay)."
+"Executesway ormsfay inway away ontextcay ithway odecay-arvay oundbay otay "
+"eachway odecay-ocationlay inway\n"
+"   ebugday-ockblay.  Isthay eturnsray ethay aluevay ofway executingway "
+"esultray (efaultsday otay ilnay)."
 
 #: src/code/debug-int.lisp
 msgid "??? Can't get name of debug-block's function."
@@ -14021,7 +16013,8 @@ msgid ""
 "Returns the symbol from interning DEBUG-VARIABLE-NAME in the package named\n"
 "   by DEBUG-VARIABLE-PACKAGE."
 msgstr ""
-"Eturnsray ethay ymbolsay omfray interningway DEBUG-VARIABLE-NAME inway ethay ackagepay amednay\n"
+"Eturnsray ethay ymbolsay omfray interningway DEBUG-VARIABLE-NAME inway ethay "
+"ackagepay amednay\n"
 "   ybay DEBUG-VARIABLE-PACKAGE."
 
 #: src/code/debug-int.lisp
@@ -14029,7 +16022,8 @@ msgid ""
 "Returns the value stored for debug-variable in frame.  If the value is not\n"
 "   :valid, then this signals an invalid-value error."
 msgstr ""
-"Eturnsray ethay aluevay toredsay orfay ebugday-ariablevay inway amefray.  Ifway ethay aluevay isway otnay\n"
+"Eturnsray ethay aluevay toredsay orfay ebugday-ariablevay inway amefray.  "
+"Ifway ethay aluevay isway otnay\n"
 "   :alidvay, enthay isthay ignalssay anway invalidway-aluevay errorway."
 
 #: src/code/debug-int.lisp
@@ -14037,7 +16031,8 @@ msgid ""
 "Returns the value stored for debug-variable in frame.  The value may be\n"
 "   invalid.  This is SETF'able."
 msgstr ""
-"Eturnsray ethay aluevay toredsay orfay ebugday-ariablevay inway amefray.  Ethay aluevay aymay ebay\n"
+"Eturnsray ethay aluevay toredsay orfay ebugday-ariablevay inway amefray.  "
+"Ethay aluevay aymay ebay\n"
 "   invalidway.  Isthay isway SETF'ableway."
 
 #: src/code/debug-int.lisp
@@ -14048,7 +16043,8 @@ msgid ""
 "      :invalid  The value is known to be unavailable.\n"
 "      :unknown  The value's availability is unknown."
 msgstr ""
-"Eturnsray reethay aluesvay eflectingray ethay alidityvay ofway ebugday-ariablevay's aluevay\n"
+"Eturnsray reethay aluesvay eflectingray ethay alidityvay ofway ebugday-"
+"ariablevay's aluevay\n"
 "   atway asicbay-odecay-ocationlay:\n"
 "      :alidvay    Ethay aluevay isway nownkay otay ebay availableway.\n"
 "      :invalidway  Ethay aluevay isway nownkay otay ebay unavailableway.\n"
@@ -14060,28 +16056,31 @@ msgid ""
 "   indicates a descent into the top-level-form form, going directly to the\n"
 "   subform corressponding to the form number."
 msgstr ""
-"Isthay eturnsray away abletay appingmay ormfay umbersnay otay ourcesay-athspay.  Away ourcesay-athpay\n"
-"   indicatesway away escentday intoway ethay optay-evellay-ormfay ormfay, oinggay irectlyday otay ethay\n"
+"Isthay eturnsray away abletay appingmay ormfay umbersnay otay ourcesay-"
+"athspay.  Away ourcesay-athpay\n"
+"   indicatesway away escentday intoway ethay optay-evellay-ormfay ormfay, "
+"oinggay irectlyday otay ethay\n"
 "   ubformsay orresspondingcay otay ethay ormfay umbernay."
 
 #: src/code/debug-int.lisp
 msgid ""
 "Form is a top-level form, and path is a source-path into it.  This returns\n"
-"   the form indicated by the source-path.  Context is the number of enclosin"
-"g\n"
+"   the form indicated by the source-path.  Context is the number of "
+"enclosing\n"
 "   forms to return instead of directly returning the source-path form.  "
 "When\n"
-"   context is non-zero, the form returned contains a marker, #:****HERE****,"
-"\n"
+"   context is non-zero, the form returned contains a marker, #:"
+"****HERE****,\n"
 "   immediately before the form indicated by path."
 msgstr ""
-"Ormfay isway away optay-evellay ormfay, andway athpay isway away ourcesay-athpay intoway itway.  Isthay eturnsray\n"
-"   ethay ormfay indicatedway ybay ethay ourcesay-athpay.  Ontextcay isway ethay umbernay ofway enclosinway"
-"g\n"
-"   ormsfay otay eturnray insteadway ofway irectlyday eturningray ethay ourcesay-athpay ormfay.  "
-"Enwhay\n"
-"   ontextcay isway onnay-erozay, ethay ormfay eturnedray ontainscay away arkermay, #:****HERE****,"
-"\n"
+"Ormfay isway away optay-evellay ormfay, andway athpay isway away ourcesay-"
+"athpay intoway itway.  Isthay eturnsray\n"
+"   ethay ormfay indicatedway ybay ethay ourcesay-athpay.  Ontextcay isway "
+"ethay umbernay ofway enclosinwayg\n"
+"   ormsfay otay eturnray insteadway ofway irectlyday eturningray ethay "
+"ourcesay-athpay ormfay.  Enwhay\n"
+"   ontextcay isway onnay-erozay, ethay ormfay eturnedray ontainscay away "
+"arkermay, #:****HERE****,\n"
 "   immediatelyway eforebay ethay ormfay indicatedway ybay athpay."
 
 #: src/code/debug.lisp src/code/debug-int.lisp
@@ -14099,13 +16098,18 @@ msgid ""
 "   The returned function signals the following conditions: invalid-value,\n"
 "   ambiguous-variable-name, and frame-function-mismatch"
 msgstr ""
-"Eturnray away unctionfay ofway oneway argumentway atthay evaluatesway ormfay inway ethay exicallay\n"
-"   ontextcay ofway ethay asicbay-odecay-ocationlay oclay.  PREPROCESS-FOR-EVAL ignalssay away\n"
-"   onay-ebugday-ariablesvay onditioncay enwhay ethay oclay's ebugday-unctionfay ashay onay\n"
-"   ebugday-ariablevay informationway availableway.  Ethay eturnedray unctionfay akestay ethay "
-"amefray\n"
-"   otay etgay aluesvay omfray asway itsway argumentway, andway itway eturnsray ethay aluesvay ofway ormfay.\n"
-"   Ethay eturnedray unctionfay ignalssay ethay ollowingfay onditionscay: invalidway-aluevay,\n"
+"Eturnray away unctionfay ofway oneway argumentway atthay evaluatesway ormfay "
+"inway ethay exicallay\n"
+"   ontextcay ofway ethay asicbay-odecay-ocationlay oclay.  PREPROCESS-FOR-"
+"EVAL ignalssay away\n"
+"   onay-ebugday-ariablesvay onditioncay enwhay ethay oclay's ebugday-"
+"unctionfay ashay onay\n"
+"   ebugday-ariablevay informationway availableway.  Ethay eturnedray "
+"unctionfay akestay ethay amefray\n"
+"   otay etgay aluesvay omfray asway itsway argumentway, andway itway "
+"eturnsray ethay aluesvay ofway ormfay.\n"
+"   Ethay eturnedray unctionfay ignalssay ethay ollowingfay onditionscay: "
+"invalidway-aluevay,\n"
 "   ambiguousway-ariablevay-amenay, andway amefray-unctionfay-ismatchmay"
 
 #: src/code/debug-int.lisp
@@ -14113,20 +16117,25 @@ msgid ""
 "Evaluate Form in the lexical context of Frame's current code location,\n"
 "   returning the results of the evaluation."
 msgstr ""
-"Evaluateway Ormfay inway ethay exicallay ontextcay ofway Amefray's urrentcay odecay ocationlay,\n"
+"Evaluateway Ormfay inway ethay exicallay ontextcay ofway Amefray's urrentcay "
+"odecay ocationlay,\n"
 "   eturningray ethay esultsray ofway ethay evaluationway."
 
 #: src/code/debug-int.lisp
 msgid "Find and return the debug catch tag for a given frame, if it exists."
-msgstr "Indfay andway eturnray ethay ebugday atchcay agtay orfay away ivengay amefray, ifway itway existsway."
+msgstr ""
+"Indfay andway eturnray ethay ebugday atchcay agtay orfay away ivengay "
+"amefray, ifway itway existsway."
 
 #: src/code/debug-int.lisp
 msgid ""
 "Evaluate Form in the lexical context of Frame's current code location,\n"
 "   returning from the current frame the results of the evaluation."
 msgstr ""
-"Evaluateway Ormfay inway ethay exicallay ontextcay ofway Amefray's urrentcay odecay ocationlay,\n"
-"   eturningray omfray ethay urrentcay amefray ethay esultsray ofway ethay evaluationway."
+"Evaluateway Ormfay inway ethay exicallay ontextcay ofway Amefray's urrentcay "
+"odecay ocationlay,\n"
+"   eturningray omfray ethay urrentcay amefray ethay esultsray ofway ethay "
+"evaluationway."
 
 #: src/code/debug-int.lisp
 msgid ""
@@ -14135,8 +16144,8 @@ msgid ""
 "   current frame for the function in which the program is running and the\n"
 "   breakpoint object.\n"
 "      What and kind determine where in a function the system invokes\n"
-"   hook-function.  What is either a code-location or a debug-function.  "
-"Kind is\n"
+"   hook-function.  What is either a code-location or a debug-function.  Kind "
+"is\n"
 "   one of :code-location, :function-start, or :function-end.  Since the "
 "starts\n"
 "   and ends of functions may not have code-locations representing them,\n"
@@ -14151,8 +16160,8 @@ msgid ""
 "breakpoints,\n"
 "   the system uses starter breakpoints to establish the :function-end "
 "breakpoint\n"
-"   for each invocation of the function.  Upon each entry, the system "
-"creates a\n"
+"   for each invocation of the function.  Upon each entry, the system creates "
+"a\n"
 "   unique cookie to identify the invocation, and when the user supplies a\n"
 "   function for this argument, the system invokes it on the frame and the\n"
 "   cookie.  The system later invokes the :function-end breakpoint hook on "
@@ -14161,83 +16170,104 @@ msgid ""
 "   function.\n"
 "      This signals an error if what is an unknown code-location."
 msgstr ""
-"Isthay eatescray andway eturnsray away eakpointbray.  Enwhay ogrampray executionway encountersway\n"
-"   ethay eakpointbray, ethay ystemsay allscay ookhay-unctionfay.  Ookhay-unctionfay akestay ethay\n"
-"   urrentcay amefray orfay ethay unctionfay inway ichwhay ethay ogrampray isway unningray andway ethay\n"
+"Isthay eatescray andway eturnsray away eakpointbray.  Enwhay ogrampray "
+"executionway encountersway\n"
+"   ethay eakpointbray, ethay ystemsay allscay ookhay-unctionfay.  Ookhay-"
+"unctionfay akestay ethay\n"
+"   urrentcay amefray orfay ethay unctionfay inway ichwhay ethay ogrampray "
+"isway unningray andway ethay\n"
 "   eakpointbray objectway.\n"
-"      Atwhay andway indkay etermineday erewhay inway away unctionfay ethay ystemsay invokesway\n"
-"   ookhay-unctionfay.  Atwhay isway eitherway away odecay-ocationlay orway away ebugday-unctionfay.  "
-"Indkay isway\n"
-"   oneway ofway :odecay-ocationlay, :unctionfay-tartsay, orway :unctionfay-endway.  Incesay ethay "
-"tartssay\n"
-"   andway endsway ofway unctionsfay aymay otnay avehay odecay-ocationslay epresentingray emthay,\n"
-"   esignateday esethay acesplay ybay upplyingsay atwhay asway away ebugday-unctionfay andway indkay\n"
-"   indicatingway ethay :unctionfay-tartsay orway :unctionfay-endway.  Enwhay atwhay isway away\n"
-"   ebugday-unctionfay andway indkay isway :unctionfay-endway, enthay ookhay-unctionfay ustmay aketay "
-"wotay\n"
-"   additionalway argumentsway, away istlay ofway aluesvay eturnedray ybay ethay unctionfay andway away\n"
+"      Atwhay andway indkay etermineday erewhay inway away unctionfay ethay "
+"ystemsay invokesway\n"
+"   ookhay-unctionfay.  Atwhay isway eitherway away odecay-ocationlay orway "
+"away ebugday-unctionfay.  Indkay isway\n"
+"   oneway ofway :odecay-ocationlay, :unctionfay-tartsay, orway :unctionfay-"
+"endway.  Incesay ethay tartssay\n"
+"   andway endsway ofway unctionsfay aymay otnay avehay odecay-ocationslay "
+"epresentingray emthay,\n"
+"   esignateday esethay acesplay ybay upplyingsay atwhay asway away ebugday-"
+"unctionfay andway indkay\n"
+"   indicatingway ethay :unctionfay-tartsay orway :unctionfay-endway.  Enwhay "
+"atwhay isway away\n"
+"   ebugday-unctionfay andway indkay isway :unctionfay-endway, enthay ookhay-"
+"unctionfay ustmay aketay wotay\n"
+"   additionalway argumentsway, away istlay ofway aluesvay eturnedray ybay "
+"ethay unctionfay andway away\n"
 "   unctionfay-endway-ookiecay.\n"
-"      Infoway isway informationway uppliedsay ybay andway usedway ybay ethay userway.\n"
-"      Unctionfay-endway-ookiecay isway away unctionfay.  Otay implementway :unctionfay-endway "
-"eakpointsbray,\n"
-"   ethay ystemsay usesway tartersay eakpointsbray otay establishway ethay :unctionfay-endway "
-"eakpointbray\n"
-"   orfay eachway invocationway ofway ethay unctionfay.  Uponway eachway entryway, ethay ystemsay "
-"eatescray away\n"
-"   uniqueway ookiecay otay identifyway ethay invocationway, andway enwhay ethay userway uppliessay away\n"
-"   unctionfay orfay isthay argumentway, ethay ystemsay invokesway itway onway ethay amefray andway ethay\n"
-"   ookiecay.  Ethay ystemsay aterlay invokesway ethay :unctionfay-endway eakpointbray ookhay onway "
-"ethay\n"
-"   amesay ookiecay.  Ethay userway aymay avesay ethay ookiecay orfay omparisoncay inway ethay ookhay\n"
+"      Infoway isway informationway uppliedsay ybay andway usedway ybay ethay "
+"userway.\n"
+"      Unctionfay-endway-ookiecay isway away unctionfay.  Otay implementway :"
+"unctionfay-endway eakpointsbray,\n"
+"   ethay ystemsay usesway tartersay eakpointsbray otay establishway ethay :"
+"unctionfay-endway eakpointbray\n"
+"   orfay eachway invocationway ofway ethay unctionfay.  Uponway eachway "
+"entryway, ethay ystemsay eatescray away\n"
+"   uniqueway ookiecay otay identifyway ethay invocationway, andway enwhay "
+"ethay userway uppliessay away\n"
+"   unctionfay orfay isthay argumentway, ethay ystemsay invokesway itway "
+"onway ethay amefray andway ethay\n"
+"   ookiecay.  Ethay ystemsay aterlay invokesway ethay :unctionfay-endway "
+"eakpointbray ookhay onway ethay\n"
+"   amesay ookiecay.  Ethay userway aymay avesay ethay ookiecay orfay "
+"omparisoncay inway ethay ookhay\n"
 "   unctionfay.\n"
-"      Isthay ignalssay anway errorway ifway atwhay isway anway unknownway odecay-ocationlay."
+"      Isthay ignalssay anway errorway ifway atwhay isway anway unknownway "
+"odecay-ocationlay."
 
 #: src/code/debug-int.lisp
 msgid "Cannot make a breakpoint at an unknown code location -- ~S."
-msgstr "Annotcay akemay away eakpointbray atway anway unknownway odecay ocationlay -- ~S."
+msgstr ""
+"Annotcay akemay away eakpointbray atway anway unknownway odecay ocationlay "
+"-- ~S."
 
 #: src/code/debug-int.lisp
 msgid "Breakpoints in interpreted code are currently unsupported."
-msgstr "Eakpointsbray inway interpretedway odecay areway urrentlycay unsupportedway."
+msgstr ""
+"Eakpointsbray inway interpretedway odecay areway urrentlycay unsupportedway."
 
 #: src/code/debug-int.lisp
 msgid ""
 ":FUNCTION-END breakpoints are currently unsupported ~\n"
-"		       for the known return convention."
+"\t\t       for the known return convention."
 msgstr ""
 ":FUNCTION-END eakpointsbray areway urrentlycay unsupportedway ~\n"
-"		       orfay ethay nownkay eturnray onventioncay."
+"\t\t       orfay ethay nownkay eturnray onventioncay."
 
 #: src/code/debug-int.lisp
 msgid ""
 ":function-end breakpoints are currently unsupported ~\n"
-"	     for interpreted-debug-functions."
+"\t     for interpreted-debug-functions."
 msgstr ""
 ":unctionfay-endway eakpointsbray areway urrentlycay unsupportedway ~\n"
-"	     orfay interpretedway-ebugday-unctionsfay."
+"\t     orfay interpretedway-ebugday-unctionsfay."
 
 #: src/code/debug-int.lisp
 msgid ""
 "This takes a function-end-cookie and a frame, and it returns whether the\n"
 "   cookie is still valid.  A cookie becomes invalid when the frame that\n"
 "   established the cookie has exited.  Sometimes cookie holders are unaware\n"
-"   of cookie invalidation because their :function-end breakpoint hooks didn'"
-"t\n"
+"   of cookie invalidation because their :function-end breakpoint hooks "
+"didn't\n"
 "   run due to THROW'ing.  This takes a frame as an efficiency hack since "
 "the\n"
 "   user probably has a frame object in hand when using this routine, and it\n"
 "   saves repeated parsing of the stack and consing when asking whether a\n"
 "   series of cookies is valid."
 msgstr ""
-"Isthay akestay away unctionfay-endway-ookiecay andway away amefray, andway itway eturnsray etherwhay ethay\n"
-"   ookiecay isway tillsay alidvay.  Away ookiecay ecomesbay invalidway enwhay ethay amefray atthay\n"
-"   establishedway ethay ookiecay ashay exitedway.  Ometimessay ookiecay oldershay areway unawareway\n"
-"   ofway ookiecay invalidationway ecausebay eirthay :unctionfay-endway eakpointbray ookshay idnday'"
-"t\n"
-"   unray ueday otay THROW'ingway.  Isthay akestay away amefray asway anway efficiencyway ackhay incesay "
-"ethay\n"
-"   userway obablypray ashay away amefray objectway inway andhay enwhay usingway isthay outineray, andway itway\n"
-"   avessay epeatedray arsingpay ofway ethay tacksay andway onsingcay enwhay askingway etherwhay away\n"
+"Isthay akestay away unctionfay-endway-ookiecay andway away amefray, andway "
+"itway eturnsray etherwhay ethay\n"
+"   ookiecay isway tillsay alidvay.  Away ookiecay ecomesbay invalidway "
+"enwhay ethay amefray atthay\n"
+"   establishedway ethay ookiecay ashay exitedway.  Ometimessay ookiecay "
+"oldershay areway unawareway\n"
+"   ofway ookiecay invalidationway ecausebay eirthay :unctionfay-endway "
+"eakpointbray ookshay idnday't\n"
+"   unray ueday otay THROW'ingway.  Isthay akestay away amefray asway anway "
+"efficiencyway ackhay incesay ethay\n"
+"   userway obablypray ashay away amefray objectway inway andhay enwhay "
+"usingway isthay outineray, andway itway\n"
+"   avessay epeatedray arsingpay ofway ethay tacksay andway onsingcay enwhay "
+"askingway etherwhay away\n"
 "   eriessay ofway ookiescay isway alidvay."
 
 #: src/code/debug-int.lisp
@@ -14247,10 +16277,12 @@ msgid ""
 "invokes\n"
 "   breakpoint hook functions in the opposite order that you activate them."
 msgstr ""
-"Isthay ausescay ethay ystemsay otay invokeway ethay eakpointbray's ookhay-unctionfay untilway ethay\n"
-"   extnay allcay otay DEACTIVATE-BREAKPOINT orway DELETE-BREAKPOINT.  Ethay ystemsay "
-"invokesway\n"
-"   eakpointbray ookhay unctionsfay inway ethay oppositeway orderway atthay ouyay activateway emthay."
+"Isthay ausescay ethay ystemsay otay invokeway ethay eakpointbray's ookhay-"
+"unctionfay untilway ethay\n"
+"   extnay allcay otay DEACTIVATE-BREAKPOINT orway DELETE-BREAKPOINT.  Ethay "
+"ystemsay invokesway\n"
+"   eakpointbray ookhay unctionsfay inway ethay oppositeway orderway atthay "
+"ouyay activateway emthay."
 
 #: src/code/debug-int.lisp
 msgid "Cannot activate a deleted breakpoint -- ~S."
@@ -14258,18 +16290,23 @@ msgstr "Annotcay activateway away eletedday eakpointbray -- ~S."
 
 #: src/code/debug-int.lisp
 msgid "I don't know how you made this, but they're unsupported -- ~S"
-msgstr "Iway onday't nowkay owhay ouyay ademay isthay, utbay eythay'eray unsupportedway -- ~S"
+msgstr ""
+"Iway onday't nowkay owhay ouyay ademay isthay, utbay eythay'eray "
+"unsupportedway -- ~S"
 
 #: src/code/debug-int.lisp
 msgid "This stops the system from invoking the breakpoint's hook-function."
-msgstr "Isthay topssay ethay ystemsay omfray invokingway ethay eakpointbray's ookhay-unctionfay."
+msgstr ""
+"Isthay topssay ethay ystemsay omfray invokingway ethay eakpointbray's ookhay-"
+"unctionfay."
 
 #: src/code/debug-int.lisp
 msgid ""
 "This returns the user maintained info associated with breakpoint.  This\n"
 "   is SETF'able."
 msgstr ""
-"Isthay eturnsray ethay userway aintainedmay infoway associatedway ithway eakpointbray.  Isthay\n"
+"Isthay eturnsray ethay userway aintainedmay infoway associatedway ithway "
+"eakpointbray.  Isthay\n"
 "   isway SETF'ableway."
 
 #: src/code/debug-int.lisp
@@ -14284,10 +16321,10 @@ msgid ""
 "can\n"
 "   never become active again."
 msgstr ""
-"Isthay eesfray ystemsay toragesay andway emovesray omputationalcay overheadway associatedway "
-"ithway\n"
-"   eakpointbray.  Afterway allingcay isthay, eakpointbray isway ompletelycay impotentway andway "
-"ancay\n"
+"Isthay eesfray ystemsay toragesay andway emovesray omputationalcay "
+"overheadway associatedway ithway\n"
+"   eakpointbray.  Afterway allingcay isthay, eakpointbray isway ompletelycay "
+"impotentway andway ancay\n"
 "   evernay ecomebay activeway againway."
 
 #: src/code/debug-int.lisp
@@ -14304,40 +16341,43 @@ msgid ""
 "and\n"
 "   the PC offset for the trap instruction."
 msgstr ""
-"Akemay away ogusbay LRA objectway atthay ignalssay away eakpointbray aptray enwhay eturnedray otay.  "
-"Ifway\n"
-"   ethay eakpointbray aptray andlerhay eturnsray, REAL-LRA isway eturnedray otay.  Reethay "
-"aluesvay\n"
-"   areway eturnedray: ethay ogusbay LRA objectway, ethay odecay omponentcay itway isway artpay ofway, "
-"andway\n"
+"Akemay away ogusbay LRA objectway atthay ignalssay away eakpointbray aptray "
+"enwhay eturnedray otay.  Ifway\n"
+"   ethay eakpointbray aptray andlerhay eturnsray, REAL-LRA isway eturnedray "
+"otay.  Reethay aluesvay\n"
+"   areway eturnedray: ethay ogusbay LRA objectway, ethay odecay omponentcay "
+"itway isway artpay ofway, andway\n"
 "   ethay PC offsetway orfay ethay aptray instructionway."
 
 #: src/code/debug-int.lisp
 msgid ""
 "The editor calls this remotely in the slave to set breakpoints.  Package is\n"
-"   the string name of a package or nil, and name-str is a string representin"
-"g a\n"
+"   the string name of a package or nil, and name-str is a string "
+"representing a\n"
 "   function name (for example, \"foo\" or \"(setf foo)\").  After finding\n"
 "   package, this READs name-str with *package* bound appropriately.  Path "
 "is\n"
 "   either a modified source-path or a symbol (:function-start or\n"
-"   :function-end).  If it is a modified source-path, it has no top-level-for"
-"m\n"
-"   offset or form-number component, and it is in descent order from the "
-"root of\n"
+"   :function-end).  If it is a modified source-path, it has no top-level-"
+"form\n"
+"   offset or form-number component, and it is in descent order from the root "
+"of\n"
 "   the top-level form."
 msgstr ""
-"Ethay editorway allscay isthay emotelyray inway ethay aveslay otay etsay eakpointsbray.  Ackagepay isway\n"
-"   ethay ingstray amenay ofway away ackagepay orway ilnay, andway amenay-trsay isway away ingstray epresentinray"
-"g away\n"
-"   unctionfay amenay (orfay exampleway, \"oofay\" orway \"(etfsay oofay)\").  Afterway indingfay\n"
-"   ackagepay, isthay Eadsray amenay-trsay ithway *package* oundbay appropriatelyway.  Athpay "
-"isway\n"
-"   eitherway away odifiedmay ourcesay-athpay orway away ymbolsay (:unctionfay-tartsay orway\n"
-"   :unctionfay-endway).  Ifway itway isway away odifiedmay ourcesay-athpay, itway ashay onay optay-evellay-orfay"
-"m\n"
-"   offsetway orway ormfay-umbernay omponentcay, andway itway isway inway escentday orderway omfray ethay "
-"ootray ofway\n"
+"Ethay editorway allscay isthay emotelyray inway ethay aveslay otay etsay "
+"eakpointsbray.  Ackagepay isway\n"
+"   ethay ingstray amenay ofway away ackagepay orway ilnay, andway amenay-"
+"trsay isway away ingstray epresentinrayg away\n"
+"   unctionfay amenay (orfay exampleway, \"oofay\" orway \"(etfsay "
+"oofay)\").  Afterway indingfay\n"
+"   ackagepay, isthay Eadsray amenay-trsay ithway *package* oundbay "
+"appropriatelyway.  Athpay isway\n"
+"   eitherway away odifiedmay ourcesay-athpay orway away ymbolsay (:"
+"unctionfay-tartsay orway\n"
+"   :unctionfay-endway).  Ifway itway isway away odifiedmay ourcesay-athpay, "
+"itway ashay onay optay-evellay-orfaym\n"
+"   offsetway orway ormfay-umbernay omponentcay, andway itway isway inway "
+"escentday orderway omfray ethay ootray ofway\n"
 "   ethay optay-evellay ormfay."
 
 #: src/code/debug-int.lisp
@@ -14346,45 +16386,51 @@ msgstr "Editorway installedway eakpointbray."
 
 #: src/code/debug-int.lisp
 msgid "We don't currently support breakpoints in interpreted code."
-msgstr "Eway onday't urrentlycay upportsay eakpointsbray inway interpretedway odecay."
+msgstr ""
+"Eway onday't urrentlycay upportsay eakpointsbray inway interpretedway odecay."
 
 #: src/code/debug-int.lisp
 msgid ""
 "~%Cannot set breakpoints for editor when source file no ~\n"
-"		    longer exists:~%  ~A."
+"\t\t    longer exists:~%  ~A."
 msgstr ""
-"~%Annotcay etsay eakpointsbray orfay editorway enwhay ourcesay ilefay onay ~\n"
-"		    ongerlay existsway:~%  ~Away."
+"~%Annotcay etsay eakpointsbray orfay editorway enwhay ourcesay ilefay onay "
+"~\n"
+"\t\t    ongerlay existsway:~%  ~Away."
 
 #: src/code/debug-int.lisp
 msgid ""
 "~%While setting a breakpoint for the editor, noticed ~\n"
-"			source file has been modified since compilation:~%  ~A~@\n"
-"			Using form offset instead of character position.~%"
+"\t\t\tsource file has been modified since compilation:~%  ~A~@\n"
+"\t\t\tUsing form offset instead of character position.~%"
 msgstr ""
 "~%Ilewhay ettingsay away eakpointbray orfay ethay editorway, oticednay ~\n"
-"			ourcesay ilefay ashay eenbay odifiedmay incesay ompilationcay:~%  ~Away~@\n"
-"			Usingway ormfay offsetway insteadway ofway aracterchay ositionpay.~%"
+"\t\t\tourcesay ilefay ashay eenbay odifiedmay incesay ompilationcay:~%  "
+"~Away~@\n"
+"\t\t\tUsingway ormfay offsetway insteadway ofway aracterchay ositionpay.~%"
 
 #: src/code/debug-int.lisp
 msgid ""
 "Cannot set breakpoints for editor when ~\n"
-"				   there is no start positions map."
+"\t\t\t\t   there is no start positions map."
 msgstr ""
 "Annotcay etsay eakpointsbray orfay editorway enwhay ~\n"
-"				   erethay isway onay tartsay ositionspay apmay."
+"\t\t\t\t   erethay isway onay tartsay ositionspay apmay."
 
 #: src/code/debug-int.lisp
 msgid ""
 "The editor calls this in the slave with a remote-object representing a\n"
 "   code-location to set a breakpoint."
 msgstr ""
-"Ethay editorway allscay isthay inway ethay aveslay ithway away emoteray-objectway epresentingray away\n"
+"Ethay editorway allscay isthay inway ethay aveslay ithway away emoteray-"
+"objectway epresentingray away\n"
 "   odecay-ocationlay otay etsay away eakpointbray."
 
 #: src/code/debug-int.lisp
 msgid "The editor calls this remotely in the slave to delete a breakpoint."
-msgstr "Ethay editorway allscay isthay emotelyray inway ethay aveslay otay eleteday away eakpointbray."
+msgstr ""
+"Ethay editorway allscay isthay emotelyray inway ethay aveslay otay eleteday "
+"away eakpointbray."
 
 #: src/code/debug-int.lisp
 msgid ""
@@ -14393,9 +16439,10 @@ msgid ""
 "to\n"
 "   a lack of debug information, it returns nil."
 msgstr ""
-"Isthay eturnsray away odecay-ocationlay eforebay ethay odybay ofway away unctionfay andway afterway allway\n"
-"   ethay argumentsway areway inway aceplay.  Ifway isthay annotcay etermineday atthay ocationlay ueday "
-"otay\n"
+"Isthay eturnsray away odecay-ocationlay eforebay ethay odybay ofway away "
+"unctionfay andway afterway allway\n"
+"   ethay argumentsway areway inway aceplay.  Ifway isthay annotcay "
+"etermineday atthay ocationlay ueday otay\n"
 "   away acklay ofway ebugday informationway, itway eturnsray ilnay."
 
 #: src/code/debug-int.lisp
@@ -14407,7 +16454,8 @@ msgid ""
 "*PRINT-LEVEL* is bound to this value when debug prints a function call.  If\n"
 "  null, use *PRINT-LEVEL*"
 msgstr ""
-"*PRINT-LEVEL* isway oundbay otay isthay aluevay enwhay ebugday intspray away unctionfay allcay.  Ifway\n"
+"*PRINT-LEVEL* isway oundbay otay isthay aluevay enwhay ebugday intspray away "
+"unctionfay allcay.  Ifway\n"
 "  ullnay, useway *PRINT-LEVEL*"
 
 #: src/code/debug.lisp
@@ -14416,17 +16464,18 @@ msgid ""
 "If\n"
 "  null, use *PRINT-LENGTH*."
 msgstr ""
-"*PRINT-LENGTH* isway oundbay otay isthay aluevay enwhay ebugday intspray away unctionfay allcay.  "
-"Ifway\n"
+"*PRINT-LENGTH* isway oundbay otay isthay aluevay enwhay ebugday intspray "
+"away unctionfay allcay.  Ifway\n"
 "  ullnay, useway *PRINT-LENGTH*."
 
 #: src/code/debug.lisp
 msgid ""
-"default value for the verbose argument to print-frame-call.  If set to >= 2,"
-" source will be printed for all frames"
+"default value for the verbose argument to print-frame-call.  If set to >= 2, "
+"source will be printed for all frames"
 msgstr ""
-"efaultday aluevay orfay ethay erbosevay argumentway otay intpray-amefray-allcay.  Ifway etsay otay >= 2,"
-" ourcesay illway ebay intedpray orfay allway amesfray"
+"efaultday aluevay orfay ethay erbosevay argumentway otay intpray-amefray-"
+"allcay.  Ifway etsay otay >= 2, ourcesay illway ebay intedpray orfay allway "
+"amesfray"
 
 #: src/code/debug.lisp
 msgid "This is T while in the debugger."
@@ -14434,14 +16483,16 @@ msgstr "Isthay isway T ilewhay inway ethay ebuggerday."
 
 #: src/code/debug.lisp
 msgid "Pushes and pops/exits inside the debugger change this."
-msgstr "Ushespay andway opspay/exitsway insideway ethay ebuggerday angechay isthay."
+msgstr ""
+"Ushespay andway opspay/exitsway insideway ethay ebuggerday angechay isthay."
 
 #: src/code/debug.lisp
 msgid ""
 "If this is bound before the debugger is invoked, it is used as the stack\n"
 "   top by the debugger."
 msgstr ""
-"Ifway isthay isway oundbay eforebay ethay ebuggerday isway invokedway, itway isway usedway asway ethay tacksay\n"
+"Ifway isthay isway oundbay eforebay ethay ebuggerday isway invokedway, itway "
+"isway usedway asway ethay tacksay\n"
 "   optay ybay ethay ebuggerday."
 
 #: src/code/debug.lisp
@@ -14449,7 +16500,8 @@ msgid ""
 "This is a function of no arguments that prints the debugger prompt\n"
 "   on *debug-io*."
 msgstr ""
-"Isthay isway away unctionfay ofway onay argumentsway atthay intspray ethay ebuggerday omptpray\n"
+"Isthay isway away unctionfay ofway onay argumentsway atthay intspray ethay "
+"ebuggerday omptpray\n"
 "   onway *debug-io*."
 
 #: src/code/debug.lisp
@@ -14457,12 +16509,15 @@ msgid ""
 "When true, the LIST-LOCATIONS command only displays block start locations.\n"
 "   Otherwise, all locations are displayed."
 msgstr ""
-"Enwhay uetray, ethay LIST-LOCATIONS ommandcay onlyway isplaysday ockblay tartsay ocationslay.\n"
+"Enwhay uetray, ethay LIST-LOCATIONS ommandcay onlyway isplaysday ockblay "
+"tartsay ocationslay.\n"
 "   Otherwiseway, allway ocationslay areway isplayedday."
 
 #: src/code/debug.lisp
 msgid "If true, list the code location type in the LIST-LOCATIONS command."
-msgstr "Ifway uetray, istlay ethay odecay ocationlay ypetay inway ethay LIST-LOCATIONS ommandcay."
+msgstr ""
+"Ifway uetray, istlay ethay odecay ocationlay ypetay inway ethay LIST-"
+"LOCATIONS ommandcay."
 
 #: src/code/debug.lisp
 msgid "~%Unknown location: using block start.~%"
@@ -14511,7 +16566,8 @@ msgid ""
 "                the following error:~%  ~A"
 msgstr ""
 "Urrentlycay onlyway ompiledcay odecay ancay ebay teppedsay.~%~\n"
-"                Yingtray otay ompilecay ethay assedpay ormfay esultedray inway ~\n"
+"                Yingtray otay ompilecay ethay assedpay ormfay esultedray "
+"inway ~\n"
 "                ethay ollowingfay errorway:~%  ~Away"
 
 #: src/code/debug.lisp
@@ -14525,8 +16581,8 @@ msgstr "~&usingway ethay ebuggerday.  Ypetay HELP orfay elphay.~2%"
 #: src/code/debug.lisp
 msgid ""
 "STEP implements a debugging paradigm wherein the programmer is allowed\n"
-"   to step through the evaluation of a form.  We use the debugger's stepping"
-"\n"
+"   to step through the evaluation of a form.  We use the debugger's "
+"stepping\n"
 "   facility to step through an anonymous function containing only form.\n"
 "\n"
 "   Currently the stepping facility only supports stepping compiled code,\n"
@@ -14534,14 +16590,19 @@ msgid ""
 "   fails, e.g. because it closes over a non-null lexical environment, an\n"
 "   error is signalled."
 msgstr ""
-"STEP implementsway away ebuggingday aradigmpay ereinwhay ethay ogrammerpray isway allowedway\n"
-"   otay tepsay roughthay ethay evaluationway ofway away ormfay.  Eway useway ethay ebuggerday's teppingsay"
-"\n"
-"   acilityfay otay tepsay roughthay anway anonymousway unctionfay ontainingcay onlyway ormfay.\n"
-"\n"
-"   Urrentlycay ethay teppingsay acilityfay onlyway upportssay teppingsay ompiledcay odecay,\n"
-"   osay tepsay illway ytray otay ompilecay ethay esultantray anonymousway unctionfay.  Ifway isthay\n"
-"   ailsfay, e.g. ecausebay itway osesclay overway away onnay-ullnay exicallay environmentway, anway\n"
+"STEP implementsway away ebuggingday aradigmpay ereinwhay ethay ogrammerpray "
+"isway allowedway\n"
+"   otay tepsay roughthay ethay evaluationway ofway away ormfay.  Eway useway "
+"ethay ebuggerday's teppingsay\n"
+"   acilityfay otay tepsay roughthay anway anonymousway unctionfay "
+"ontainingcay onlyway ormfay.\n"
+"\n"
+"   Urrentlycay ethay teppingsay acilityfay onlyway upportssay teppingsay "
+"ompiledcay odecay,\n"
+"   osay tepsay illway ytray otay ompilecay ethay esultantray anonymousway "
+"unctionfay.  Ifway isthay\n"
+"   ailsfay, e.g. ecausebay itway osesclay overway away onnay-ullnay "
+"exicallay environmentway, anway\n"
 "   errorway isway ignalledsay."
 
 #: src/code/debug.lisp
@@ -14551,9 +16612,10 @@ msgid ""
 "many\n"
 "   frames to show."
 msgstr ""
-"Owshay away istinglay ofway ethay allcay tacksay oinggay ownday omfray ethay urrentcay amefray.  Inway ethay\n"
-"   ebuggerday, ethay urrentcay amefray isway indicatedway ybay ethay omptpray.  Ountcay isway owhay "
-"anymay\n"
+"Owshay away istinglay ofway ethay allcay tacksay oinggay ownday omfray ethay "
+"urrentcay amefray.  Inway ethay\n"
+"   ebuggerday, ethay urrentcay amefray isway indicatedway ybay ethay "
+"omptpray.  Ountcay isway owhay anymay\n"
 "   amesfray otay owshay."
 
 #: src/code/debug.lisp
@@ -14599,13 +16661,14 @@ msgid ""
 "   of this variable to the function because it binds *debugger-hook* to nil\n"
 "   around the invocation."
 msgstr ""
-"Isthay isway eitherway ilnay orway away unctionfay ofway wotay argumentsway, away onditioncay andway ethay "
-"aluevay\n"
-"   ofway *debugger-hook*.  Isthay unctionfay ancay eitherway andlehay ethay onditioncay orway "
-"eturnray\n"
-"   ichwhay ausescay ethay tandardsay ebuggerday otay executeway.  Ethay ystemsay assespay ethay "
-"aluevay\n"
-"   ofway isthay ariablevay otay ethay unctionfay ecausebay itway indsbay *debugger-hook* otay ilnay\n"
+"Isthay isway eitherway ilnay orway away unctionfay ofway wotay argumentsway, "
+"away onditioncay andway ethay aluevay\n"
+"   ofway *debugger-hook*.  Isthay unctionfay ancay eitherway andlehay ethay "
+"onditioncay orway eturnray\n"
+"   ichwhay ausescay ethay tandardsay ebuggerday otay executeway.  Ethay "
+"ystemsay assespay ethay aluevay\n"
+"   ofway isthay ariablevay otay ethay unctionfay ecausebay itway indsbay "
+"*debugger-hook* otay ilnay\n"
 "   aroundway ethay invocationway."
 
 #: src/code/debug.lisp
@@ -14629,20 +16692,25 @@ msgid ""
 "When set, avoid calling INVOKE-DEBUGGER recursively when errors occur while\n"
 "   executing in the debugger.  The 'flush' command toggles this."
 msgstr ""
-"Enwhay etsay, avoidway allingcay INVOKE-DEBUGGER ecursivelyray enwhay errorsway occurway ilewhay\n"
-"   executingway inway ethay ebuggerday.  Ethay 'ushflay' ommandcay ogglestay isthay."
+"Enwhay etsay, avoidway allingcay INVOKE-DEBUGGER ecursivelyray enwhay "
+"errorsway occurway ilewhay\n"
+"   executingway inway ethay ebuggerday.  Ethay 'ushflay' ommandcay ogglestay "
+"isthay."
 
 #: src/code/debug.lisp
 msgid ""
 "When non-NIL, becomes the system *READTABLE* in the debugger\n"
 "   read-eval-print loop"
 msgstr ""
-"Enwhay onnay-NIL, ecomesbay ethay ystemsay *READTABLE* inway ethay ebuggerday\n"
+"Enwhay onnay-NIL, ecomesbay ethay ystemsay *READTABLE* inway ethay "
+"ebuggerday\n"
 "   eadray-evalway-intpray ooplay"
 
 #: src/code/debug.lisp
 msgid "When non-NIL, print the current frame when entering the debugger."
-msgstr "Enwhay onnay-NIL, intpray ethay urrentcay amefray enwhay enteringway ethay ebuggerday."
+msgstr ""
+"Enwhay onnay-NIL, intpray ethay urrentcay amefray enwhay enteringway ethay "
+"ebuggerday."
 
 #: src/code/debug.lisp
 msgid "Unknown stream-command -- ~S."
@@ -14670,8 +16738,10 @@ msgid ""
 "   relative to the current frame's environment without the need of debugger\n"
 "   forms that explicitly control this kind of evaluation."
 msgstr ""
-"Enwhay etsay (ethay efaultday), evaluationsway inway ethay ebuggerday's ommandcay ooplay occurway\n"
-"   elativeray otay ethay urrentcay amefray's environmentway ithoutway ethay eednay ofway ebuggerday\n"
+"Enwhay etsay (ethay efaultday), evaluationsway inway ethay ebuggerday's "
+"ommandcay ooplay occurway\n"
+"   elativeray otay ethay urrentcay amefray's environmentway ithoutway ethay "
+"eednay ofway ebuggerday\n"
 "   ormsfay atthay explicitlyway ontrolcay isthay indkay ofway evaluationway."
 
 #: src/code/debug.lisp
@@ -14693,31 +16763,38 @@ msgid ""
 "   this return no values after displaying the ambiguous names.  If name\n"
 "   determines multiple variables with the same name, then you must use the\n"
 "   optional id argument to specify which one you want.  If you left id\n"
-"   unspecified, then this returns no values after displaying the distinguish"
-"ing\n"
+"   unspecified, then this returns no values after displaying the "
+"distinguishing\n"
 "   id values.\n"
 "\n"
 "   The result of this function is limited to the availability of variable\n"
 "   information.  This is SETF'able."
 msgstr ""
-"Eturnsray away ariablevay's aluevay ifway ossiblepay.  Amenay isway away implesay-ingstray orway ymbolsay.\n"
-"   Ifway itway isway away implesay-ingstray, itway isway anway initialway ubstringsay ofway ethay ariablevay's "
-"amenay.\n"
-"   Ifway amenay isway away ymbolsay, itway ashay ethay amesay amenay andway ackagepay asway ethay ariablevay "
-"osewhay\n"
-"   aluevay isthay unctionfay eturnsray.  Ifway ethay ymbolsay isway uninternedway, enthay ethay "
-"ariablevay\n"
-"   ashay ethay amesay amenay asway ethay ymbolsay, utbay itway ashay onay ackagepay.\n"
-"\n"
-"   Ifway amenay isway ethay initialway ubstringsay ofway ariablesvay ithway ifferentday amesnay, enthay\n"
-"   isthay eturnray onay aluesvay afterway isplayingday ethay ambiguousway amesnay.  Ifway amenay\n"
-"   eterminesday ultiplemay ariablesvay ithway ethay amesay amenay, enthay ouyay ustmay useway ethay\n"
-"   optionalway idway argumentway otay ecifyspay ichwhay oneway ouyay antway.  Ifway ouyay eftlay idway\n"
-"   unspecifiedway, enthay isthay eturnsray onay aluesvay afterway isplayingday ethay istinguishday"
-"ingway\n"
+"Eturnsray away ariablevay's aluevay ifway ossiblepay.  Amenay isway away "
+"implesay-ingstray orway ymbolsay.\n"
+"   Ifway itway isway away implesay-ingstray, itway isway anway initialway "
+"ubstringsay ofway ethay ariablevay's amenay.\n"
+"   Ifway amenay isway away ymbolsay, itway ashay ethay amesay amenay andway "
+"ackagepay asway ethay ariablevay osewhay\n"
+"   aluevay isthay unctionfay eturnsray.  Ifway ethay ymbolsay isway "
+"uninternedway, enthay ethay ariablevay\n"
+"   ashay ethay amesay amenay asway ethay ymbolsay, utbay itway ashay onay "
+"ackagepay.\n"
+"\n"
+"   Ifway amenay isway ethay initialway ubstringsay ofway ariablesvay ithway "
+"ifferentday amesnay, enthay\n"
+"   isthay eturnray onay aluesvay afterway isplayingday ethay ambiguousway "
+"amesnay.  Ifway amenay\n"
+"   eterminesday ultiplemay ariablesvay ithway ethay amesay amenay, enthay "
+"ouyay ustmay useway ethay\n"
+"   optionalway idway argumentway otay ecifyspay ichwhay oneway ouyay "
+"antway.  Ifway ouyay eftlay idway\n"
+"   unspecifiedway, enthay isthay eturnsray onay aluesvay afterway "
+"isplayingday ethay istinguishdayingway\n"
 "   idway aluesvay.\n"
 "\n"
-"   Ethay esultray ofway isthay unctionfay isway imitedlay otay ethay availabilityway ofway ariablevay\n"
+"   Ethay esultray ofway isthay unctionfay isway imitedlay otay ethay "
+"availabilityway ofway ariablevay\n"
 "   informationway.  Isthay isway SETF'ableway."
 
 #: src/code/debug.lisp
@@ -14734,18 +16811,20 @@ msgstr "Invalidway ariablevay ID, ~D, ouldshay avehay eenbay oneway ofway ~S."
 
 #: src/code/debug.lisp
 msgid "Specify variable ID to disambiguate ~S.  Use one of ~S."
-msgstr "Ecifyspay ariablevay ID otay isambiguateday ~S.  Useway oneway ofway ~S."
+msgstr ""
+"Ecifyspay ariablevay ID otay isambiguateday ~S.  Useway oneway ofway ~S."
 
 #: src/code/debug.lisp
 msgid ""
 "Returns the n'th argument's value if possible.  Argument zero is the first\n"
-"   argument in a frame's default printed representation.  Count keyword/valu"
-"e\n"
+"   argument in a frame's default printed representation.  Count keyword/"
+"value\n"
 "   pairs as separate arguments."
 msgstr ""
-"Eturnsray ethay n'thay argumentway's aluevay ifway ossiblepay.  Argumentway erozay isway ethay irstfay\n"
-"   argumentway inway away amefray's efaultday intedpray epresentationray.  Ountcay eywordkay/aluvay"
-"e\n"
+"Eturnsray ethay n'thay argumentway's aluevay ifway ossiblepay.  Argumentway "
+"erozay isway ethay irstfay\n"
+"   argumentway inway away amefray's efaultday intedpray epresentationray.  "
+"Ountcay eywordkay/aluvaye\n"
 "   airspay asway eparatesay argumentsway."
 
 #: src/code/debug.lisp
@@ -14807,13 +16886,13 @@ msgstr "Amefray umbernay: "
 #: src/code/debug.lisp
 msgid ""
 "~@<can't find a tag for this frame ~\n"
-"                   ~2I~_(hint: try increasing the DEBUG optimization "
-"quality ~\n"
+"                   ~2I~_(hint: try increasing the DEBUG optimization quality "
+"~\n"
 "                   and recompiling)~:@>"
 msgstr ""
 "~@<ancay't indfay away agtay orfay isthay amefray ~\n"
-"                   ~2Iway~_(inthay: ytray increasingway ethay DEBUG optimizationway "
-"alityquay ~\n"
+"                   ~2Iway~_(inthay: ytray increasingway ethay DEBUG "
+"optimizationway alityquay ~\n"
 "                   andway ecompilingray)~:@>"
 
 #: src/code/debug.lisp
@@ -14841,7 +16920,8 @@ msgid ""
 "This controls how many lines the debugger's help command prints before\n"
 "   printing a prompting line to continue with output."
 msgstr ""
-"Isthay ontrolscay owhay anymay ineslay ethay ebuggerday's elphay ommandcay intspray eforebay\n"
+"Isthay ontrolscay owhay anymay ineslay ethay ebuggerday's elphay ommandcay "
+"intspray eforebay\n"
 "   intingpray away omptingpray inelay otay ontinuecay ithway outputway."
 
 #: src/code/debug.lisp
@@ -14851,18 +16931,18 @@ msgstr "~%[RETURN FOR MORE, Q TO QUIT HELP TEXT]: "
 #: src/code/debug.lisp
 msgid ""
 "No local variables ~@[starting with ~A ~]~\n"
-"	               in function."
+"\t               in function."
 msgstr ""
 "Onay ocallay ariablesvay ~@[tartingsay ithway ~Away ~]~\n"
-"	               inway unctionfay."
+"\t               inway unctionfay."
 
 #: src/code/debug.lisp
 msgid ""
 "All variables ~@[starting with ~A ~]currently ~\n"
-"	               have invalid values."
+"\t               have invalid values."
 msgstr ""
 "Allway ariablesvay ~@[tartingsay ithway ~Away ~]urrentlycay ~\n"
-"	               avehay invalidway aluesvay."
+"\t               avehay invalidway aluesvay."
 
 #: src/code/debug.lisp
 msgid "No variable information available."
@@ -14879,10 +16959,10 @@ msgstr "~%; Ilefay: ~Away~%"
 #: src/code/debug.lisp
 msgid ""
 "~%; File has been modified since compilation:~%;   ~A~@\n"
-"		 ; Using form offset instead of character position.~%"
+"\t\t ; Using form offset instead of character position.~%"
 msgstr ""
 "~%; Ilefay ashay eenbay odifiedmay incesay ompilationcay:~%;   ~Away~@\n"
-"		 ; Usingway ormfay offsetway insteadway ofway aracterchay ositionpay.~%"
+"\t\t ; Usingway ormfay offsetway insteadway ofway aracterchay ositionpay.~%"
 
 #: src/code/debug.lisp
 msgid "No start positions map."
@@ -14947,10 +17027,11 @@ msgstr "Ancay't igurefay outway ethay unctionfay orfay isthay amefray."
 #: src/code/debug.lisp
 msgid ""
 "The debugger's EDIT-SOURCE command only works in slave Lisps ~\n"
-"	    connected to a Hemlock editor."
+"\t    connected to a Hemlock editor."
 msgstr ""
-"Ethay ebuggerday's EDIT-SOURCE ommandcay onlyway orksway inway aveslay Ispslay ~\n"
-"	    onnectedcay otay away Emlockhay editorway."
+"Ethay ebuggerday's EDIT-SOURCE ommandcay onlyway orksway inway aveslay "
+"Ispslay ~\n"
+"\t    onnectedcay otay away Emlockhay editorway."
 
 #: src/code/query.lisp
 msgid ""
@@ -14959,9 +17040,12 @@ msgid ""
 "   negative answer.  It ignores preceding whitespace and asks again if you\n"
 "   enter any other characters."
 msgstr ""
-"Y-OR-N-P intspray ethay essagemay, ifway anyway, andway eadsray aracterschay omfray *QUERY-IO*\n"
-"   untilway ethay userway entersway y orway Y asway anway affirmativeway, orway eitherway n orway N asway away\n"
-"   egativenay answerway.  Itway ignoresway ecedingpray itespacewhay andway asksway againway ifway ouyay\n"
+"Y-OR-N-P intspray ethay essagemay, ifway anyway, andway eadsray aracterschay "
+"omfray *QUERY-IO*\n"
+"   untilway ethay userway entersway y orway Y asway anway affirmativeway, "
+"orway eitherway n orway N asway away\n"
+"   egativenay answerway.  Itway ignoresway ecedingpray itespacewhay andway "
+"asksway againway ifway ouyay\n"
 "   enterway anyway otherway aracterschay."
 
 #: src/code/query.lisp
@@ -14974,8 +17058,10 @@ msgid ""
 "   input buffer, beeps, and uses READ-LINE to get the strings \n"
 "   YES or NO."
 msgstr ""
-"YES-OR-NO-P isway imilarsay otay Y-OR-N-P, exceptway atthay itway earsclay ethay \n"
-"   inputway ufferbay, eepsbay, andway usesway READ-LINE otay etgay ethay ingsstray \n"
+"YES-OR-NO-P isway imilarsay otay Y-OR-N-P, exceptway atthay itway earsclay "
+"ethay \n"
+"   inputway ufferbay, eepsbay, andway usesway READ-LINE otay etgay ethay "
+"ingsstray \n"
 "   YES orway NO."
 
 #: src/code/query.lisp
@@ -14987,8 +17073,10 @@ msgid ""
 "Generate an random state vector from the given SEED.  The seed can be\n"
 "  either an integer or a vector of (unsigned-byte 32)"
 msgstr ""
-"Enerategay anway andomray tatesay ectorvay omfray ethay ivengay SEED.  Ethay eedsay ancay ebay\n"
-"  eitherway anway integerway orway away ectorvay ofway (unsignedway-ytebay 32)"
+"Enerategay anway andomray tatesay ectorvay omfray ethay ivengay SEED.  Ethay "
+"eedsay ancay ebay\n"
+"  eitherway anway integerway orway away ectorvay ofway (unsignedway-ytebay "
+"32)"
 
 #: src/code/rand-mt19937.lisp
 msgid ""
@@ -14997,9 +17085,12 @@ msgid ""
 "  copy of it.  If STATE is T then return a random state generated from\n"
 "  the universal time or /dev/urandom if available."
 msgstr ""
-"Akemay away andomray tatesay objectway.  Ifway STATE isway otnay uppliedsay, eturnray away opycay\n"
-"  ofway ethay efaultday andomray tatesay.  Ifway STATE isway away andomray tatesay, enthay eturnray away\n"
-"  opycay ofway itway.  Ifway STATE isway T enthay eturnray away andomray tatesay eneratedgay omfray\n"
+"Akemay away andomray tatesay objectway.  Ifway STATE isway otnay uppliedsay, "
+"eturnray away opycay\n"
+"  ofway ethay efaultday andomray tatesay.  Ifway STATE isway away andomray "
+"tatesay, enthay eturnray away\n"
+"  opycay ofway itway.  Ifway STATE isway T enthay eturnray away andomray "
+"tatesay eneratedgay omfray\n"
 "  ethay universalway imetay orway /evday/urandomway ifway availableway."
 
 #: src/code/rand-mt19937.lisp
@@ -15011,19 +17102,24 @@ msgid ""
 "Generate a uniformly distributed pseudo-random number between zero\n"
 "  and Arg.  State, if supplied, is the random state to use."
 msgstr ""
-"Enerategay away uniformlyway istributedday seudopay-andomray umbernay etweenbay erozay\n"
-"  andway Argway.  Tatesay, ifway uppliedsay, isway ethay andomray tatesay otay useway."
+"Enerategay away uniformlyway istributedday seudopay-andomray umbernay "
+"etweenbay erozay\n"
+"  andway Argway.  Tatesay, ifway uppliedsay, isway ethay andomray tatesay "
+"otay useway."
 
 #: src/code/rand-mt19937.lisp
 msgid "Argument is not a positive integer or a positive float: ~S"
-msgstr "Argumentway isway otnay away ositivepay integerway orway away ositivepay oatflay: ~S"
+msgstr ""
+"Argumentway isway otnay away ositivepay integerway orway away ositivepay "
+"oatflay: ~S"
 
 #: src/code/ntrace.lisp
 msgid ""
 "This is bound to the returned values when evaluating :BREAK-AFTER and\n"
 "   :PRINT-AFTER forms."
 msgstr ""
-"Isthay isway oundbay otay ethay eturnedray aluesvay enwhay evaluatingway :BREAK-AFTER andway\n"
+"Isthay isway oundbay otay ethay eturnedray aluesvay enwhay evaluatingway :"
+"BREAK-AFTER andway\n"
 "   :PRINT-AFTER ormsfay."
 
 #: src/code/ntrace.lisp
@@ -15031,12 +17127,14 @@ msgid ""
 "If the trace indentation exceeds this value, then indentation restarts at\n"
 "   0."
 msgstr ""
-"Ifway ethay acetray indentationway exceedsway isthay aluevay, enthay indentationway estartsray atway\n"
+"Ifway ethay acetray indentationway exceedsway isthay aluevay, enthay "
+"indentationway estartsray atway\n"
 "   0."
 
 #: src/code/ntrace.lisp
 msgid "The default value for the :ENCAPSULATE option to trace."
-msgstr "Ethay efaultday aluevay orfay ethay :ENCAPSULATE optionway otay acetray."
+msgstr ""
+"Ethay efaultday aluevay orfay ethay :ENCAPSULATE optionway otay acetray."
 
 #: src/code/ntrace.lisp
 msgid ""
@@ -15044,8 +17142,10 @@ msgid ""
 "   by default.  This should at least include the packages of functions\n"
 "   used by TRACE, directly or indirectly."
 msgstr ""
-"Istlay ofway ackagepay amesnay.  Encapsulateway unctionsfay omfray esethay ackagespay\n"
-"   ybay efaultday.  Isthay ouldshay atway eastlay includeway ethay ackagespay ofway unctionsfay\n"
+"Istlay ofway ackagepay amesnay.  Encapsulateway unctionsfay omfray esethay "
+"ackagespay\n"
+"   ybay efaultday.  Isthay ouldshay atway eastlay includeway ethay "
+"ackagespay ofway unctionsfay\n"
 "   usedway ybay TRACE, irectlyday orway indirectlyway."
 
 #: src/code/ntrace.lisp
@@ -15070,11 +17170,14 @@ msgstr "~S amenay isway otnay away efinedday obalglay unctionfay: ~S"
 
 #: src/code/ntrace.lisp
 msgid "Can't use encapsulation to trace anonymous function ~S."
-msgstr "Ancay't useway encapsulationway otay acetray anonymousway unctionfay ~S."
+msgstr ""
+"Ancay't useway encapsulationway otay acetray anonymousway unctionfay ~S."
 
 #: src/code/ntrace.lisp
 msgid "Can't use encapsulation to trace local flet/labels function ~S."
-msgstr "Ancay't useway encapsulationway otay acetray ocallay etflay/abelslay unctionfay ~S."
+msgstr ""
+"Ancay't useway encapsulationway otay acetray ocallay etflay/abelslay "
+"unctionfay ~S."
 
 #: src/code/ntrace.lisp
 msgid "Tracing shared code for ~S:~%  ~S"
@@ -15091,8 +17194,8 @@ msgstr "Unknownway TRACE optionway: ~S"
 #: src/code/ntrace.lisp
 msgid ""
 "TRACE {Option Global-Value}* {Name {Option Value}*}*\n"
-"   TRACE is a debugging tool that prints information when specified function"
-"s\n"
+"   TRACE is a debugging tool that prints information when specified "
+"functions\n"
 "   are called.  In its simplest form:\n"
 "       (trace Name-1 Name-2 ...)\n"
 "\n"
@@ -15100,8 +17203,8 @@ msgid ""
 "   (METHOD {Qualifier}* ({Specializer}*)).\n"
 "\n"
 "   Labels and Flet functions can be traced by specifying a name of the form\n"
-"   (LABELS <lfun> <fun>) or (FLET <lfun> <fun>) where <lfun> is the Labels/F"
-"let\n"
+"   (LABELS <lfun> <fun>) or (FLET <lfun> <fun>) where <lfun> is the Labels/"
+"Flet\n"
 "   function in <fun>.\n"
 "\n"
 "   TRACE causes a printout on *TRACE-OUTPUT* each time that one of the "
@@ -15172,114 +17275,136 @@ msgid ""
 "       If T, the tracing is done via encapsulation (redefining the function\n"
 "       name) rather than by modifying the function.  :DEFAULT is the "
 "default,\n"
-"       and means to use encapsulation for interpreted functions and funcalla"
-"ble\n"
+"       and means to use encapsulation for interpreted functions and "
+"funcallable\n"
 "       instances, breakpoints otherwise.  When encapsulation is used, forms "
 "are\n"
 "       *not* evaluated in the function's lexical environment, but DEBUG:ARG "
 "can\n"
 "       still be used.\n"
 "\n"
-"   :CONDITION, :BREAK and :PRINT forms are evaluated in the lexical environm"
-"ent\n"
+"   :CONDITION, :BREAK and :PRINT forms are evaluated in the lexical "
+"environment\n"
 "   of the called function; DEBUG:VAR and DEBUG:ARG can be used.  The -AFTER "
 "and\n"
 "   -ALL forms are evaluated in the null environment."
 msgstr ""
 "TRACE {Optionway Obalglay-Aluevay}* {Amenay {Optionway Aluevay}*}*\n"
-"   TRACE isway away ebuggingday ooltay atthay intspray informationway enwhay ecifiedspay unctionfay"
-"s\n"
+"   TRACE isway away ebuggingday ooltay atthay intspray informationway enwhay "
+"ecifiedspay unctionfays\n"
 "   areway alledcay.  Inway itsway implestsay ormfay:\n"
 "       (acetray Amenay-1 Amenay-2 ...)\n"
 "\n"
-"   CLOS ethodsmay ancay ebay acedtray ybay ecifyingspay away amenay ofway ethay ormfay\n"
+"   CLOS ethodsmay ancay ebay acedtray ybay ecifyingspay away amenay ofway "
+"ethay ormfay\n"
 "   (METHOD {Alifierquay}* ({Ecializerspay}*)).\n"
 "\n"
-"   Abelslay andway Etflay unctionsfay ancay ebay acedtray ybay ecifyingspay away amenay ofway ethay ormfay\n"
-"   (LABELS <funlay> <unfay>) orway (FLET <funlay> <unfay>) erewhay <funlay> isway ethay Abelslay/F"
-"etlay\n"
+"   Abelslay andway Etflay unctionsfay ancay ebay acedtray ybay ecifyingspay "
+"away amenay ofway ethay ormfay\n"
+"   (LABELS <funlay> <unfay>) orway (FLET <funlay> <unfay>) erewhay <funlay> "
+"isway ethay Abelslay/Fetlay\n"
 "   unctionfay inway <unfay>.\n"
 "\n"
-"   TRACE ausescay away intoutpray onway *TRACE-OUTPUT* eachway imetay atthay oneway ofway ethay "
-"amednay\n"
-"   unctionsfay isway enteredway orway eturnsray (ethay Amesnay areway otnay evaluatedway.)  Ethay "
-"outputway\n"
-"   isway indentedway accordingway otay ethay umbernay ofway endingpay acedtray allscay, andway isthay "
-"acetray\n"
-"   epthday isway intedpray atway ethay eginningbay ofway eachway inelay ofway outputway.\n"
-"\n"
-"   Optionsway allowway odificationmay ofway ethay efaultday ehaviorbay.  Eachway optionway isway away "
-"airpay\n"
-"   ofway anway optionway eywordkay andway away aluevay ormfay.  Optionsway aymay ebay interspersedway ithway\n"
-"   unctionfay amesnay.  Optionsway onlyway affectway acingtray ofway ethay unctionfay osewhay amenay "
-"eythay\n"
-"   appearway immediatelyway afterway.  Obalglay optionsway areway ecifiedspay eforebay ethay irstfay\n"
-"   amenay, andway affectway allway unctionsfay acedtray ybay away ivengay useway ofway TRACE.\n"
+"   TRACE ausescay away intoutpray onway *TRACE-OUTPUT* eachway imetay atthay "
+"oneway ofway ethay amednay\n"
+"   unctionsfay isway enteredway orway eturnsray (ethay Amesnay areway otnay "
+"evaluatedway.)  Ethay outputway\n"
+"   isway indentedway accordingway otay ethay umbernay ofway endingpay "
+"acedtray allscay, andway isthay acetray\n"
+"   epthday isway intedpray atway ethay eginningbay ofway eachway inelay "
+"ofway outputway.\n"
+"\n"
+"   Optionsway allowway odificationmay ofway ethay efaultday ehaviorbay.  "
+"Eachway optionway isway away airpay\n"
+"   ofway anway optionway eywordkay andway away aluevay ormfay.  Optionsway "
+"aymay ebay interspersedway ithway\n"
+"   unctionfay amesnay.  Optionsway onlyway affectway acingtray ofway ethay "
+"unctionfay osewhay amenay eythay\n"
+"   appearway immediatelyway afterway.  Obalglay optionsway areway "
+"ecifiedspay eforebay ethay irstfay\n"
+"   amenay, andway affectway allway unctionsfay acedtray ybay away ivengay "
+"useway ofway TRACE.\n"
 "\n"
 "   Ethay ollowingfay optionsway areway efinedday:\n"
 "\n"
 "   :CONDITION Ormfay\n"
 "   :CONDITION-AFTER Ormfay\n"
 "   :CONDITION-ALL Ormfay\n"
-"       Ifway :CONDITION isway ecifiedspay, enthay TRACE oesday othingnay unlessway Ormfay\n"
-"       evaluatesway otay uetray atway ethay imetay ofway ethay allcay.  :CONDITION-AFTER isway\n"
-"       imilarsay, utbay uppressessay ethay initialway intoutpray, andway isway estedtay enwhay ethay\n"
-"       unctionfay eturnsray.  :CONDITION-ALL iestray othbay eforebay andway afterway.\n"
+"       Ifway :CONDITION isway ecifiedspay, enthay TRACE oesday othingnay "
+"unlessway Ormfay\n"
+"       evaluatesway otay uetray atway ethay imetay ofway ethay allcay.  :"
+"CONDITION-AFTER isway\n"
+"       imilarsay, utbay uppressessay ethay initialway intoutpray, andway "
+"isway estedtay enwhay ethay\n"
+"       unctionfay eturnsray.  :CONDITION-ALL iestray othbay eforebay andway "
+"afterway.\n"
 "\n"
 "   :WHEREIN Amesnay\n"
-"       Ifway ecifiedspay, Amesnay isway away unctionfay amenay orway istlay ofway amesnay.  TRACE oesday\n"
-"       othingnay unlessway away allcay otay oneway ofway osethay unctionsfay enclosesway ethay allcay otay\n"
-"       isthay unctionfay (i.e. itway ouldway appearway inway away acktracebay.)  Anonymousway\n"
+"       Ifway ecifiedspay, Amesnay isway away unctionfay amenay orway istlay "
+"ofway amesnay.  TRACE oesday\n"
+"       othingnay unlessway away allcay otay oneway ofway osethay unctionsfay "
+"enclosesway ethay allcay otay\n"
+"       isthay unctionfay (i.e. itway ouldway appearway inway away "
+"acktracebay.)  Anonymousway\n"
 "       unctionsfay avehay ingstray amesnay ikelay \"DEFUN FOO\".\n"
 "   :WHEREIN-ONLY Amesnay\n"
-"       Ikelay :WHEREIN, utbay onlyway ifway ethay immediateway allercay isway oneway ofway Amesnay,\n"
+"       Ikelay :WHEREIN, utbay onlyway ifway ethay immediateway allercay "
+"isway oneway ofway Amesnay,\n"
 "       insteadway ofway eingbay anyway erewhay inway away acktracebay.\n"
 "\n"
 "   :BREAK Ormfay\n"
 "   :BREAK-AFTER Ormfay\n"
 "   :BREAK-ALL Ormfay\n"
-"       Ifway ecifiedspay, andway Ormfay evaluatesway otay uetray, enthay ethay ebuggerday isway "
-"invokedway\n"
-"       atway ethay tartsay ofway ethay unctionfay, atway ethay endway ofway ethay unctionfay, orway othbay,\n"
+"       Ifway ecifiedspay, andway Ormfay evaluatesway otay uetray, enthay "
+"ethay ebuggerday isway invokedway\n"
+"       atway ethay tartsay ofway ethay unctionfay, atway ethay endway ofway "
+"ethay unctionfay, orway othbay,\n"
 "       accordingway otay ethay espectiveray optionway.\n"
 "\n"
 "   :PRINT Ormfay\n"
 "   :PRINT-AFTER Ormfay\n"
 "   :PRINT-ALL Ormfay\n"
-"       Inway additionway otay ethay usualway intoutpray, ethay esultray ofway evaluatingway FORM isway\n"
-"       intedpray atway ethay tartsay ofway ethay unctionfay, atway ethay endway ofway ethay unctionfay, orway\n"
-"       othbay, accordingway otay ethay espectiveray optionway.  Ultiplemay intpray optionsway "
-"ausecay\n"
+"       Inway additionway otay ethay usualway intoutpray, ethay esultray "
+"ofway evaluatingway FORM isway\n"
+"       intedpray atway ethay tartsay ofway ethay unctionfay, atway ethay "
+"endway ofway ethay unctionfay, orway\n"
+"       othbay, accordingway otay ethay espectiveray optionway.  Ultiplemay "
+"intpray optionsway ausecay\n"
 "       ultiplemay aluesvay otay ebay intedpray.\n"
 "\n"
 "   :FUNCTION Unctionfay-Ormfay\n"
-"       Isthay isway away otnay eallyray anway optionway, utbay atherray anotherway ayway ofway ecifyingspay\n"
-"       atwhay unctionfay otay acetray.  Ethay Unctionfay-Ormfay isway evaluatedway immediatelyway,\n"
+"       Isthay isway away otnay eallyray anway optionway, utbay atherray "
+"anotherway ayway ofway ecifyingspay\n"
+"       atwhay unctionfay otay acetray.  Ethay Unctionfay-Ormfay isway "
+"evaluatedway immediatelyway,\n"
 "       andway ethay esultingray unctionfay isway acedtray.\n"
 "\n"
 "   :METHODS Unctionfay-Ormfay\n"
-"       Isthay isway away otnay eallyray anway optionway, utbay atherray away ayway ofway ecifyingspay\n"
-"       atthay allway ethodsmay ofway away enericgay unctionsfay ouldshay ebay acedtray.  Ethay\n"
-"       Unctionfay-Ormfay isway evaluatedway immediatelyway, andway ethay ethodsmay ofway ethay "
-"esultingray\n"
+"       Isthay isway away otnay eallyray anway optionway, utbay atherray away "
+"ayway ofway ecifyingspay\n"
+"       atthay allway ethodsmay ofway away enericgay unctionsfay ouldshay "
+"ebay acedtray.  Ethay\n"
+"       Unctionfay-Ormfay isway evaluatedway immediatelyway, andway ethay "
+"ethodsmay ofway ethay esultingray\n"
 "       enericgay unctionfay areway acedtray.\n"
 "\n"
 "   :ENCAPSULATE {:DEFAULT | T | NIL}\n"
-"       Ifway T, ethay acingtray isway oneday iavay encapsulationway (edefiningray ethay unctionfay\n"
-"       amenay) atherray anthay ybay odifyingmay ethay unctionfay.  :DEFAULT isway ethay "
-"efaultday,\n"
-"       andway eansmay otay useway encapsulationway orfay interpretedway unctionsfay andway uncallafay"
-"eblay\n"
-"       instancesway, eakpointsbray otherwiseway.  Enwhay encapsulationway isway usedway, ormsfay "
-"areway\n"
-"       *not* evaluatedway inway ethay unctionfay's exicallay environmentway, utbay DEBUG:ARG "
-"ancay\n"
+"       Ifway T, ethay acingtray isway oneday iavay encapsulationway "
+"(edefiningray ethay unctionfay\n"
+"       amenay) atherray anthay ybay odifyingmay ethay unctionfay.  :DEFAULT "
+"isway ethay efaultday,\n"
+"       andway eansmay otay useway encapsulationway orfay interpretedway "
+"unctionsfay andway uncallafayeblay\n"
+"       instancesway, eakpointsbray otherwiseway.  Enwhay encapsulationway "
+"isway usedway, ormsfay areway\n"
+"       *not* evaluatedway inway ethay unctionfay's exicallay environmentway, "
+"utbay DEBUG:ARG ancay\n"
 "       tillsay ebay usedway.\n"
 "\n"
-"   :CONDITION, :BREAK andway :PRINT ormsfay areway evaluatedway inway ethay exicallay environmway"
-"entway\n"
-"   ofway ethay alledcay unctionfay; DEBUG:VAR andway DEBUG:ARG ancay ebay usedway.  Ethay -AFTER "
-"andway\n"
+"   :CONDITION, :BREAK andway :PRINT ormsfay areway evaluatedway inway ethay "
+"exicallay environmwayentway\n"
+"   ofway ethay alledcay unctionfay; DEBUG:VAR andway DEBUG:ARG ancay ebay "
+"usedway.  Ethay -AFTER andway\n"
 "   -ALL ormsfay areway evaluatedway inway ethay ullnay environmentway."
 
 #: src/code/ntrace.lisp
@@ -15291,7 +17416,8 @@ msgid ""
 "Removes tracing from the specified functions.  With no args, untraces all\n"
 "   functions."
 msgstr ""
-"Emovesray acingtray omfray ethay ecifiedspay unctionsfay.  Ithway onay argsway, untracesway allway\n"
+"Emovesray acingtray omfray ethay ecifiedspay unctionsfay.  Ithway onay "
+"argsway, untracesway allway\n"
 "   unctionsfay."
 
 #: src/code/profile.lisp
@@ -15307,8 +17433,10 @@ msgid ""
 "If the number of profiled functions that were not called is less than\n"
 "this, the functions are listed.  If NIL, then always list the functions."
 msgstr ""
-"Ifway ethay umbernay ofway ofiledpray unctionsfay atthay ereway otnay alledcay isway esslay anthay\n"
-"isthay, ethay unctionsfay areway istedlay.  Ifway NIL, enthay alwaysway istlay ethay unctionsfay."
+"Ifway ethay umbernay ofway ofiledpray unctionsfay atthay ereway otnay "
+"alledcay isway esslay anthay\n"
+"isthay, ethay unctionsfay areway istedlay.  Ifway NIL, enthay alwaysway "
+"istlay ethay unctionsfay."
 
 #: src/code/profile.lisp
 msgid "dfixnum became negative ~a/~a - ~a/~a(~a/~a)"
@@ -15324,13 +17452,17 @@ msgid ""
 "   arguments and optional arguments according to OPTIONALS-P exists.\n"
 "   Return the name of that fwrapper."
 msgstr ""
-"Ensureway atthay away ofilepray wrapperfay orfay unctionsfay ithway NREQ equiredray\n"
-"   argumentsway andway optionalway argumentsway accordingway otay OPTIONALS-P existsway.\n"
+"Ensureway atthay away ofilepray wrapperfay orfay unctionsfay ithway NREQ "
+"equiredray\n"
+"   argumentsway andway optionalway argumentsway accordingway otay OPTIONALS-"
+"P existsway.\n"
 "   Eturnray ethay amenay ofway atthay wrapperfay."
 
 #: src/code/profile.lisp
 msgid "Return the profile FWRAPPER object on function NAME, if any."
-msgstr "Eturnray ethay ofilepray FWRAPPER objectway onway unctionfay NAME, ifway anyway."
+msgstr ""
+"Eturnray ethay ofilepray FWRAPPER objectway onway unctionfay NAME, ifway "
+"anyway."
 
 #: src/code/profile.lisp
 msgid ""
@@ -15364,22 +17496,28 @@ msgid ""
 "   See also UNPROFILE, REPORT-TIME and RESET-TIME."
 msgstr ""
 "PROFILE Ame*Nay\n"
-"   Apswray ofilingpray odecay aroundway ethay amednay unctionsfay.  Asway inway TRACE, ethay amesnay "
-"areway\n"
-"   otnay evaluatedway.  Ifway away unctionfay isway alreadyway ofiledpray, enthay unprofileway andway\n"
-"   eprofileray (usefulway otay oticenay unctionfay edefinitionray.)  Ifway away amenay isway "
-"undefinedway,\n"
+"   Apswray ofilingpray odecay aroundway ethay amednay unctionsfay.  Asway "
+"inway TRACE, ethay amesnay areway\n"
+"   otnay evaluatedway.  Ifway away unctionfay isway alreadyway ofiledpray, "
+"enthay unprofileway andway\n"
+"   eprofileray (usefulway otay oticenay unctionfay edefinitionray.)  Ifway "
+"away amenay isway undefinedway,\n"
 "   enthay eway ivegay away arningway andway ignoreway itway.\n"
 "\n"
-"   CLOS ethodsmay ancay ebay ofiledpray ybay ecifyingspay amesnay ofway ethay ormfay\n"
+"   CLOS ethodsmay ancay ebay ofiledpray ybay ecifyingspay amesnay ofway "
+"ethay ormfay\n"
 "   (METHOD <amenay> <alifierquay>* (<ecializerspay>*)), ikelay inway TRACE.\n"
 "\n"
-"   :METHODS Unctionfay-Ormfay isway away ayway ofway ecifyingspay atthay allway ethodsmay ofway away\n"
-"   enericgay unctionsfay ouldshay ebay ofiledpray.  Ethay Unctionfay-Ormfay isway\n"
-"   evaluatedway immediatelyway, andway ethay ethodsmay ofway ethay esultingray enericgay\n"
+"   :METHODS Unctionfay-Ormfay isway away ayway ofway ecifyingspay atthay "
+"allway ethodsmay ofway away\n"
+"   enericgay unctionsfay ouldshay ebay ofiledpray.  Ethay Unctionfay-Ormfay "
+"isway\n"
+"   evaluatedway immediatelyway, andway ethay ethodsmay ofway ethay "
+"esultingray enericgay\n"
 "   unctionfay areway ofiledpray.\n"
 "\n"
-"   Ifway :CALLERS T appearsway, ubsequentsay amesnay avehay ountscay ofway ethay ostmay\n"
+"   Ifway :CALLERS T appearsway, ubsequentsay amesnay avehay ountscay ofway "
+"ethay ostmay\n"
 "   ommoncay allingcay unctionsfay ecordedray.\n"
 "\n"
 "   Eesay alsoway UNPROFILE, REPORT-TIME andway RESET-TIME."
@@ -15402,15 +17540,23 @@ msgid ""
 msgstr ""
 "PROFILE-ALL\n"
 "\n"
-" Apswray ofilingpray odecay aroundway allway unctionsfay inway PACKAGE, ichwhay efaultsday\n"
-" otay *PACKAGE*. Ifway away unctionfay isway alreadyway ofiledpray, enthay unprofileway andway\n"
-" eprofileray (usefulway otay oticenay unctionfay edefinitionray.)  Ifway away amenay isway\n"
-" undefinedway, enthay eway ivegay away arningway andway ignoreway itway.  Ifway CALLERS-P isway T\n"
-" amesnay avehay ountscay ofway ethay ostmay ommoncay allingcay unctionsfay ecordedray.\n"
-"\n"
-" Enwhay alledcay ithway argumentsway :METHODS T, ofilepray allway ethodsmay ofway allway\n"
-" enericgay unctionfay avinghay amesnay inway ethay ivengay ackagepay.  Enericgay unctionsfay\n"
-" emselvesthay, atthay isway, eirthay ispatchday unctionsfay, areway eftlay aloneway.\n"
+" Apswray ofilingpray odecay aroundway allway unctionsfay inway PACKAGE, "
+"ichwhay efaultsday\n"
+" otay *PACKAGE*. Ifway away unctionfay isway alreadyway ofiledpray, enthay "
+"unprofileway andway\n"
+" eprofileray (usefulway otay oticenay unctionfay edefinitionray.)  Ifway "
+"away amenay isway\n"
+" undefinedway, enthay eway ivegay away arningway andway ignoreway itway.  "
+"Ifway CALLERS-P isway T\n"
+" amesnay avehay ountscay ofway ethay ostmay ommoncay allingcay unctionsfay "
+"ecordedray.\n"
+"\n"
+" Enwhay alledcay ithway argumentsway :METHODS T, ofilepray allway ethodsmay "
+"ofway allway\n"
+" enericgay unctionfay avinghay amesnay inway ethay ivengay ackagepay.  "
+"Enericgay unctionsfay\n"
+" emselvesthay, atthay isway, eirthay ispatchday unctionsfay, areway eftlay "
+"aloneway.\n"
 "\n"
 " Eesay alsoway UNPROFILE, REPORT-TIME andway RESET-TIME. "
 
@@ -15419,7 +17565,8 @@ msgid ""
 "Unwraps the profiling code around the named functions.  Names defaults to\n"
 "  the list of all currently profiled functions."
 msgstr ""
-"Unwrapsway ethay ofilingpray odecay aroundway ethay amednay unctionsfay.  Amesnay efaultsday otay\n"
+"Unwrapsway ethay ofilingpray odecay aroundway ethay amednay unctionsfay.  "
+"Amesnay efaultsday otay\n"
 "  ethay istlay ofway allway urrentlycay ofiledpray unctionsfay."
 
 #: src/code/profile.lisp
@@ -15428,8 +17575,8 @@ msgid ""
 "list\n"
 "  of all currently profiled functions."
 msgstr ""
-"Esetsray ethay imetay ountercay orfay ethay amednay unctionsfay.  Amesnay efaultsday otay ethay "
-"istlay\n"
+"Esetsray ethay imetay ountercay orfay ethay amednay unctionsfay.  Amesnay "
+"efaultsday otay ethay istlay\n"
 "  ofway allway urrentlycay ofiledpray unctionsfay."
 
 #: src/code/profile.lisp
@@ -15437,7 +17584,8 @@ msgid ""
 "Reports the time spent in the named functions.  Names defaults to the list\n"
 "  of all currently profiled functions."
 msgstr ""
-"Eportsray ethay imetay entspay inway ethay amednay unctionsfay.  Amesnay efaultsday otay ethay istlay\n"
+"Eportsray ethay imetay entspay inway ethay amednay unctionsfay.  Amesnay "
+"efaultsday otay ethay istlay\n"
 "  ofway allway urrentlycay ofiledpray unctionsfay."
 
 #: src/code/profile.lisp
@@ -15445,7 +17593,8 @@ msgid ""
 "Reports the time spent in the named functions.  Names defaults to the list\n"
 "  of all currently profiled functions.  Uses printfunction."
 msgstr ""
-"Eportsray ethay imetay entspay inway ethay amednay unctionsfay.  Amesnay efaultsday otay ethay istlay\n"
+"Eportsray ethay imetay entspay inway ethay amednay unctionsfay.  Amesnay "
+"efaultsday otay ethay istlay\n"
 "  ofway allway urrentlycay ofiledpray unctionsfay.  Usesway intfunctionpray."
 
 #: src/code/sort.lisp
@@ -15453,7 +17602,8 @@ msgid ""
 "Destructively sorts sequence.  Predicate should returns non-Nil if\n"
 "   Arg1 is to precede Arg2."
 msgstr ""
-"Estructivelyday ortssay equencesay.  Edicatepray ouldshay eturnsray onnay-Ilnay ifway\n"
+"Estructivelyday ortssay equencesay.  Edicatepray ouldshay eturnsray onnay-"
+"Ilnay ifway\n"
 "   Argway1 isway otay ecedepray Argway2."
 
 #: src/code/sort.lisp
@@ -15463,19 +17613,20 @@ msgstr "~S isway otnay away equencesay."
 #: src/code/sort.lisp
 msgid ""
 "The sequences Sequence1 and Sequence2 are destructively merged into\n"
-"   a sequence of type Result-Type using the Predicate to order the "
-"elements."
+"   a sequence of type Result-Type using the Predicate to order the elements."
 msgstr ""
-"Ethay equencessay Equencesay1 andway Equencesay2 areway estructivelyday ergedmay intoway\n"
-"   away equencesay ofway ypetay Esultray-Ypetay usingway ethay Edicatepray otay orderway ethay "
-"elementsway."
+"Ethay equencessay Equencesay1 andway Equencesay2 areway estructivelyday "
+"ergedmay intoway\n"
+"   away equencesay ofway ypetay Esultray-Ypetay usingway ethay Edicatepray "
+"otay orderway ethay elementsway."
 
 #: src/code/time.lisp
 msgid ""
 "The number of internal time units that fit into a second.  See\n"
 "  Get-Internal-Real-Time and Get-Internal-Run-Time."
 msgstr ""
-"Ethay umbernay ofway internalway imetay unitsway atthay itfay intoway away econdsay.  Eesay\n"
+"Ethay umbernay ofway internalway imetay unitsway atthay itfay intoway away "
+"econdsay.  Eesay\n"
 "  Etgay-Internalway-Ealray-Imetay andway Etgay-Internalway-Unray-Imetay."
 
 #: src/code/time.lisp
@@ -15483,15 +17634,18 @@ msgid ""
 "Return the real time in the internal time format.  This is useful for\n"
 "  finding elapsed time.  See Internal-Time-Units-Per-Second."
 msgstr ""
-"Eturnray ethay ealray imetay inway ethay internalway imetay ormatfay.  Isthay isway usefulway orfay\n"
-"  indingfay elapsedway imetay.  Eesay Internalway-Imetay-Unitsway-Erpay-Econdsay."
+"Eturnray ethay ealray imetay inway ethay internalway imetay ormatfay.  "
+"Isthay isway usefulway orfay\n"
+"  indingfay elapsedway imetay.  Eesay Internalway-Imetay-Unitsway-Erpay-"
+"Econdsay."
 
 #: src/code/time.lisp
 msgid ""
 "Return the run time in the internal time format.  This is useful for\n"
 "  finding CPU usage."
 msgstr ""
-"Eturnray ethay unray imetay inway ethay internalway imetay ormatfay.  Isthay isway usefulway orfay\n"
+"Eturnray ethay unray imetay inway ethay internalway imetay ormatfay.  Isthay "
+"isway usefulway orfay\n"
 "  indingfay CPU usageway."
 
 #: src/code/time.lisp
@@ -15508,9 +17662,12 @@ msgid ""
 "   second, minute, hour, date, month, year, day of week (0 = Monday), T\n"
 "   (daylight savings times) or NIL (standard time), and timezone."
 msgstr ""
-"Eturnsray inenay aluesvay ecifyingspay ethay urrentcay imetay asway ollowsfay:\n"
-"   econdsay, inutemay, ourhay, ateday, onthmay, earyay, ayday ofway eekway (0 = Ondaymay), T\n"
-"   (aylightday avingssay imestay) orway NIL (tandardsay imetay), andway imezonetay."
+"Eturnsray inenay aluesvay ecifyingspay ethay urrentcay imetay asway "
+"ollowsfay:\n"
+"   econdsay, inutemay, ourhay, ateday, onthmay, earyay, ayday ofway eekway "
+"(0 = Ondaymay), T\n"
+"   (aylightday avingssay imestay) orway NIL (tandardsay imetay), andway "
+"imezonetay."
 
 #: src/code/time.lisp
 msgid ""
@@ -15519,56 +17676,65 @@ msgid ""
 "   Monday), T (daylight savings time) or NIL (standard time), and timezone.\n"
 "   Completely ignores daylight-savings-time when time-zone is supplied."
 msgstr ""
-"Onvertscay away universalway-imetay otay ecodedday imetay ormatfay eturningray ethay ollowingfay\n"
-"   inenay aluesvay: econdsay, inutemay, ourhay, ateday, onthmay, earyay, ayday ofway eekway (0 =\n"
-"   Ondaymay), T (aylightday avingssay imetay) orway NIL (tandardsay imetay), andway imezonetay.\n"
-"   Ompletelycay ignoresway aylightday-avingssay-imetay enwhay imetay-onezay isway uppliedsay."
+"Onvertscay away universalway-imetay otay ecodedday imetay ormatfay "
+"eturningray ethay ollowingfay\n"
+"   inenay aluesvay: econdsay, inutemay, ourhay, ateday, onthmay, earyay, "
+"ayday ofway eekway (0 =\n"
+"   Ondaymay), T (aylightday avingssay imetay) orway NIL (tandardsay imetay), "
+"andway imezonetay.\n"
+"   Ompletelycay ignoresway aylightday-avingssay-imetay enwhay imetay-onezay "
+"isway uppliedsay."
 
 #: src/code/time.lisp
 msgid ""
 "The time values specified in decoded format are converted to \n"
 "   universal time, which is returned."
 msgstr ""
-"Ethay imetay aluesvay ecifiedspay inway ecodedday ormatfay areway onvertedcay otay \n"
+"Ethay imetay aluesvay ecifiedspay inway ecodedday ormatfay areway "
+"onvertedcay otay \n"
 "   universalway imetay, ichwhay isway eturnedray."
 
 #: src/code/time.lisp
 msgid "Evaluates the Form and prints timing information on *Trace-Output*."
-msgstr "Evaluatesway ethay Ormfay andway intspray imingtay informationway onway *Trace-Output*."
+msgstr ""
+"Evaluatesway ethay Ormfay andway intspray imingtay informationway onway "
+"*Trace-Output*."
 
 #: src/code/time.lisp
 msgid ""
 "TIME form in a non-null environment, forced to interpret.~@\n"
-"	       Compiling entire form will produce more accurate times."
+"\t       Compiling entire form will produce more accurate times."
 msgstr ""
-"TIME ormfay inway away onnay-ullnay environmentway, orcedfay otay interpretway.~@\n"
-"	       Ompilingcay entireway ormfay illway oducepray oremay accurateway imestay."
+"TIME ormfay inway away onnay-ullnay environmentway, orcedfay otay "
+"interpretway.~@\n"
+"\t       Ompilingcay entireway ormfay illway oducepray oremay accurateway "
+"imestay."
 
 #: src/code/time.lisp
 msgid ""
 "Evaluation took:~%  ~\n"
-"		     ~S seconds of real time~%  ~\n"
-"		     ~S seconds of user run time~%  ~\n"
-"		     ~S seconds of system run time~%  "
+"\t\t     ~S seconds of real time~%  ~\n"
+"\t\t     ~S seconds of user run time~%  ~\n"
+"\t\t     ~S seconds of system run time~%  "
 msgstr ""
 "Evaluationway ooktay:~%  ~\n"
-"		     ~S econdssay ofway ealray imetay~%  ~\n"
-"		     ~S econdssay ofway userway unray imetay~%  ~\n"
-"		     ~S econdssay ofway ystemsay unray imetay~%  "
+"\t\t     ~S econdssay ofway ealray imetay~%  ~\n"
+"\t\t     ~S econdssay ofway userway unray imetay~%  ~\n"
+"\t\t     ~S econdssay ofway ystemsay unray imetay~%  "
 
 #: src/code/time.lisp
 msgid ""
 "~:D ~A cycle~%  ~\n"
-"		     ~@[[Run times include ~S seconds GC run time]~%  ~]"
+"\t\t     ~@[[Run times include ~S seconds GC run time]~%  ~]"
 msgid_plural ""
 "~:D ~A cycles~%  ~\n"
-"		     ~@[[Run times include ~S seconds GC run time]~%  ~]"
+"\t\t     ~@[[Run times include ~S seconds GC run time]~%  ~]"
 msgstr[0] ""
 "~:D ~Away yclecay~%  ~\n"
-"		     ~@[[Unray imestay includeway ~S econdssay GC unray imetay]~%  ~]"
+"\t\t     ~@[[Unray imestay includeway ~S econdssay GC unray imetay]~%  ~]"
 msgstr[1] ""
 "~:D ~Away yclescay~%  ~\n"
-"		     ~@[[Unray imestay includeway ~S econdssay GC unray imetay]~%  ~]"
+"\t\t     ~@[[Unray imestay includeway ~S econdssay GC unray imetay]~%  ~]"
 
 #: src/code/time.lisp
 msgid "~S page fault and~%  "
@@ -15584,7 +17750,9 @@ msgstr[1] "~:D ytesbay onsedcay.~%"
 
 #: src/code/weak.lisp
 msgid "Allocates and returns a weak pointer which points to OBJECT."
-msgstr "Allocatesway andway eturnsray away eakway ointerpay ichwhay ointspay otay OBJECT."
+msgstr ""
+"Allocatesway andway eturnsray away eakway ointerpay ichwhay ointspay otay "
+"OBJECT."
 
 #: src/code/weak.lisp
 msgid ""
@@ -15592,8 +17760,10 @@ msgid ""
 "   If the referent of WEAK-POINTER has been garbage collected, returns\n"
 "   the values NIL and NIL."
 msgstr ""
-"Ifway WEAK-POINTER isway alidvay, eturnsray ethay aluevay ofway WEAK-POINTER andway T.\n"
-"   Ifway ethay eferentray ofway WEAK-POINTER ashay eenbay arbagegay ollectedcay, eturnsray\n"
+"Ifway WEAK-POINTER isway alidvay, eturnsray ethay aluevay ofway WEAK-POINTER "
+"andway T.\n"
+"   Ifway ethay eferentray ofway WEAK-POINTER ashay eenbay arbagegay "
+"ollectedcay, eturnsray\n"
 "   ethay aluesvay NIL andway NIL."
 
 #: src/code/weak.lisp
@@ -15605,7 +17775,8 @@ msgid ""
 "Arrange for FUNCTION to be called when there are no more references to\n"
 "   OBJECT.  FUNCTION takes no arguments."
 msgstr ""
-"Arrangeway orfay FUNCTION otay ebay alledcay enwhay erethay areway onay oremay eferencesray otay\n"
+"Arrangeway orfay FUNCTION otay ebay alledcay enwhay erethay areway onay "
+"oremay eferencesray otay\n"
 "   OBJECT.  FUNCTION akestay onay argumentsway."
 
 #: src/code/final.lisp
@@ -15621,7 +17792,8 @@ msgid ""
 "If non-nil, descriptions may provide interpretations of information and\n"
 "  pointers to additional information.  Normally nil."
 msgstr ""
-"Ifway onnay-ilnay, escriptionsday aymay ovidepray interpretationsway ofway informationway andway\n"
+"Ifway onnay-ilnay, escriptionsday aymay ovidepray interpretationsway ofway "
+"informationway andway\n"
 "  ointerspay otay additionalway informationway.  Ormallynay ilnay."
 
 #: src/code/describe.lisp
@@ -15629,7 +17801,8 @@ msgid ""
 "*print-level* gets bound to this inside describe.  If null, use\n"
 "  *print-level*"
 msgstr ""
-"*print-level* etsgay oundbay otay isthay insideway escribeday.  Ifway ullnay, useway\n"
+"*print-level* etsgay oundbay otay isthay insideway escribeday.  Ifway "
+"ullnay, useway\n"
 "  *print-level*"
 
 #: src/code/describe.lisp
@@ -15637,30 +17810,40 @@ msgid ""
 "*print-length* gets bound to this inside describe.  If null, use\n"
 "  *print-length*."
 msgstr ""
-"*print-length* etsgay oundbay otay isthay insideway escribeday.  Ifway ullnay, useway\n"
+"*print-length* etsgay oundbay otay isthay insideway escribeday.  Ifway "
+"ullnay, useway\n"
 "  *print-length*."
 
 #: src/code/describe.lisp
 msgid "Number of spaces that sets off each line of a recursive description."
-msgstr "Umbernay ofway acesspay atthay etssay offway eachway inelay ofway away ecursiveray escriptionday."
+msgstr ""
+"Umbernay ofway acesspay atthay etssay offway eachway inelay ofway away "
+"ecursiveray escriptionday."
 
 #: src/code/describe.lisp
 msgid "Used to tell whether we are doing a recursive describe."
-msgstr "Usedway otay elltay etherwhay eway areway oingday away ecursiveray escribeday."
+msgstr ""
+"Usedway otay elltay etherwhay eway areway oingday away ecursiveray "
+"escribeday."
 
 #: src/code/describe.lisp
 msgid "Used to implement recursive description cutoff.  Don't touch."
-msgstr "Usedway otay implementway ecursiveray escriptionday utoffcay.  Onday't ouchtay."
+msgstr ""
+"Usedway otay implementway ecursiveray escriptionday utoffcay.  Onday't "
+"ouchtay."
 
 #: src/code/describe.lisp
 msgid "An output stream used by Describe for indenting and stuff."
-msgstr "Anway outputway eamstray usedway ybay Escribeday orfay indentingway andway tuffsay."
+msgstr ""
+"Anway outputway eamstray usedway ybay Escribeday orfay indentingway andway "
+"tuffsay."
 
 #: src/code/describe.lisp
 msgid ""
 "List of all objects describe within the current top-level call to describe."
 msgstr ""
-"Istlay ofway allway objectsway escribeday ithinway ethay urrentcay optay-evellay allcay otay escribeday."
+"Istlay ofway allway objectsway escribeday ithinway ethay urrentcay optay-"
+"evellay allcay otay escribeday."
 
 #: src/code/describe.lisp
 msgid "The last object passed to describe."
@@ -15688,7 +17871,9 @@ msgstr "~&Itsway amenay isway ~Away."
 
 #: src/code/describe.lisp
 msgid "~&It is a ~:[high (leading)~;low (trailing)~] surrogate character."
-msgstr "~&Itway isway away ~:[ighhay (eadinglay)~;owlay (ailingtray)~] urrogatesay aracterchay."
+msgstr ""
+"~&Itway isway away ~:[ighhay (eadinglay)~;owlay (ailingtray)~] urrogatesay "
+"aracterchay."
 
 #: src/code/describe.lisp
 msgid "~&~S is a ~(~A~) of type ~A."
@@ -15781,10 +17966,10 @@ msgstr "~&Itsway esultray ypetay isway:~%  ~S"
 #: src/code/describe.lisp
 msgid ""
 "~&It is currently declared ~(~A~);~\n"
-"		 ~:[no~;~] expansion is available."
+"\t\t ~:[no~;~] expansion is available."
 msgstr ""
 "~&Itway isway urrentlycay eclaredday ~(~Away~);~\n"
-"		 ~:[onay~;~] expansionway isway availableway."
+"\t\t ~:[onay~;~] expansionway isway availableway."
 
 #: src/code/describe.lisp
 msgid "~&~@(~@[~A ~]arguments:~%~)"
@@ -15844,7 +18029,8 @@ msgstr "~&~Away isway anway uninternedway ymbolsay."
 
 #: src/code/describe.lisp
 msgid "~&~@<It is an alien at #x~8,'0X of type ~3I~:_~S.~:>~%"
-msgstr "~&~@<Itway isway anway alienway atway #x~8,'0X ofway ypetay ~3Iway~:_~S.~:>~%"
+msgstr ""
+"~&~@<Itway isway anway alienway atway #x~8,'0X ofway ypetay ~3Iway~:_~S.~:>~%"
 
 #: src/code/describe.lisp
 msgid "~@<Its current value is ~3I~:_~S.~:>"
@@ -16033,17 +18219,28 @@ msgid ""
 "   the date (the default).  The print- keywords, if nil, inhibit the\n"
 "   printing of the obvious part of the time/date."
 msgstr ""
-"Ormatfay-Universalway-Imetay ormatsfay away ingstray ontainingcay ethay imetay andway ateday\n"
-"   ivengay ybay universalway-imetay inway away ommoncay annermay.  Ethay estinationday isway anyway\n"
-"   estinationday ichwhay ancay ebay acceptedway ybay ethay Ormatfay unctionfay.  Ethay\n"
-"   imezonetay eywordkay isway anway integerway ecifyingspay ourshay estway ofway Eenwichgray.\n"
-"   Ethay tylesay eywordkay ancay ebay :ortshay (umericnay ateday), :onglay (onthsmay andway\n"
-"   eekdaysway expressedway asway ordsway), :abbreviatedway (ikelay :onglay utbay ordsway\n"
-"   areway abbreviatedway), :fcray1123 (onformingcay otay RFC 1123), :overnmentgay\n"
-"   (ofway ethay ormfay \"XX Onmay XX XX:XX:XX\"), orway :isoway8601 (onformingcay otay\n"
-"   ISO 8601), ichwhay isway ethay ecommendedray ayway ofway intingpray ateday andway imetay.\n"
-"   Ethay eywordkay ateday-irstfay, ifway ilnay, illway intpray ethay imetay irstfay insteadway ofway\n"
-"   ethay ateday (ethay efaultday).  Ethay intpray- eywordskay, ifway ilnay, inhibitway ethay\n"
+"Ormatfay-Universalway-Imetay ormatsfay away ingstray ontainingcay ethay "
+"imetay andway ateday\n"
+"   ivengay ybay universalway-imetay inway away ommoncay annermay.  Ethay "
+"estinationday isway anyway\n"
+"   estinationday ichwhay ancay ebay acceptedway ybay ethay Ormatfay "
+"unctionfay.  Ethay\n"
+"   imezonetay eywordkay isway anway integerway ecifyingspay ourshay estway "
+"ofway Eenwichgray.\n"
+"   Ethay tylesay eywordkay ancay ebay :ortshay (umericnay ateday), :onglay "
+"(onthsmay andway\n"
+"   eekdaysway expressedway asway ordsway), :abbreviatedway (ikelay :onglay "
+"utbay ordsway\n"
+"   areway abbreviatedway), :fcray1123 (onformingcay otay RFC 1123), :"
+"overnmentgay\n"
+"   (ofway ethay ormfay \"XX Onmay XX XX:XX:XX\"), orway :isoway8601 "
+"(onformingcay otay\n"
+"   ISO 8601), ichwhay isway ethay ecommendedray ayway ofway intingpray "
+"ateday andway imetay.\n"
+"   Ethay eywordkay ateday-irstfay, ifway ilnay, illway intpray ethay imetay "
+"irstfay insteadway ofway\n"
+"   ethay ateday (ethay efaultday).  Ethay intpray- eywordskay, ifway ilnay, "
+"inhibitway ethay\n"
 "   intingpray ofway ethay obviousway artpay ofway ethay imetay/ateday."
 
 #: src/code/format-time.lisp
@@ -16056,7 +18253,8 @@ msgstr "~Away: Universalway-Imetay ouldshay ebay anway integerway."
 
 #: src/code/format-time.lisp
 msgid "~A: Timezone should be a rational between -24 and 24."
-msgstr "~Away: Imezonetay ouldshay ebay away ationalray etweenbay -24 andway 24."
+msgstr ""
+"~Away: Imezonetay ouldshay ebay away ationalray etweenbay -24 andway 24."
 
 #: src/code/format-time.lisp
 msgid "~A: Timezone is not a second (1/3600) multiple."
@@ -16079,15 +18277,24 @@ msgid ""
 "   keywords, if nil, inhibit the printing of certain semi-obvious\n"
 "   parts of the string."
 msgstr ""
-"Ormatfay-Ecodedday-Imetay ormatsfay away ingstray ontainingcay ecodedday-imetay\n"
-"   expressedway inway away umanlyhay-eadableray annermay.  Ethay estinationday isway anyway\n"
-"   estinationday ichwhay ancay ebay acceptedway ybay ethay Ormatfay unctionfay.  Ethay\n"
-"   imezonetay eywordkay isway anway integerway ecifyingspay ourshay estway ofway Eenwichgray.\n"
-"   Ethay tylesay eywordkay ancay ebay :ortshay (umericnay ateday), :onglay (onthsmay andway\n"
-"   eekdaysway expressedway asway ordsway), orway :abbreviatedway (ikelay :onglay utbay ordsway areway\n"
-"   abbreviatedway).  Ethay eywordkay ateday-irstfay, ifway ilnay, illway ausecay ethay imetay\n"
-"   otay ebay intedpray irstfay insteadway ofway ethay ateday (ethay efaultday).  Ethay intpray-\n"
-"   eywordskay, ifway ilnay, inhibitway ethay intingpray ofway ertaincay emisay-obviousway\n"
+"Ormatfay-Ecodedday-Imetay ormatsfay away ingstray ontainingcay ecodedday-"
+"imetay\n"
+"   expressedway inway away umanlyhay-eadableray annermay.  Ethay "
+"estinationday isway anyway\n"
+"   estinationday ichwhay ancay ebay acceptedway ybay ethay Ormatfay "
+"unctionfay.  Ethay\n"
+"   imezonetay eywordkay isway anway integerway ecifyingspay ourshay estway "
+"ofway Eenwichgray.\n"
+"   Ethay tylesay eywordkay ancay ebay :ortshay (umericnay ateday), :onglay "
+"(onthsmay andway\n"
+"   eekdaysway expressedway asway ordsway), orway :abbreviatedway (ikelay :"
+"onglay utbay ordsway areway\n"
+"   abbreviatedway).  Ethay eywordkay ateday-irstfay, ifway ilnay, illway "
+"ausecay ethay imetay\n"
+"   otay ebay intedpray irstfay insteadway ofway ethay ateday (ethay "
+"efaultday).  Ethay intpray-\n"
+"   eywordskay, ifway ilnay, inhibitway ethay intingpray ofway ertaincay "
+"emisay-obviousway\n"
 "   artspay ofway ethay ingstray."
 
 #: src/code/format-time.lisp
@@ -16116,14 +18323,16 @@ msgstr "~Away: Ourshay ouldshay ebay anway onnay-egativenay integerway."
 
 #: src/code/format-time.lisp
 msgid "~A: Timezone should be an integer between 0 and 32."
-msgstr "~Away: Imezonetay ouldshay ebay anway integerway etweenbay 0 andway 32."
+msgstr ""
+"~Away: Imezonetay ouldshay ebay anway integerway etweenbay 0 andway 32."
 
 #: src/code/parse-time.lisp
 msgid ""
 "If t, an error will be signalled if parse-time is unable\n"
 "   to determine the time/date format of the string."
 msgstr ""
-"Ifway t, anway errorway illway ebay ignalledsay ifway arsepay-imetay isway unableway\n"
+"Ifway t, anway errorway illway ebay ignalledsay ifway arsepay-imetay isway "
+"unableway\n"
 "   otay etermineday ethay imetay/ateday ormatfay ofway ethay ingstray."
 
 #: src/code/parse-time.lisp
@@ -16133,10 +18342,10 @@ msgstr "\"~Away\" isway otnay away ecognizedray ordway orway abbreviationway."
 #: src/code/parse-time.lisp
 msgid ""
 "Can't parse time/date string.~%>>> ~A~\n"
-"				   ~%~VT^-- Bogus character encountered here."
+"\t\t\t\t   ~%~VT^-- Bogus character encountered here."
 msgstr ""
 "Ancay't arsepay imetay/ateday ingstray.~%>>> ~Away~\n"
-"				   ~%~VT^-- Ogusbay aracterchay encounteredway erehay."
+"\t\t\t\t   ~%~VT^-- Ogusbay aracterchay encounteredway erehay."
 
 #: src/code/parse-time.lisp
 msgid "Unrecognized symbol: ~A"
@@ -16160,7 +18369,8 @@ msgstr "Ignoreway."
 
 #: src/code/parse-time.lisp
 msgid "Specified day (~@(~A~)) doesn't match actual day (~@(~A~))"
-msgstr "Ecifiedspay ayday (~@(~Away~)) oesnday't atchmay actualway ayday (~@(~Away~))"
+msgstr ""
+"Ecifiedspay ayday (~@(~Away~)) oesnday't atchmay actualway ayday (~@(~Away~))"
 
 #: src/code/parse-time.lisp
 msgid "Unrecognized symbol in form list: ~A."
@@ -16178,14 +18388,22 @@ msgid ""
 "   to set them to the current value.  The default-default values\n"
 "   are 00:00:00 on the current date, current time-zone."
 msgstr ""
-"Iestray eryvay ardhay otay akemay ensesay outway ofway ethay argumentway imetay-ingstray andway\n"
-"   eturnsray away inglesay integerway epresentingray ethay universalway imetay ifway\n"
-"   uccessfulsay.  Ifway otnay, itway eturnsray ilnay.  Ifway ethay :errorway-onway-ismatchmay\n"
-"   eywordkay isway uetray, arsepay-imetay illway ignalsay anway errorway insteadway ofway\n"
-"   eturningray ilnay.  Efaultday aluesvay orfay eachway artpay ofway ethay imetay/ateday\n"
-"   ancay ebay ecifiedspay ybay ethay appropriateway :efaultday- eywordkay.  Esethay\n"
-"   eywordskay ancay ebay ivengay away umericnay aluevay orway ethay eywordkay :urrentcay\n"
-"   otay etsay emthay otay ethay urrentcay aluevay.  Ethay efaultday-efaultday aluesvay\n"
+"Iestray eryvay ardhay otay akemay ensesay outway ofway ethay argumentway "
+"imetay-ingstray andway\n"
+"   eturnsray away inglesay integerway epresentingray ethay universalway "
+"imetay ifway\n"
+"   uccessfulsay.  Ifway otnay, itway eturnsray ilnay.  Ifway ethay :errorway-"
+"onway-ismatchmay\n"
+"   eywordkay isway uetray, arsepay-imetay illway ignalsay anway errorway "
+"insteadway ofway\n"
+"   eturningray ilnay.  Efaultday aluesvay orfay eachway artpay ofway ethay "
+"imetay/ateday\n"
+"   ancay ebay ecifiedspay ybay ethay appropriateway :efaultday- eywordkay.  "
+"Esethay\n"
+"   eywordskay ancay ebay ivengay away umericnay aluevay orway ethay "
+"eywordkay :urrentcay\n"
+"   otay etsay emthay otay ethay urrentcay aluevay.  Ethay efaultday-"
+"efaultday aluesvay\n"
 "   areway 00:00:00 onway ethay urrentcay ateday, urrentcay imetay-onezay."
 
 #: src/code/parse-time.lisp
@@ -16194,23 +18412,29 @@ msgstr "\"~Away\" isway otnay away ecognizedray imetay/ateday ormatfay."
 
 #: src/code/run-program.lisp
 msgid "Return any available status information on child processed. "
-msgstr "Eturnray anyway availableway tatussay informationway onway ildchay ocessedpray. "
+msgstr ""
+"Eturnray anyway availableway tatussay informationway onway ildchay "
+"ocessedpray. "
 
 #: src/code/run-program.lisp
 msgid "List of process structures for all active processes."
-msgstr "Istlay ofway ocesspray ucturesstray orfay allway activeway ocessespray."
+msgstr ""
+"Istlay ofway ocesspray ucturesstray orfay allway activeway ocessespray."
 
 #: src/code/run-program.lisp
 msgid ""
 "Return the current status of process.  The result is one of :running,\n"
 "   :stopped, :exited, :signaled."
 msgstr ""
-"Eturnray ethay urrentcay tatussay ofway ocesspray.  Ethay esultray isway oneway ofway :unningray,\n"
+"Eturnray ethay urrentcay tatussay ofway ocesspray.  Ethay esultray isway "
+"oneway ofway :unningray,\n"
 "   :toppedsay, :exitedway, :ignaledsay."
 
 #: src/code/run-program.lisp
 msgid "Wait for PROC to quit running for some reason.  Returns PROC."
-msgstr "Aitway orfay PROC otay itquay unningray orfay omesay easonray.  Eturnsray PROC."
+msgstr ""
+"Aitway orfay PROC otay itquay unningray orfay omesay easonray.  Eturnsray "
+"PROC."
 
 #: src/code/run-program.lisp
 msgid "TIOCPGRP ioctl failed: ~S"
@@ -16224,33 +18448,39 @@ msgid ""
 "currently\n"
 "   in the foreground."
 msgstr ""
-"Andhay SIGNAL otay PROC.  Ifway omwhay isway :idpay, useway ethay illkay Unixway ystemsay allcay.  Ifway\n"
-"   omwhay isway :ocesspray-oupgray, useway ethay illpgkay Unixway ystemsay allcay.  Ifway omwhay isway\n"
-"   :typay-ocesspray-oupgray eliverday ethay ignalsay otay icheverwhay ocesspray oupgray isway "
-"urrentlycay\n"
+"Andhay SIGNAL otay PROC.  Ifway omwhay isway :idpay, useway ethay illkay "
+"Unixway ystemsay allcay.  Ifway\n"
+"   omwhay isway :ocesspray-oupgray, useway ethay illpgkay Unixway ystemsay "
+"allcay.  Ifway omwhay isway\n"
+"   :typay-ocesspray-oupgray eliverday ethay ignalsay otay icheverwhay "
+"ocesspray oupgray isway urrentlycay\n"
 "   inway ethay oregroundfay."
 
 #: src/code/run-program.lisp
 msgid "Returns T if the process is still alive, NIL otherwise."
-msgstr "Eturnsray T ifway ethay ocesspray isway tillsay aliveway, NIL otherwiseway."
+msgstr ""
+"Eturnsray T ifway ethay ocesspray isway tillsay aliveway, NIL otherwiseway."
 
 #: src/code/run-program.lisp
 msgid ""
 "Close all streams connected to PROC and stop maintaining the status slot."
 msgstr ""
-"Oseclay allway eamsstray onnectedcay otay PROC andway topsay aintainingmay ethay tatussay otslay."
+"Oseclay allway eamsstray onnectedcay otay PROC andway topsay aintainingmay "
+"ethay tatussay otslay."
 
 #: src/code/run-program.lisp
 msgid ""
 "List of file descriptors to close when RUN-PROGRAM exits due to an error."
 msgstr ""
-"Istlay ofway ilefay escriptorsday otay oseclay enwhay RUN-PROGRAM exitsway ueday otay anway errorway."
+"Istlay ofway ilefay escriptorsday otay oseclay enwhay RUN-PROGRAM exitsway "
+"ueday otay anway errorway."
 
 #: src/code/run-program.lisp
 msgid ""
 "List of file descriptors to close when RUN-PROGRAM returns in the parent."
 msgstr ""
-"Istlay ofway ilefay escriptorsday otay oseclay enwhay RUN-PROGRAM eturnsray inway ethay arentpay."
+"Istlay ofway ilefay escriptorsday otay oseclay enwhay RUN-PROGRAM eturnsray "
+"inway ethay arentpay."
 
 #: src/code/run-program.lisp
 msgid "List of handlers installed by RUN-PROGRAM."
@@ -16258,7 +18488,9 @@ msgstr "Istlay ofway andlershay installedway ybay RUN-PROGRAM."
 
 #: src/code/run-program.lisp
 msgid "Returns the master fd, the slave fd, and the name of the tty"
-msgstr "Eturnsray ethay astermay dfay, ethay aveslay dfay, andway ethay amenay ofway ethay tytay"
+msgstr ""
+"Eturnsray ethay astermay dfay, ethay aveslay dfay, andway ethay amenay ofway "
+"ethay tytay"
 
 #: src/code/run-program.lisp
 msgid "Could not find a pty."
@@ -16281,37 +18513,37 @@ msgid ""
 "   The keyword arguments have the following meanings:\n"
 "     :env -\n"
 "        An A-LIST mapping keyword environment variables to simple-string\n"
-"	values.\n"
+"\tvalues.\n"
 "     :wait -\n"
 "        If non-NIL (default), wait until the created process finishes.  If\n"
 "        NIL, continue running Lisp until the program finishes.\n"
 "     :pty -\n"
-"        Either T, NIL, or a stream.  Unless NIL, the subprocess is establish"
-"ed\n"
-"	under a PTY.  If :pty is a stream, all output to this pty is sent to\n"
-"	this stream, otherwise the PROCESS-PTY slot is filled in with a stream\n"
-"	connected to pty that can read output and write input.\n"
+"        Either T, NIL, or a stream.  Unless NIL, the subprocess is "
+"established\n"
+"\tunder a PTY.  If :pty is a stream, all output to this pty is sent to\n"
+"\tthis stream, otherwise the PROCESS-PTY slot is filled in with a stream\n"
+"\tconnected to pty that can read output and write input.\n"
 "     :input -\n"
-"        Either T, NIL, a pathname, a stream, or :STREAM.  If T, the standard"
-"\n"
-"	input for the current process is inherited.  If NIL, /dev/null\n"
-"	is used.  If a pathname, the file so specified is used.  If a stream,\n"
-"	all the input is read from that stream and send to the subprocess.  If\n"
-"	:STREAM, the PROCESS-INPUT slot is filled in with a stream that sends \n"
-"	its output to the process. Defaults to NIL.\n"
+"        Either T, NIL, a pathname, a stream, or :STREAM.  If T, the "
+"standard\n"
+"\tinput for the current process is inherited.  If NIL, /dev/null\n"
+"\tis used.  If a pathname, the file so specified is used.  If a stream,\n"
+"\tall the input is read from that stream and send to the subprocess.  If\n"
+"\t:STREAM, the PROCESS-INPUT slot is filled in with a stream that sends \n"
+"\tits output to the process. Defaults to NIL.\n"
 "     :if-input-does-not-exist (when :input is the name of a file) -\n"
 "        can be one of:\n"
 "           :error - generate an error.\n"
 "           :create - create an empty file.\n"
 "           nil (default) - return nil from run-program.\n"
 "     :output -\n"
-"        Either T, NIL, a pathname, a stream, or :STREAM.  If T, the standard"
-"\n"
-"	output for the current process is inherited.  If NIL, /dev/null\n"
-"	is used.  If a pathname, the file so specified is used.  If a stream,\n"
-"	all the output from the process is written to this stream. If\n"
-"	:STREAM, the PROCESS-OUTPUT slot is filled in with a stream that can\n"
-"	be read to get the output. Defaults to NIL.\n"
+"        Either T, NIL, a pathname, a stream, or :STREAM.  If T, the "
+"standard\n"
+"\toutput for the current process is inherited.  If NIL, /dev/null\n"
+"\tis used.  If a pathname, the file so specified is used.  If a stream,\n"
+"\tall the output from the process is written to this stream. If\n"
+"\t:STREAM, the PROCESS-OUTPUT slot is filled in with a stream that can\n"
+"\tbe read to get the output. Defaults to NIL.\n"
 "     :if-output-exists (when :output is the name of a file) -\n"
 "        can be one of:\n"
 "           :error (default) - generates an error if the file already "
@@ -16322,75 +18554,103 @@ msgid ""
 "     :error and :if-error-exists - \n"
 "        Same as :output and :if-output-exists, except that :error can also "
 "be\n"
-"	specified as :output in which case all error output is routed to the\n"
-"	same place as normal output.\n"
+"\tspecified as :output in which case all error output is routed to the\n"
+"\tsame place as normal output.\n"
 "     :status-hook -\n"
 "        This is a function the system calls whenever the status of the\n"
 "        process changes.  The function takes the process as an argument.\n"
 "     :external-format -\n"
-"        This is the external-format used for communication with the subproce"
-"ss."
-msgstr ""
-"RUN-PROGRAM eatescray away ewnay ocesspray andway unsray ethay unixway ogrampray inway ethay\n"
-"   ilefay ecifiedspay ybay ethay implesay-ingstray PROGRAM.  ARGS areway ethay tandardsay\n"
-"   argumentsway atthay ancay ebay assedpay otay away Unixway ogrampray, orfay onay argumentsway\n"
-"   useway NIL (ichwhay eansmay ustjay ethay amenay ofway ethay ogrampray isway assedpay asway argway 0).\n"
-"\n"
-"   RUN-PROGRAM illway eitherway eturnray NIL orway away PROCESS ucturestray.  Eesay ethay CMU\n"
-"   Ommoncay Isplay Usersway Anualmay orfay etailsday aboutway ethay PROCESS ucturestray.\n"
+"        This is the external-format used for communication with the "
+"subprocess."
+msgstr ""
+"RUN-PROGRAM eatescray away ewnay ocesspray andway unsray ethay unixway "
+"ogrampray inway ethay\n"
+"   ilefay ecifiedspay ybay ethay implesay-ingstray PROGRAM.  ARGS areway "
+"ethay tandardsay\n"
+"   argumentsway atthay ancay ebay assedpay otay away Unixway ogrampray, "
+"orfay onay argumentsway\n"
+"   useway NIL (ichwhay eansmay ustjay ethay amenay ofway ethay ogrampray "
+"isway assedpay asway argway 0).\n"
+"\n"
+"   RUN-PROGRAM illway eitherway eturnray NIL orway away PROCESS "
+"ucturestray.  Eesay ethay CMU\n"
+"   Ommoncay Isplay Usersway Anualmay orfay etailsday aboutway ethay PROCESS "
+"ucturestray.\n"
 "\n"
 "   Ethay eywordkay argumentsway avehay ethay ollowingfay eaningsmay:\n"
 "     :envway -\n"
-"        Anway Away-LIST appingmay eywordkay environmentway ariablesvay otay implesay-ingstray\n"
-"	aluesvay.\n"
+"        Anway Away-LIST appingmay eywordkay environmentway ariablesvay otay "
+"implesay-ingstray\n"
+"\taluesvay.\n"
 "     :aitway -\n"
-"        Ifway onnay-NIL (efaultday), aitway untilway ethay eatedcray ocesspray inishesfay.  Ifway\n"
-"        NIL, ontinuecay unningray Isplay untilway ethay ogrampray inishesfay.\n"
+"        Ifway onnay-NIL (efaultday), aitway untilway ethay eatedcray "
+"ocesspray inishesfay.  Ifway\n"
+"        NIL, ontinuecay unningray Isplay untilway ethay ogrampray "
+"inishesfay.\n"
 "     :typay -\n"
-"        Eitherway T, NIL, orway away eamstray.  Unlessway NIL, ethay ubprocesssay isway establishway"
-"edway\n"
-"	underway away PTY.  Ifway :typay isway away eamstray, allway outputway otay isthay typay isway entsay otay\n"
-"	isthay eamstray, otherwiseway ethay PROCESS-PTY otslay isway illedfay inway ithway away eamstray\n"
-"	onnectedcay otay typay atthay ancay eadray outputway andway itewray inputway.\n"
+"        Eitherway T, NIL, orway away eamstray.  Unlessway NIL, ethay "
+"ubprocesssay isway establishwayedway\n"
+"\tunderway away PTY.  Ifway :typay isway away eamstray, allway outputway "
+"otay isthay typay isway entsay otay\n"
+"\tisthay eamstray, otherwiseway ethay PROCESS-PTY otslay isway illedfay "
+"inway ithway away eamstray\n"
+"\tonnectedcay otay typay atthay ancay eadray outputway andway itewray "
+"inputway.\n"
 "     :inputway -\n"
-"        Eitherway T, NIL, away athnamepay, away eamstray, orway :STREAM.  Ifway T, ethay tandardsay"
-"\n"
-"	inputway orfay ethay urrentcay ocesspray isway inheritedway.  Ifway NIL, /evday/ullnay\n"
-"	isway usedway.  Ifway away athnamepay, ethay ilefay osay ecifiedspay isway usedway.  Ifway away eamstray,\n"
-"	allway ethay inputway isway eadray omfray atthay eamstray andway endsay otay ethay ubprocesssay.  Ifway\n"
-"	:STREAM, ethay PROCESS-INPUT otslay isway illedfay inway ithway away eamstray atthay endssay \n"
-"	itsway outputway otay ethay ocesspray. Efaultsday otay NIL.\n"
-"     :ifway-inputway-oesday-otnay-existway (enwhay :inputway isway ethay amenay ofway away ilefay) -\n"
+"        Eitherway T, NIL, away athnamepay, away eamstray, orway :STREAM.  "
+"Ifway T, ethay tandardsay\n"
+"\tinputway orfay ethay urrentcay ocesspray isway inheritedway.  Ifway NIL, /"
+"evday/ullnay\n"
+"\tisway usedway.  Ifway away athnamepay, ethay ilefay osay ecifiedspay isway "
+"usedway.  Ifway away eamstray,\n"
+"\tallway ethay inputway isway eadray omfray atthay eamstray andway endsay "
+"otay ethay ubprocesssay.  Ifway\n"
+"\t:STREAM, ethay PROCESS-INPUT otslay isway illedfay inway ithway away "
+"eamstray atthay endssay \n"
+"\titsway outputway otay ethay ocesspray. Efaultsday otay NIL.\n"
+"     :ifway-inputway-oesday-otnay-existway (enwhay :inputway isway ethay "
+"amenay ofway away ilefay) -\n"
 "        ancay ebay oneway ofway:\n"
 "           :errorway - enerategay anway errorway.\n"
 "           :eatecray - eatecray anway emptyway ilefay.\n"
 "           ilnay (efaultday) - eturnray ilnay omfray unray-ogrampray.\n"
 "     :outputway -\n"
-"        Eitherway T, NIL, away athnamepay, away eamstray, orway :STREAM.  Ifway T, ethay tandardsay"
-"\n"
-"	outputway orfay ethay urrentcay ocesspray isway inheritedway.  Ifway NIL, /evday/ullnay\n"
-"	isway usedway.  Ifway away athnamepay, ethay ilefay osay ecifiedspay isway usedway.  Ifway away eamstray,\n"
-"	allway ethay outputway omfray ethay ocesspray isway ittenwray otay isthay eamstray. Ifway\n"
-"	:STREAM, ethay PROCESS-OUTPUT otslay isway illedfay inway ithway away eamstray atthay ancay\n"
-"	ebay eadray otay etgay ethay outputway. Efaultsday otay NIL.\n"
-"     :ifway-outputway-existsway (enwhay :outputway isway ethay amenay ofway away ilefay) -\n"
+"        Eitherway T, NIL, away athnamepay, away eamstray, orway :STREAM.  "
+"Ifway T, ethay tandardsay\n"
+"\toutputway orfay ethay urrentcay ocesspray isway inheritedway.  Ifway NIL, /"
+"evday/ullnay\n"
+"\tisway usedway.  Ifway away athnamepay, ethay ilefay osay ecifiedspay isway "
+"usedway.  Ifway away eamstray,\n"
+"\tallway ethay outputway omfray ethay ocesspray isway ittenwray otay isthay "
+"eamstray. Ifway\n"
+"\t:STREAM, ethay PROCESS-OUTPUT otslay isway illedfay inway ithway away "
+"eamstray atthay ancay\n"
+"\tebay eadray otay etgay ethay outputway. Efaultsday otay NIL.\n"
+"     :ifway-outputway-existsway (enwhay :outputway isway ethay amenay ofway "
+"away ilefay) -\n"
 "        ancay ebay oneway ofway:\n"
-"           :errorway (efaultday) - eneratesgay anway errorway ifway ethay ilefay alreadyway "
-"existsway.\n"
-"           :upersedesay - outputway omfray ethay ogrampray upersedessay ethay ilefay.\n"
-"           :appendway - outputway omfray ethay ogrampray isway appendedway otay ethay ilefay.\n"
-"           ilnay - unray-ogrampray eturnsray ilnay ithoutway oingday anythingway.\n"
+"           :errorway (efaultday) - eneratesgay anway errorway ifway ethay "
+"ilefay alreadyway existsway.\n"
+"           :upersedesay - outputway omfray ethay ogrampray upersedessay "
+"ethay ilefay.\n"
+"           :appendway - outputway omfray ethay ogrampray isway appendedway "
+"otay ethay ilefay.\n"
+"           ilnay - unray-ogrampray eturnsray ilnay ithoutway oingday "
+"anythingway.\n"
 "     :errorway andway :ifway-errorway-existsway - \n"
-"        Amesay asway :outputway andway :ifway-outputway-existsway, exceptway atthay :errorway ancay alsoway "
-"ebay\n"
-"	ecifiedspay asway :outputway inway ichwhay asecay allway errorway outputway isway outedray otay ethay\n"
-"	amesay aceplay asway ormalnay outputway.\n"
+"        Amesay asway :outputway andway :ifway-outputway-existsway, exceptway "
+"atthay :errorway ancay alsoway ebay\n"
+"\tecifiedspay asway :outputway inway ichwhay asecay allway errorway "
+"outputway isway outedray otay ethay\n"
+"\tamesay aceplay asway ormalnay outputway.\n"
 "     :tatussay-ookhay -\n"
-"        Isthay isway away unctionfay ethay ystemsay allscay eneverwhay ethay tatussay ofway ethay\n"
-"        ocesspray angeschay.  Ethay unctionfay akestay ethay ocesspray asway anway argumentway.\n"
+"        Isthay isway away unctionfay ethay ystemsay allscay eneverwhay ethay "
+"tatussay ofway ethay\n"
+"        ocesspray angeschay.  Ethay unctionfay akestay ethay ocesspray asway "
+"anway argumentway.\n"
 "     :externalway-ormatfay -\n"
-"        Isthay isway ethay externalway-ormatfay usedway orfay ommunicationcay ithway ethay ubprocesay"
-"ssay."
+"        Isthay isway ethay externalway-ormatfay usedway orfay "
+"ommunicationcay ithway ethay ubprocesayssay."
 
 #: src/code/run-program.lisp
 msgid "All args to program must be simple strings -- ~S."
@@ -16443,16 +18703,18 @@ msgstr "Invalidway optionway otay unray-ogrampray: ~S"
 #: src/code/loop.lisp
 msgid ""
 "If not NIL, this must be a list of two things:\n"
-"a LET-like macro, and a SETQ-like macro, which perform LOOP-style destructur"
-"ing."
+"a LET-like macro, and a SETQ-like macro, which perform LOOP-style "
+"destructuring."
 msgstr ""
 "Ifway otnay NIL, isthay ustmay ebay away istlay ofway wotay ingsthay:\n"
-"away LET-ikelay acromay, andway away SETQ-ikelay acromay, ichwhay erformpay LOOP-tylesay estructurday"
-"ingway."
+"away LET-ikelay acromay, andway away SETQ-ikelay acromay, ichwhay erformpay "
+"LOOP-tylesay estructurdayingway."
 
 #: src/code/loop.lisp
 msgid "LOOP-BODY called with non-synched before- and after-loop lists."
-msgstr "LOOP-BODY alledcay ithway onnay-ynchedsay eforebay- andway afterway-ooplay istslay."
+msgstr ""
+"LOOP-BODY alledcay ithway onnay-ynchedsay eforebay- andway afterway-ooplay "
+"istslay."
 
 #: src/code/loop.lisp
 msgid "~?~%Current LOOP context:~{ ~S~}."
@@ -16460,7 +18722,9 @@ msgstr "~?~%Urrentcay LOOP ontextcay:~{ ~S~}."
 
 #: src/code/loop.lisp
 msgid "LOOP couldn't verify that ~S is a subtype of the required type ~S."
-msgstr "LOOP ouldncay't erifyvay atthay ~S isway away ubtypesay ofway ethay equiredray ypetay ~S."
+msgstr ""
+"LOOP ouldncay't erifyvay atthay ~S isway away ubtypesay ofway ethay "
+"equiredray ypetay ~S."
 
 #: src/code/loop.lisp
 msgid "Specified data type ~S is not a subtype of ~S."
@@ -16473,10 +18737,14 @@ msgid ""
 "UNTIL -- the epilogue code (if any) will be run, and any implicitly\n"
 "collected result will be returned as the value of the LOOP."
 msgstr ""
-"Ausescay ethay iterationway otay erminatetay \"ormallynay\", ethay amesay asway implicitway\n"
-"erminationtay ybay anway iterationway ivingdray auseclay, orway ybay useway ofway WHILE orway\n"
-"UNTIL -- ethay epilogueway odecay (ifway anyway) illway ebay unray, andway anyway implicitlyway\n"
-"ollectedcay esultray illway ebay eturnedray asway ethay aluevay ofway ethay LOOP."
+"Ausescay ethay iterationway otay erminatetay \"ormallynay\", ethay amesay "
+"asway implicitway\n"
+"erminationtay ybay anway iterationway ivingdray auseclay, orway ybay useway "
+"ofway WHILE orway\n"
+"UNTIL -- ethay epilogueway odecay (ifway anyway) illway ebay unray, andway "
+"anyway implicitlyway\n"
+"ollectedcay esultray illway ebay eturnedray asway ethay aluevay ofway ethay "
+"LOOP."
 
 #: src/code/loop.lisp
 msgid "~S found where LOOP keyword expected."
@@ -16484,7 +18752,9 @@ msgstr "~S oundfay erewhay LOOP eywordkay expectedway."
 
 #: src/code/loop.lisp
 msgid "Secondary clause misplaced at top level in LOOP macro: ~S ~S ~S ..."
-msgstr "Econdarysay auseclay isplacedmay atway optay evellay inway LOOP acromay: ~S ~S ~S ..."
+msgstr ""
+"Econdarysay auseclay isplacedmay atway optay evellay inway LOOP acromay: ~S "
+"~S ~S ..."
 
 #: src/code/loop.lisp
 msgid "~S is an unknown keyword in LOOP macro."
@@ -16492,7 +18762,9 @@ msgstr "~S isway anway unknownway eywordkay inway LOOP acromay."
 
 #: src/code/loop.lisp
 msgid "LOOP source code ran out when another token was expected."
-msgstr "LOOP ourcesay odecay anray outway enwhay anotherway okentay asway expectedway."
+msgstr ""
+"LOOP ourcesay odecay anray outway enwhay anotherway okentay asway "
+"expectedway."
 
 #: src/code/loop.lisp
 msgid "Compound form expected, but found ~A."
@@ -16505,50 +18777,58 @@ msgstr "LOOP odecay anray outway erewhay away ormfay asway expectedway."
 #: src/code/loop.lisp
 msgid ""
 "LOOP clause is providing a value for the iteration,~@\n"
-"	        however one was already established by a ~S clause."
+"\t        however one was already established by a ~S clause."
 msgstr ""
 "LOOP auseclay isway ovidingpray away aluevay orfay ethay iterationway,~@\n"
-"	        oweverhay oneway asway alreadyway establishedway ybay away ~S auseclay."
+"\t        oweverhay oneway asway alreadyway establishedway ybay away ~S "
+"auseclay."
 
 #: src/code/loop.lisp
 msgid ""
-"~:[This LOOP~;The LOOP ~:*~S~] clause is not permitted inside a "
-"conditional."
+"~:[This LOOP~;The LOOP ~:*~S~] clause is not permitted inside a conditional."
 msgstr ""
-"~:[Isthay LOOP~;Ethay LOOP ~:*~S~] auseclay isway otnay ermittedpay insideway away "
-"onditionalcay."
+"~:[Isthay LOOP~;Ethay LOOP ~:*~S~] auseclay isway otnay ermittedpay "
+"insideway away onditionalcay."
 
 #: src/code/loop.lisp
 msgid "This LOOP clause is not permitted with anonymous collectors."
-msgstr "Isthay LOOP auseclay isway otnay ermittedpay ithway anonymousway ollectorscay."
+msgstr ""
+"Isthay LOOP auseclay isway otnay ermittedpay ithway anonymousway "
+"ollectorscay."
 
 #: src/code/loop.lisp
 msgid ""
 "This anonymous collection LOOP clause is not permitted with aggregate "
 "booleans."
 msgstr ""
-"Isthay anonymousway ollectioncay LOOP auseclay isway otnay ermittedpay ithway aggregateway "
-"ooleansbay."
+"Isthay anonymousway ollectioncay LOOP auseclay isway otnay ermittedpay "
+"ithway aggregateway ooleansbay."
 
 #: src/code/loop.lisp
 msgid ""
 "~S found where a LOOP keyword, LOOP type keyword, or LOOP type pattern "
 "expected."
 msgstr ""
-"~S oundfay erewhay away LOOP eywordkay, LOOP ypetay eywordkay, orway LOOP ypetay atternpay "
-"expectedway."
+"~S oundfay erewhay away LOOP eywordkay, LOOP ypetay eywordkay, orway LOOP "
+"ypetay atternpay expectedway."
 
 #: src/code/loop.lisp
 msgid "~S found where a LOOP keyword or LOOP type keyword expected."
-msgstr "~S oundfay erewhay away LOOP eywordkay orway LOOP ypetay eywordkay expectedway."
+msgstr ""
+"~S oundfay erewhay away LOOP eywordkay orway LOOP ypetay eywordkay "
+"expectedway."
 
 #: src/code/loop.lisp
 msgid "Destructuring type pattern ~S contains unrecognized type keyword ~S."
-msgstr "Estructuringday ypetay atternpay ~S ontainscay unrecognizedway ypetay eywordkay ~S."
+msgstr ""
+"Estructuringday ypetay atternpay ~S ontainscay unrecognizedway ypetay "
+"eywordkay ~S."
 
 #: src/code/loop.lisp
 msgid "Destructuring type pattern ~S doesn't match variable pattern ~S."
-msgstr "Estructuringday ypetay atternpay ~S oesnday't atchmay ariablevay atternpay ~S."
+msgstr ""
+"Estructuringday ypetay atternpay ~S oesnday't atchmay ariablevay atternpay "
+"~S."
 
 #: src/code/loop.lisp
 msgid "Duplicated LOOP iteration variable ~S."
@@ -16572,11 +18852,13 @@ msgstr "Invalidway LOOP ariablevay assedpay inway: ~S."
 
 #: src/code/loop.lisp
 msgid "~S found where keyword expected getting LOOP clause after ~S."
-msgstr "~S oundfay erewhay eywordkay expectedway ettinggay LOOP auseclay afterway ~S."
+msgstr ""
+"~S oundfay erewhay eywordkay expectedway ettinggay LOOP auseclay afterway ~S."
 
 #: src/code/loop.lisp
 msgid "~S does not introduce a LOOP clause that can follow ~S."
-msgstr "~S oesday otnay introduceway away LOOP auseclay atthay ancay ollowfay ~S."
+msgstr ""
+"~S oesday otnay introduceway away LOOP auseclay atthay ancay ollowfay ~S."
 
 #: src/code/loop.lisp
 msgid "~S is an invalid name for your LOOP."
@@ -16588,11 +18870,14 @@ msgstr "Ethay NAMED ~S auseclay occursway ootay atelay."
 
 #: src/code/loop.lisp
 msgid "You may only use one NAMED clause in your loop: NAMED ~S ... NAMED ~S."
-msgstr "Ouyay aymay onlyway useway oneway NAMED auseclay inway ouryay ooplay: NAMED ~S ... NAMED ~S."
+msgstr ""
+"Ouyay aymay onlyway useway oneway NAMED auseclay inway ouryay ooplay: NAMED "
+"~S ... NAMED ~S."
 
 #: src/code/loop.lisp
 msgid "Value accumulation recipient name, ~S, is not a symbol."
-msgstr "Aluevay accumulationway ecipientray amenay, ~S, isway otnay away ymbolsay."
+msgstr ""
+"Aluevay accumulationway ecipientray amenay, ~S, isway otnay away ymbolsay."
 
 #: src/code/loop.lisp
 msgid "Variable ~S cannot be used in INTO clause"
@@ -16601,18 +18886,21 @@ msgstr "Ariablevay ~S annotcay ebay usedway inway INTO auseclay"
 #: src/code/loop.lisp
 msgid ""
 "Incompatible kinds of LOOP value accumulation specified for collecting~@\n"
-"		    ~:[as the value of the LOOP~;~:*INTO ~S~]: ~S and ~S."
+"\t\t    ~:[as the value of the LOOP~;~:*INTO ~S~]: ~S and ~S."
 msgstr ""
-"Incompatibleway indskay ofway LOOP aluevay accumulationway ecifiedspay orfay ollectingcay~@\n"
-"		    ~:[asway ethay aluevay ofway ethay LOOP~;~:into*ay ~S~]: ~S andway ~S."
+"Incompatibleway indskay ofway LOOP aluevay accumulationway ecifiedspay orfay "
+"ollectingcay~@\n"
+"\t\t    ~:[asway ethay aluevay ofway ethay LOOP~;~:into*ay ~S~]: ~S andway "
+"~S."
 
 #: src/code/loop.lisp
 msgid ""
 "Unequal datatypes specified in different LOOP value accumulations~@\n"
-"		   into ~S: ~S and ~S."
+"\t\t   into ~S: ~S and ~S."
 msgstr ""
-"Unequalway atatypesday ecifiedspay inway ifferentday LOOP aluevay accumulationsway~@\n"
-"		   intoway ~S: ~S andway ~S."
+"Unequalway atatypesday ecifiedspay inway ifferentday LOOP aluevay "
+"accumulationsway~@\n"
+"\t\t   intoway ~S: ~S andway ~S."
 
 #: src/code/loop.lisp
 msgid "Iteration in LOOP follows body code."
@@ -16620,31 +18908,42 @@ msgstr "Iterationway inway LOOP ollowsfay odybay odecay."
 
 #: src/code/loop.lisp
 msgid "~S is an unknown keyword in FOR or AS clause in LOOP."
-msgstr "~S isway anway unknownway eywordkay inway FOR orway AS auseclay inway LOOP."
+msgstr ""
+"~S isway anway unknownway eywordkay inway FOR orway AS auseclay inway LOOP."
 
 #: src/code/loop.lisp
 msgid "Use of QUOTE around stepping function in LOOP will be left verbatim."
-msgstr "Useway ofway QUOTE aroundway teppingsay unctionfay inway LOOP illway ebay eftlay erbatimvay."
+msgstr ""
+"Useway ofway QUOTE aroundway teppingsay unctionfay inway LOOP illway ebay "
+"eftlay erbatimvay."
 
 #: src/code/loop.lisp
 msgid "~S found where ITS or EACH expected in LOOP iteration path syntax."
-msgstr "~S oundfay erewhay ITS orway EACH expectedway inway LOOP iterationway athpay yntaxsay."
+msgstr ""
+"~S oundfay erewhay ITS orway EACH expectedway inway LOOP iterationway athpay "
+"yntaxsay."
 
 #: src/code/loop.lisp
 msgid "Unrecognizable LOOP iteration path syntax.  Missing EACH or THE?"
-msgstr "Unrecognizableway LOOP iterationway athpay yntaxsay.  Issingmay EACH orway THE?"
+msgstr ""
+"Unrecognizableway LOOP iterationway athpay yntaxsay.  Issingmay EACH orway "
+"THE?"
 
 #: src/code/loop.lisp
 msgid "~S found where a LOOP iteration path name was expected."
-msgstr "~S oundfay erewhay away LOOP iterationway athpay amenay asway expectedway."
+msgstr ""
+"~S oundfay erewhay away LOOP iterationway athpay amenay asway expectedway."
 
 #: src/code/loop.lisp
 msgid "~S is not the name of a LOOP iteration path."
 msgstr "~S isway otnay ethay amenay ofway away LOOP iterationway athpay."
 
 #: src/code/loop.lisp
-msgid "\"Inclusive\" iteration is not possible with the ~S LOOP iteration path."
-msgstr "\"Inclusiveway\" iterationway isway otnay ossiblepay ithway ethay ~S LOOP iterationway athpay."
+msgid ""
+"\"Inclusive\" iteration is not possible with the ~S LOOP iteration path."
+msgstr ""
+"\"Inclusiveway\" iterationway isway otnay ossiblepay ithway ethay ~S LOOP "
+"iterationway athpay."
 
 #: src/code/loop.lisp
 msgid "Unused USING variables: ~S."
@@ -16655,34 +18954,39 @@ msgid ""
 "Value passed back by LOOP iteration path function for path ~S has invalid "
 "length."
 msgstr ""
-"Aluevay assedpay ackbay ybay LOOP iterationway athpay unctionfay orfay athpay ~S ashay invalidway "
-"engthlay."
+"Aluevay assedpay ackbay ybay LOOP iterationway athpay unctionfay orfay "
+"athpay ~S ashay invalidway engthlay."
 
 #: src/code/loop.lisp
 msgid "A ~S prepositional phrase occurs multiply for some LOOP clause."
-msgstr "Away ~S epositionalpray rasephay occursway ultiplymay orfay omesay LOOP auseclay."
+msgstr ""
+"Away ~S epositionalpray rasephay occursway ultiplymay orfay omesay LOOP "
+"auseclay."
 
 #: src/code/loop.lisp
 msgid "Preposition ~S used when some other preposition has subsumed it."
-msgstr "Epositionpray ~S usedway enwhay omesay otherway epositionpray ashay ubsumedsay itway."
+msgstr ""
+"Epositionpray ~S usedway enwhay omesay otherway epositionpray ashay "
+"ubsumedsay itway."
 
 #: src/code/loop.lisp
 msgid ""
 "The variable substitution for ~S occurs twice in a USING phrase,~@\n"
-"		        with ~S and ~S."
+"\t\t        with ~S and ~S."
 msgstr ""
-"Ethay ariablevay ubstitutionsay orfay ~S occursway wicetay inway away USING rasephay,~@\n"
-"		        ithway ~S andway ~S."
+"Ethay ariablevay ubstitutionsay orfay ~S occursway wicetay inway away USING "
+"rasephay,~@\n"
+"\t\t        ithway ~S andway ~S."
 
 #: src/code/loop.lisp
 msgid ""
 "~S invalid preposition in sequencing or sequence path.~@\n"
-"	       Invalid prepositions specified in iteration path descriptor or "
+"\t       Invalid prepositions specified in iteration path descriptor or "
 "something?"
 msgstr ""
 "~S invalidway epositionpray inway equencingsay orway equencesay athpay.~@\n"
-"	       Invalidway epositionspray ecifiedspay inway iterationway athpay escriptorday orway "
-"omethingsay?"
+"\t       Invalidway epositionspray ecifiedspay inway iterationway athpay "
+"escriptorday orway omethingsay?"
 
 #: src/code/loop.lisp
 msgid "Conflicting stepping directions in LOOP sequencing path"
@@ -16710,11 +19014,14 @@ msgstr "Unknownway epositionpray ~S"
 
 #: src/code/loop.lisp
 msgid "Destructuring is not valid for package symbol iteration."
-msgstr "Estructuringday isway otnay alidvay orfay ackagepay ymbolsay iterationway."
+msgstr ""
+"Estructuringday isway otnay alidvay orfay ackagepay ymbolsay iterationway."
 
 #: src/code/stream-vector-io.lisp
 msgid "endian-swap ~a is illegal for element-type of vector ~a"
-msgstr "endianway-wapsay ~away isway illegalway orfay elementway-ypetay ofway ectorvay ~away"
+msgstr ""
+"endianway-wapsay ~away isway illegalway orfay elementway-ypetay ofway "
+"ectorvay ~away"
 
 #: src/code/stream-vector-io.lisp
 msgid ""
@@ -16723,14 +19030,18 @@ msgid ""
 "  the vector element.  The keyword argument :Endian-Swap specifies any\n"
 "  endian swapping to be done. "
 msgstr ""
-"Eadray omfray Eamstray intoway Ectorvay.  Ethay Tartsay andway Endway indicesway ofway Ectorvay\n"
-"  isway inway octetsway, andway ustmay ebay anway ultiplemay ofway ethay octetsway erpay elementway ofway\n"
-"  ethay ectorvay elementway.  Ethay eywordkay argumentway :Endianway-Wapsay ecifiesspay anyway\n"
+"Eadray omfray Eamstray intoway Ectorvay.  Ethay Tartsay andway Endway "
+"indicesway ofway Ectorvay\n"
+"  isway inway octetsway, andway ustmay ebay anway ultiplemay ofway ethay "
+"octetsway erpay elementway ofway\n"
+"  ethay ectorvay elementway.  Ethay eywordkay argumentway :Endianway-Wapsay "
+"ecifiesspay anyway\n"
 "  endianway wappingsay otay ebay oneday. "
 
 #: src/code/stream-vector-io.lisp
 msgid "Wrong vector type ~a for read-vector on stream ~a."
-msgstr "Ongwray ectorvay ypetay ~away orfay eadray-ectorvay onway eamstray ~away."
+msgstr ""
+"Ongwray ectorvay ypetay ~away orfay eadray-ectorvay onway eamstray ~away."
 
 #: src/code/stream-vector-io.lisp
 msgid ""
@@ -16739,9 +19050,12 @@ msgid ""
 "  vector element.  The keyword argument :Endian-Swap specifies any\n"
 "  endian swapping to be done. "
 msgstr ""
-"Itewray Ectorvay otay Eamstray.  Ethay Tartsay andway Endway indicesway ofway Ectorvay isway inway\n"
-"  octetsway, andway ustmay ebay anway ultiplemay ofway ethay octetsway erpay elementway ofway ethay\n"
-"  ectorvay elementway.  Ethay eywordkay argumentway :Endianway-Wapsay ecifiesspay anyway\n"
+"Itewray Ectorvay otay Eamstray.  Ethay Tartsay andway Endway indicesway "
+"ofway Ectorvay isway inway\n"
+"  octetsway, andway ustmay ebay anway ultiplemay ofway ethay octetsway erpay "
+"elementway ofway ethay\n"
+"  ectorvay elementway.  Ethay eywordkay argumentway :Endianway-Wapsay "
+"ecifiesspay anyway\n"
 "  endianway wappingsay otay ebay oneday. "
 
 #: src/code/foreign.lisp
@@ -16750,26 +19064,33 @@ msgstr "Ouldcay otnay eatecray emporarytay ilefay ~S: ~Away"
 
 #: src/code/foreign.lisp
 msgid "Make sure the header starts with the ELF magic value."
-msgstr "Akemay uresay ethay eaderhay tartssay ithway ethay ELF agicmay aluevay."
+msgstr ""
+"Akemay uresay ethay eaderhay tartssay ithway ethay ELF agicmay aluevay."
 
 #: src/code/foreign.lisp
 msgid "Return the `osabi' field in the padding of the ELF file."
-msgstr "Eturnray ethay `osabiway' ieldfay inway ethay addingpay ofway ethay ELF ilefay."
+msgstr ""
+"Eturnray ethay `osabiway' ieldfay inway ethay addingpay ofway ethay ELF "
+"ilefay."
 
 #: src/code/foreign.lisp
 msgid "Given a file type number, determine whether the file is executable."
-msgstr "Ivengay away ilefay ypetay umbernay, etermineday etherwhay ethay ilefay isway executableway."
+msgstr ""
+"Ivengay away ilefay ypetay umbernay, etermineday etherwhay ethay ilefay "
+"isway executableway."
 
 #: src/code/foreign.lisp
 msgid "Make sure the header starts with the mach-o magic value."
-msgstr "Akemay uresay ethay eaderhay tartssay ithway ethay achmay-o agicmay aluevay."
+msgstr ""
+"Akemay uresay ethay eaderhay tartssay ithway ethay achmay-o agicmay aluevay."
 
 #: src/code/foreign.lisp
 msgid ""
 "Parse symbol table file created by load-foreign script.  Modified\n"
 "to skip undefined symbols which don't have an address."
 msgstr ""
-"Arsepay ymbolsay abletay ilefay eatedcray ybay oadlay-oreignfay riptscay.  Odifiedmay\n"
+"Arsepay ymbolsay abletay ilefay eatedcray ybay oadlay-oreignfay riptscay.  "
+"Odifiedmay\n"
 "otay kipsay undefinedway ymbolssay ichwhay onday't avehay anway addressway."
 
 #: src/code/foreign.lisp
@@ -16788,19 +19109,24 @@ msgid ""
 "of\n"
 "  the linker.  The default is the environment passed to Lisp."
 msgstr ""
-"Oadlay-oreignfay oadslay away istlay ofway C objectway ilesfay intoway away unningray Isplay.  Ethay ilesfay\n"
-"  argumentway ouldshay ebay away inglesay ilefay orway away istlay ofway ilesfay.  Ethay ilesfay aymay ebay\n"
-"  ecifiedspay asway amestringsnay orway asway athnamespay.  Ethay ibrarieslay argumentway ouldshay "
-"ebay away\n"
-"  istlay ofway ibrarylay ilesfay asway ouldway ebay ecifiedspay otay dlay.  Eythay illway ebay earchedsay "
-"inway\n"
-"  ethay orderway ivengay.  Ethay efaultday isway ustjay \"-clay\", i.e., ethay C ibrarylay.  Ethay\n"
-"  asebay-ilefay argumentway isway usedway otay ecifyspay away ilefay otay useway asway ethay tartingsay aceplay "
-"orfay\n"
-"  efinedday ymbolssay.  Ethay efaultday isway ethay C tartsay upway odecay orfay Isplay.  Ethay envway\n"
-"  argumentway isway ethay Unixway environmentway ariablevay efinitionsday orfay ethay invocationway "
-"ofway\n"
-"  ethay inkerlay.  Ethay efaultday isway ethay environmentway assedpay otay Isplay."
+"Oadlay-oreignfay oadslay away istlay ofway C objectway ilesfay intoway away "
+"unningray Isplay.  Ethay ilesfay\n"
+"  argumentway ouldshay ebay away inglesay ilefay orway away istlay ofway "
+"ilesfay.  Ethay ilesfay aymay ebay\n"
+"  ecifiedspay asway amestringsnay orway asway athnamespay.  Ethay "
+"ibrarieslay argumentway ouldshay ebay away\n"
+"  istlay ofway ibrarylay ilesfay asway ouldway ebay ecifiedspay otay dlay.  "
+"Eythay illway ebay earchedsay inway\n"
+"  ethay orderway ivengay.  Ethay efaultday isway ustjay \"-clay\", i.e., "
+"ethay C ibrarylay.  Ethay\n"
+"  asebay-ilefay argumentway isway usedway otay ecifyspay away ilefay otay "
+"useway asway ethay tartingsay aceplay orfay\n"
+"  efinedday ymbolssay.  Ethay efaultday isway ethay C tartsay upway odecay "
+"orfay Isplay.  Ethay envway\n"
+"  argumentway isway ethay Unixway environmentway ariablevay efinitionsday "
+"orfay ethay invocationway ofway\n"
+"  ethay inkerlay.  Ethay efaultday isway ethay environmentway assedpay otay "
+"Isplay."
 
 #: src/code/foreign.lisp
 msgid "Lazy function call binding"
@@ -16819,8 +19145,10 @@ msgid ""
 "If set the symbols of the loaded object and its dependencies are\n"
 "   made visible as if the object were linked directly into the program"
 msgstr ""
-"Ifway etsay ethay ymbolssay ofway ethay oadedlay objectway andway itsway ependenciesday areway\n"
-"   ademay isiblevay asway ifway ethay objectway ereway inkedlay irectlyday intoway ethay ogrampray"
+"Ifway etsay ethay ymbolssay ofway ethay oadedlay objectway andway itsway "
+"ependenciesday areway\n"
+"   ademay isiblevay asway ifway ethay objectway ereway inkedlay irectlyday "
+"intoway ethay ogrampray"
 
 #: src/code/foreign.lisp
 msgid ""
@@ -16835,15 +19163,24 @@ msgid ""
 "definitions for the invocation of the linker. The default is the\n"
 "environment passed to Lisp."
 msgstr ""
-"Oadlay C objectway ilesfay intoway ethay unningray Isplay. Ethay FILES argumentway\n"
-"ouldshay ebay away inglesay ilefay orway away istlay ofway ilesfay. Ethay ilesfay aymay ebay ecifiedspay\n"
-"asway amestringsnay orway asway athnamespay. Ethay LIBRARIES argumentway ouldshay ebay away\n"
-"istlay ofway ibrarylay ilesfay asway ouldway ebay ecifiedspay otay dlay. Eythay illway ebay\n"
-"earchedsay inway ethay orderway ivengay. Ethay efaultday isway ustjay \"-clay\", i.e., ethay C\n"
-"ibrarylay. Ethay BASE-FILE argumentway isway usedway otay ecifyspay away ilefay otay useway asway\n"
-"ethay tartingsay aceplay orfay efinedday ymbolssay. Ethay efaultday isway ethay C tartsay upway\n"
-"odecay orfay Isplay. Ethay ENV argumentway isway ethay Unixway environmentway ariablevay\n"
-"efinitionsday orfay ethay invocationway ofway ethay inkerlay. Ethay efaultday isway ethay\n"
+"Oadlay C objectway ilesfay intoway ethay unningray Isplay. Ethay FILES "
+"argumentway\n"
+"ouldshay ebay away inglesay ilefay orway away istlay ofway ilesfay. Ethay "
+"ilesfay aymay ebay ecifiedspay\n"
+"asway amestringsnay orway asway athnamespay. Ethay LIBRARIES argumentway "
+"ouldshay ebay away\n"
+"istlay ofway ibrarylay ilesfay asway ouldway ebay ecifiedspay otay dlay. "
+"Eythay illway ebay\n"
+"earchedsay inway ethay orderway ivengay. Ethay efaultday isway ustjay \"-clay"
+"\", i.e., ethay C\n"
+"ibrarylay. Ethay BASE-FILE argumentway isway usedway otay ecifyspay away "
+"ilefay otay useway asway\n"
+"ethay tartingsay aceplay orfay efinedday ymbolssay. Ethay efaultday isway "
+"ethay C tartsay upway\n"
+"odecay orfay Isplay. Ethay ENV argumentway isway ethay Unixway "
+"environmentway ariablevay\n"
+"efinitionsday orfay ethay invocationway ofway ethay inkerlay. Ethay "
+"efaultday isway ethay\n"
 "environmentway assedpay otay Isplay."
 
 #: src/code/foreign.lisp
@@ -16916,7 +19253,8 @@ msgstr "Alistway ofway ocketsay indskay andway otocolpray aluesvay."
 
 #: src/code/internet.lisp
 msgid "Internet protocol :DATA-GRAM is deprecated. Using :DATAGRAM"
-msgstr "Internetway otocolpray :DATA-GRAM isway eprecatedday. Usingway :DATAGRAM"
+msgstr ""
+"Internetway otocolpray :DATA-GRAM isway eprecatedday. Usingway :DATAGRAM"
 
 #: src/code/internet.lisp
 msgid "Invalid kind (~S) for internet domain sockets."
@@ -16927,7 +19265,8 @@ msgid ""
 "Return a host-entry for the given host. The host may be an address\n"
 "  string or an IP address in host order."
 msgstr ""
-"Eturnray away osthay-entryway orfay ethay ivengay osthay. Ethay osthay aymay ebay anway addressway\n"
+"Eturnray away osthay-entryway orfay ethay ivengay osthay. Ethay osthay aymay "
+"ebay anway addressway\n"
 "  ingstray orway anway IP addressway inway osthay orderway."
 
 #: src/code/internet.lisp
@@ -16964,7 +19303,9 @@ msgstr "Unknownway osthay: ~S."
 
 #: src/code/internet.lisp
 msgid "The host may be an address string or an IP address in host order."
-msgstr "Ethay osthay aymay ebay anway addressway ingstray orway anway IP addressway inway osthay orderway."
+msgstr ""
+"Ethay osthay aymay ebay anway addressway ingstray orway anway IP addressway "
+"inway osthay orderway."
 
 #: src/code/internet.lisp
 msgid "Error connecting socket to [~A:~A]: ~A"
@@ -16988,7 +19329,8 @@ msgstr "Errorway osingclay ocketsay: ~Away"
 
 #: src/code/internet.lisp
 msgid "Return the peer host address and port in host order."
-msgstr "Eturnray ethay eerpay osthay addressway andway ortpay inway osthay orderway."
+msgstr ""
+"Eturnray ethay eerpay osthay addressway andway ortpay inway osthay orderway."
 
 #: src/code/internet.lisp
 msgid "Error ~s getting peer host and port on FD ~d."
@@ -17012,11 +19354,14 @@ msgstr "Onay oobway andlerhay efinedday orfay ~S onway ~Away"
 
 #: src/code/internet.lisp
 msgid "Got a SIGURG, but couldn't find any out-of-band data."
-msgstr "Otgay away SIGURG, utbay ouldncay't indfay anyway outway-ofway-andbay ataday."
+msgstr ""
+"Otgay away SIGURG, utbay ouldncay't indfay anyway outway-ofway-andbay ataday."
 
 #: src/code/internet.lisp
 msgid "Arrange to funcall HANDLER when CHAR shows up out-of-band on FD."
-msgstr "Arrangeway otay uncallfay HANDLER enwhay CHAR owsshay upway outway-ofway-andbay onway FD."
+msgstr ""
+"Arrangeway otay uncallfay HANDLER enwhay CHAR owsshay upway outway-ofway-"
+"andbay onway FD."
 
 #: src/code/internet.lisp
 msgid "Remove any handlers for CHAR on FD."
@@ -17036,21 +19381,25 @@ msgid ""
 "bytecount, source address as integer, and source port.  bytecount\n"
 "can of course be negative, to indicate faults."
 msgstr ""
-"Away ackagingpay ofway ethay unixway ecvfromray allcay.  Eturnsray reethay aluesvay:\n"
-"ytecountbay, ourcesay addressway asway integerway, andway ourcesay ortpay.  ytecountbay\n"
+"Away ackagingpay ofway ethay unixway ecvfromray allcay.  Eturnsray reethay "
+"aluesvay:\n"
+"ytecountbay, ourcesay addressway asway integerway, andway ourcesay ortpay.  "
+"ytecountbay\n"
 "ancay ofway oursecay ebay egativenay, otay indicateway aultsfay."
 
 #: src/code/internet.lisp
 msgid "A packaging of the unix sendto call.  Return value like sendto"
-msgstr "Away ackagingpay ofway ethay unixway endtosay allcay.  Eturnray aluevay ikelay endtosay"
+msgstr ""
+"Away ackagingpay ofway ethay unixway endtosay allcay.  Eturnray aluevay "
+"ikelay endtosay"
 
 #: src/code/internet.lisp
 msgid ""
 "A packaging of the unix shutdown call.  An error is signaled if shutdown "
 "fails."
 msgstr ""
-"Away ackagingpay ofway ethay unixway utdownshay allcay.  Anway errorway isway ignaledsay ifway utdownshay "
-"ailsfay."
+"Away ackagingpay ofway ethay unixway utdownshay allcay.  Anway errorway "
+"isway ignaledsay ifway utdownshay ailsfay."
 
 #: src/code/internet.lisp
 msgid "Error on shutdown of socket: ~A"
@@ -17061,7 +19410,8 @@ msgid ""
 "Return a network stream.  HOST may be an address string or an integer\n"
 "IP address."
 msgstr ""
-"Eturnray away etworknay eamstray.  HOST aymay ebay anway addressway ingstray orway anway integerway\n"
+"Eturnray away etworknay eamstray.  HOST aymay ebay anway addressway ingstray "
+"orway anway integerway\n"
 "IP addressway."
 
 #: src/code/internet.lisp
@@ -17078,7 +19428,9 @@ msgstr "etworknay onnectioncay omfray ~D.~D.~D.~D:~D"
 
 #: src/code/wire.lisp
 msgid "The wire the form we are currently evaluating came across."
-msgstr "Ethay ireway ethay ormfay eway areway urrentlycay evaluatingway amecay acrossway."
+msgstr ""
+"Ethay ireway ethay ormfay eway areway urrentlycay evaluatingway amecay "
+"acrossway."
 
 #: src/code/wire.lisp
 msgid "Unique identifier for this host."
@@ -17090,11 +19442,15 @@ msgstr "Uniqueway identifierway orfay isthay ocesspray."
 
 #: src/code/wire.lisp
 msgid "Hash table mapping local objects to the corresponding remote id."
-msgstr "Ashhay abletay appingmay ocallay objectsway otay ethay orrespondingcay emoteray idway."
+msgstr ""
+"Ashhay abletay appingmay ocallay objectsway otay ethay orrespondingcay "
+"emoteray idway."
 
 #: src/code/wire.lisp
 msgid "Hash table mapping remote id's to the curresponding local object."
-msgstr "Ashhay abletay appingmay emoteray idway's otay ethay urrespondingcay ocallay objectway."
+msgstr ""
+"Ashhay abletay appingmay emoteray idway's otay ethay urrespondingcay ocallay "
+"objectway."
 
 #: src/code/wire.lisp
 msgid "Next available id for remote objects."
@@ -17114,14 +19470,17 @@ msgstr "Errorway ~Away ~Away: ~Away."
 
 #: src/code/wire.lisp
 msgid "Returns T iff the given remote object is defined locally."
-msgstr "Eturnsray T iffway ethay ivengay emoteray objectway isway efinedday ocallylay."
+msgstr ""
+"Eturnsray T iffway ethay ivengay emoteray objectway isway efinedday "
+"ocallylay."
 
 #: src/code/wire.lisp
 msgid ""
 "Returns T iff the two objects refer to the same (eq) object in the same\n"
 "  process."
 msgstr ""
-"Eturnsray T iffway ethay wotay objectsway eferray otay ethay amesay (eqway) objectway inway ethay amesay\n"
+"Eturnsray T iffway ethay wotay objectsway eferray otay ethay amesay (eqway) "
+"objectway inway ethay amesay\n"
 "  ocesspray."
 
 #: src/code/wire.lisp
@@ -17130,9 +19489,12 @@ msgid ""
 "  the remote object was not created in this process or if\n"
 "  FORGET-REMOTE-TRANSLATION has been called on this remote object."
 msgstr ""
-"Eturnray ethay associatedway aluevay orfay ethay ivengay emoteray objectway. Itway isway anway errorway ifway\n"
-"  ethay emoteray objectway asway otnay eatedcray inway isthay ocesspray orway ifway\n"
-"  FORGET-REMOTE-TRANSLATION ashay eenbay alledcay onway isthay emoteray objectway."
+"Eturnray ethay associatedway aluevay orfay ethay ivengay emoteray objectway. "
+"Itway isway anway errorway ifway\n"
+"  ethay emoteray objectway asway otnay eatedcray inway isthay ocesspray "
+"orway ifway\n"
+"  FORGET-REMOTE-TRANSLATION ashay eenbay alledcay onway isthay emoteray "
+"objectway."
 
 #: src/code/wire.lisp
 msgid "~S is defined is a different process."
@@ -17144,11 +19506,14 @@ msgstr "Useway ethay aluevay ofway NIL"
 
 #: src/code/wire.lisp
 msgid "No value for ~S -- FORGET-REMOTE-TRANSLATION was called to early."
-msgstr "Onay aluevay orfay ~S -- FORGET-REMOTE-TRANSLATION asway alledcay otay earlyway."
+msgstr ""
+"Onay aluevay orfay ~S -- FORGET-REMOTE-TRANSLATION asway alledcay otay "
+"earlyway."
 
 #: src/code/wire.lisp
 msgid "Convert the given local object to a remote object."
-msgstr "Onvertcay ethay ivengay ocallay objectway otay away emoteray objectway."
+msgstr ""
+"Onvertcay ethay ivengay ocallay objectway otay away emoteray objectway."
 
 #: src/code/wire.lisp
 msgid ""
@@ -17156,15 +19521,17 @@ msgid ""
 "object. Passing that remote object to remote-object-value will new return "
 "NIL."
 msgstr ""
-"Orgetfay ethay anslationtray omfray ethay ivengay ocallay otay ethay orrespondingcay emoteray\n"
-"objectway. Assingpay atthay emoteray objectway otay emoteray-objectway-aluevay illway ewnay eturnray "
-"NIL."
+"Orgetfay ethay anslationtray omfray ethay ivengay ocallay otay ethay "
+"orrespondingcay emoteray\n"
+"objectway. Assingpay atthay emoteray objectway otay emoteray-objectway-"
+"aluevay illway ewnay eturnray NIL."
 
 #: src/code/wire.lisp
 msgid ""
 "Return T iff anything is in the input buffer or available on the socket."
 msgstr ""
-"Eturnray T iffway anythingway isway inway ethay inputway ufferbay orway availableway onway ethay ocketsay."
+"Eturnray T iffway anythingway isway inway ethay inputway ufferbay orway "
+"availableway onway ethay ocketsay."
 
 #: src/code/wire.lisp
 msgid "listening to"
@@ -17177,9 +19544,12 @@ msgid ""
 "least one byte in the input buffer. If EOF was reached, as wire-eof error\n"
 "is signaled."
 msgstr ""
-"Eadray ataday offway ethay ocketsay, illingfay ethay inputway ufferbay. Ethay ufferbay isway earedclay\n"
-"irstfay. Ifway illfay-inputway-ufferbay eturnsray, itway isway uarenteedgay atthay erethay illway ebay atway\n"
-"eastlay oneway ytebay inway ethay inputway ufferbay. Ifway EOF asway eachedray, asway ireway-eofway errorway\n"
+"Eadray ataday offway ethay ocketsay, illingfay ethay inputway ufferbay. "
+"Ethay ufferbay isway earedclay\n"
+"irstfay. Ifway illfay-inputway-ufferbay eturnsray, itway isway uarenteedgay "
+"atthay erethay illway ebay atway\n"
+"eastlay oneway ytebay inway ethay inputway ufferbay. Ifway EOF asway "
+"eachedray, asway ireway-eofway errorway\n"
 "isway ignaledsay."
 
 #: src/code/wire.lisp
@@ -17193,13 +19563,14 @@ msgstr "Eturnray ethay extnay ytebay omfray ethay ireway."
 #: src/code/wire.lisp
 msgid ""
 "Read a number off the wire. Numbers are 4 bytes in network order.\n"
-"The optional argument controls weather or not the number should be considere"
-"d\n"
+"The optional argument controls weather or not the number should be "
+"considered\n"
 "signed (defaults to T)."
 msgstr ""
-"Eadray away umbernay offway ethay ireway. Umbersnay areway 4 ytesbay inway etworknay orderway.\n"
-"Ethay optionalway argumentway ontrolscay eatherway orway otnay ethay umbernay ouldshay ebay onsiderecay"
-"d\n"
+"Eadray away umbernay offway ethay ireway. Umbersnay areway 4 ytesbay inway "
+"etworknay orderway.\n"
+"Ethay optionalway argumentway ontrolscay eatherway orway otnay ethay "
+"umbernay ouldshay ebay onsiderecayd\n"
 "ignedsay (efaultsday otay T)."
 
 #: src/code/wire.lisp
@@ -17207,24 +19578,29 @@ msgid ""
 "Reads an arbitrary integer sent by WIRE-OUTPUT-BIGNUM from the wire and\n"
 "   return it."
 msgstr ""
-"Eadsray anway arbitraryway integerway entsay ybay WIRE-OUTPUT-BIGNUM omfray ethay ireway andway\n"
+"Eadsray anway arbitraryway integerway entsay ybay WIRE-OUTPUT-BIGNUM omfray "
+"ethay ireway andway\n"
 "   eturnray itway."
 
 #: src/code/wire.lisp
 msgid "Reads a string from the wire. The first four bytes spec the size."
-msgstr "Eadsray away ingstray omfray ethay ireway. Ethay irstfay ourfay ytesbay ecspay ethay izesay."
+msgstr ""
+"Eadsray away ingstray omfray ethay ireway. Ethay irstfay ourfay ytesbay "
+"ecspay ethay izesay."
 
 #: src/code/wire.lisp
 msgid "Reads the next object from the wire and returns it."
-msgstr "Eadsray ethay extnay objectway omfray ethay ireway andway eturnsray itway."
+msgstr ""
+"Eadsray ethay extnay objectway omfray ethay ireway andway eturnsray itway."
 
 #: src/code/wire.lisp
 msgid ""
 "Attempt to read symbol, ~A, of wire into non-existent ~\n"
-"		       package, ~A."
+"\t\t       package, ~A."
 msgstr ""
-"Attemptway otay eadray ymbolsay, ~Away, ofway ireway intoway onnay-existentway ~\n"
-"		       ackagepay, ~Away."
+"Attemptway otay eadray ymbolsay, ~Away, ofway ireway intoway onnay-"
+"existentway ~\n"
+"\t\t       ackagepay, ~Away."
 
 #: src/code/wire.lisp
 msgid ""
@@ -17232,9 +19608,10 @@ msgid ""
 "Nothing\n"
 "harmfull will happen if called when the output buffer is empty."
 msgstr ""
-"Endsay anyway infoway tillsay inway ethay outputway ufferbay ownday ethay ireway andway earclay itway. "
-"Othingnay\n"
-"armfullhay illway appenhay ifway alledcay enwhay ethay outputway ufferbay isway emptyway."
+"Endsay anyway infoway tillsay inway ethay outputway ufferbay ownday ethay "
+"ireway andway earclay itway. Othingnay\n"
+"armfullhay illway appenhay ifway alledcay enwhay ethay outputway ufferbay "
+"isway emptyway."
 
 #: src/code/wire.lisp
 msgid "writing"
@@ -17256,14 +19633,16 @@ msgstr "Outputway ethay ivengay (32-itbay) umbernay onway ethay ireway."
 msgid ""
 "Outputs an arbitrary integer, but less effeciently than WIRE-OUTPUT-NUMBER."
 msgstr ""
-"Outputsway anway arbitraryway integerway, utbay esslay effecientlyway anthay WIRE-OUTPUT-NUMBER."
+"Outputsway anway arbitraryway integerway, utbay esslay effecientlyway anthay "
+"WIRE-OUTPUT-NUMBER."
 
 #: src/code/wire.lisp
 msgid ""
 "Output the given string. First output the length using WIRE-OUTPUT-NUMBER,\n"
 "then output the bytes."
 msgstr ""
-"Outputway ethay ivengay ingstray. Irstfay outputway ethay engthlay usingway WIRE-OUTPUT-NUMBER,\n"
+"Outputway ethay ivengay ingstray. Irstfay outputway ethay engthlay usingway "
+"WIRE-OUTPUT-NUMBER,\n"
 "enthay outputway ethay ytesbay."
 
 #: src/code/wire.lisp
@@ -17271,16 +19650,21 @@ msgid ""
 "Output the given object on the given wire. If cache-it is T, enter this\n"
 "object in the cache for future reference."
 msgstr ""
-"Outputway ethay ivengay objectway onway ethay ivengay ireway. Ifway achecay-itway isway T, enterway isthay\n"
+"Outputway ethay ivengay objectway onway ethay ivengay ireway. Ifway achecay-"
+"itway isway T, enterway isthay\n"
 "objectway inway ethay achecay orfay uturefay eferenceray."
 
 #: src/code/wire.lisp
 msgid "Error: Cannot output objects of type ~s across a wire."
-msgstr "Errorway: Annotcay outputway objectsway ofway ypetay ~s acrossway away ireway."
+msgstr ""
+"Errorway: Annotcay outputway objectsway ofway ypetay ~s acrossway away "
+"ireway."
 
 #: src/code/wire.lisp
 msgid "Send the function and args down the wire as a funcall."
-msgstr "Endsay ethay unctionfay andway argsway ownday ethay ireway asway away uncallfay."
+msgstr ""
+"Endsay ethay unctionfay andway argsway ownday ethay ireway asway away "
+"uncallfay."
 
 #: src/code/remote.lisp
 msgid "AList of wire . remote-wait structs"
@@ -17291,7 +19675,8 @@ msgid ""
 "Evaluates the given forms remotly. No values are returned, as the remote\n"
 "evaluation is asyncronus."
 msgstr ""
-"Evaluatesway ethay ivengay ormsfay emotlyray. Onay aluesvay areway eturnedray, asway ethay emoteray\n"
+"Evaluatesway ethay ivengay ormsfay emotlyray. Onay aluesvay areway "
+"eturnedray, asway ethay emoteray\n"
 "evaluationway isway asyncronusway."
 
 #: src/code/remote.lisp
@@ -17300,8 +19685,10 @@ msgid ""
 "forms in BODY are only executed if the remote function returned (as apposed\n"
 "to aborting due to a throw)."
 msgstr ""
-"Indbay VARS otay ethay ultiplemay aluesvay ofway FORM (ichwhay isway executedway emotelyray). Ethay\n"
-"ormsfay inway BODY areway onlyway executedway ifway ethay emoteray unctionfay eturnedray (asway apposedway\n"
+"Indbay VARS otay ethay ultiplemay aluesvay ofway FORM (ichwhay isway "
+"executedway emotelyray). Ethay\n"
+"ormsfay inway BODY areway onlyway executedway ifway ethay emoteray "
+"unctionfay eturnedray (asway apposedway\n"
 "otay abortingway ueday otay away rowthay)."
 
 #: src/code/remote.lisp
@@ -17311,9 +19698,10 @@ msgid ""
 "unwinds\n"
 "  instead of returning."
 msgstr ""
-"Executeway ethay inglesay ormfay emotlyray. Ethay aluevay ofway ethay ormfay isway eturnedray.\n"
-"  Ethay optionalway ormfay onway-erversay-unwindway isway onlyway evaluatedway ifway ethay erversay "
-"unwindsway\n"
+"Executeway ethay inglesay ormfay emotlyray. Ethay aluevay ofway ethay ormfay "
+"isway eturnedray.\n"
+"  Ethay optionalway ormfay onway-erversay-unwindway isway onlyway "
+"evaluatedway ifway ethay erversay unwindsway\n"
 "  insteadway ofway eturningray."
 
 #: src/code/remote.lisp
@@ -17326,24 +19714,28 @@ msgid ""
 "that\n"
 "   DESTROY-REQUEST-SERVER accepts to kill the request server."
 msgstr ""
-"Eatecray away equestray erversay onway ethay ivengay ortpay.  Eneverwhay anyoneway onnectscay otay itway,\n"
-"   allcay ethay ivengay unctionfay ithway ethay ewlynay eatedcray ireway andway ethay addressway ofway "
-"ethay\n"
-"   onnectorcay.  Ifway ethay unctionfay eturnsray NIL, ethay onnectioncay isway estroyedday;\n"
-"   otherwiseway, itway isway acceptedway.  Isthay eturnsray away anifestationmay ofway ethay erversay "
-"atthay\n"
+"Eatecray away equestray erversay onway ethay ivengay ortpay.  Eneverwhay "
+"anyoneway onnectscay otay itway,\n"
+"   allcay ethay ivengay unctionfay ithway ethay ewlynay eatedcray ireway "
+"andway ethay addressway ofway ethay\n"
+"   onnectorcay.  Ifway ethay unctionfay eturnsray NIL, ethay onnectioncay "
+"isway estroyedday;\n"
+"   otherwiseway, itway isway acceptedway.  Isthay eturnsray away "
+"anifestationmay ofway ethay erversay atthay\n"
 "   DESTROY-REQUEST-SERVER acceptsway otay illkay ethay equestray erversay."
 
 #: src/code/remote.lisp
 msgid "Quit accepting connections to the given request server."
-msgstr "Itquay acceptingway onnectionscay otay ethay ivengay equestray erversay."
+msgstr ""
+"Itquay acceptingway onnectionscay otay ethay ivengay equestray erversay."
 
 #: src/code/remote.lisp
 msgid ""
 "Connect to a remote request server addressed with the given host and port\n"
 "   pair.  This returns the created wire."
 msgstr ""
-"Onnectcay otay away emoteray equestray erversay addressedway ithway ethay ivengay osthay andway ortpay\n"
+"Onnectcay otay away emoteray equestray erversay addressedway ithway ethay "
+"ivengay osthay andway ortpay\n"
 "   airpay.  Isthay eturnsray ethay eatedcray ireway."
 
 #: src/code/defstruct.lisp
@@ -17351,8 +19743,10 @@ msgid ""
 "Controls compiling DEFSTRUCT :print-function and :print-method\n"
 "   options according to ANSI spec. MUST be NIL to compile CMUCL & PCL"
 msgstr ""
-"Ontrolscay ompilingcay DEFSTRUCT :intpray-unctionfay andway :intpray-ethodmay\n"
-"   optionsway accordingway otay ANSI ecspay. MUST ebay NIL otay ompilecay CMUCL & PCL"
+"Ontrolscay ompilingcay DEFSTRUCT :intpray-unctionfay andway :intpray-"
+"ethodmay\n"
+"   optionsway accordingway otay ANSI ecspay. MUST ebay NIL otay ompilecay "
+"CMUCL & PCL"
 
 #: src/code/defstruct.lisp
 msgid "Allocate a new instance with LENGTH data slots."
@@ -17364,7 +19758,9 @@ msgstr "Ivengay anway instanceway, eturnray itsway engthlay."
 
 #: src/code/defstruct.lisp
 msgid "Return the value from the INDEXth slot of INSTANCE.  This is SETFable."
-msgstr "Eturnray ethay aluevay omfray ethay Indexthway otslay ofway INSTANCE.  Isthay isway Etfablesay."
+msgstr ""
+"Eturnray ethay aluevay omfray ethay Indexthway otslay ofway INSTANCE.  "
+"Isthay isway Etfablesay."
 
 #: src/code/defstruct.lisp
 msgid "Set the INDEXth slot of INSTANCE to NEW-VALUE."
@@ -17384,8 +19780,8 @@ msgid ""
 "   Define the structure type Name.  Instances are created by MAKE-<name>, "
 "which\n"
 "   takes keyword arguments allowing initial slot values to the specified.\n"
-"   A SETF'able function <name>-<slot> is defined for each slot to read&write"
-"\n"
+"   A SETF'able function <name>-<slot> is defined for each slot to "
+"read&write\n"
 "   slot values.  <name>-p is a type predicate.\n"
 "\n"
 "   Popular DEFSTRUCT options (see manual for others):\n"
@@ -17395,8 +19791,8 @@ msgid ""
 "       Specify an alternate name for the constructor or predicate.\n"
 "\n"
 "   (:CONSTRUCTOR Name Lambda-List)\n"
-"       Explicitly specify the name and arguments to create a BOA constructor"
-"\n"
+"       Explicitly specify the name and arguments to create a BOA "
+"constructor\n"
 "       (which is more efficient when keyword syntax isn't necessary.)\n"
 "\n"
 "   (:INCLUDE Supertype Slot-Spec*)\n"
@@ -17412,37 +19808,43 @@ msgid ""
 "   :READ-ONLY {T | NIL}\n"
 "       If true, no setter function is defined for this slot."
 msgstr ""
-"DEFSTRUCT {Amenay | (Amenay Option*Way)} {Otslay | (Otslay [Efaultday] {Eykay Aluevay}*)}\n"
-"   Efineday ethay ucturestray ypetay Amenay.  Instancesway areway eatedcray ybay MAKE-<amenay>, "
-"ichwhay\n"
-"   akestay eywordkay argumentsway allowingway initialway otslay aluesvay otay ethay ecifiedspay.\n"
-"   Away SETF'ableway unctionfay <amenay>-<otslay> isway efinedday orfay eachway otslay otay eadray&itewray"
-"\n"
+"DEFSTRUCT {Amenay | (Amenay Option*Way)} {Otslay | (Otslay [Efaultday] "
+"{Eykay Aluevay}*)}\n"
+"   Efineday ethay ucturestray ypetay Amenay.  Instancesway areway eatedcray "
+"ybay MAKE-<amenay>, ichwhay\n"
+"   akestay eywordkay argumentsway allowingway initialway otslay aluesvay "
+"otay ethay ecifiedspay.\n"
+"   Away SETF'ableway unctionfay <amenay>-<otslay> isway efinedday orfay "
+"eachway otslay otay eadray&itewray\n"
 "   otslay aluesvay.  <amenay>-p isway away ypetay edicatepray.\n"
 "\n"
 "   Opularpay DEFSTRUCT optionsway (eesay anualmay orfay othersway):\n"
 "\n"
 "   (:CONSTRUCTOR Amenay)\n"
 "   (:PREDICATE Amenay)\n"
-"       Ecifyspay anway alternateway amenay orfay ethay onstructorcay orway edicatepray.\n"
+"       Ecifyspay anway alternateway amenay orfay ethay onstructorcay orway "
+"edicatepray.\n"
 "\n"
 "   (:CONSTRUCTOR Amenay Ambdalay-Istlay)\n"
-"       Explicitlyway ecifyspay ethay amenay andway argumentsway otay eatecray away BOA onstructorcay"
-"\n"
-"       (ichwhay isway oremay efficientway enwhay eywordkay yntaxsay isnway't ecessarynay.)\n"
+"       Explicitlyway ecifyspay ethay amenay andway argumentsway otay "
+"eatecray away BOA onstructorcay\n"
+"       (ichwhay isway oremay efficientway enwhay eywordkay yntaxsay isnway't "
+"ecessarynay.)\n"
 "\n"
 "   (:INCLUDE Upertypesay Otslay-Ec*Spay)\n"
-"       Akemay isthay ypetay away ubtypesay ofway ethay ucturestray ypetay Upertypesay.  Ethay "
-"optionalway\n"
+"       Akemay isthay ypetay away ubtypesay ofway ethay ucturestray ypetay "
+"Upertypesay.  Ethay optionalway\n"
 "       Otslay-Ecsspay overrideway inheritedway otslay optionsway.\n"
 "\n"
 "   Otslay optionsway:\n"
 "\n"
 "   :TYPE Ypetay-Ecspay\n"
-"       Assertsway atthay ethay aluevay ofway isthay otslay isway alwaysway ofway ethay ecifiedspay ypetay.\n"
+"       Assertsway atthay ethay aluevay ofway isthay otslay isway alwaysway "
+"ofway ethay ecifiedspay ypetay.\n"
 "\n"
 "   :READ-ONLY {T | NIL}\n"
-"       Ifway uetray, onay ettersay unctionfay isway efinedday orfay isthay otslay."
+"       Ifway uetray, onay ettersay unctionfay isway efinedday orfay isthay "
+"otslay."
 
 #: src/code/defstruct.lisp
 msgid "defining structure ~A"
@@ -17499,10 +19901,10 @@ msgstr "Otslay ~S ustmay ebay eadray-onlyway inway ubtypesay ~S."
 #: src/code/defstruct.lisp
 msgid ""
 "Keyword slot name indicates probable syntax ~\n"
-"		      error in DEFSTRUCT -- ~S."
+"\t\t      error in DEFSTRUCT -- ~S."
 msgstr ""
 "Eywordkay otslay amenay indicatesway obablepray yntaxsay ~\n"
-"		      errorway inway DEFSTRUCT -- ~S."
+"\t\t      errorway inway DEFSTRUCT -- ~S."
 
 #: src/code/defstruct.lisp
 msgid ":TYPE option mismatch between structures ~S and ~S."
@@ -17523,7 +19925,8 @@ msgid ""
 "                        instead).~:@>"
 msgstr ""
 "~@<Onnay-overwrittenway accessorway ~S oesday otnay accessway ~\n"
-"                        otslay ithway amenay ~S (accessingway anway inheritedway otslay ~\n"
+"                        otslay ithway amenay ~S (accessingway anway "
+"inheritedway otslay ~\n"
 "                        insteadway).~:@>"
 
 #: src/code/defstruct.lisp
@@ -17547,34 +19950,42 @@ msgid "Structure for copier is not a ~S:~% ~S"
 msgstr "Ucturestray orfay opiercay isway otnay away ~S:~% ~S"
 
 #: src/code/defstruct.lisp
-msgid "Shouldn't happen!  Some strange thing in LAYOUT-INFO:~\n"
-"		    ~%  ~S"
-msgstr "Ouldnshay't appenhay!  Omesay angestray ingthay inway LAYOUT-INFO:~\n"
-"		    ~%  ~S"
+msgid ""
+"Shouldn't happen!  Some strange thing in LAYOUT-INFO:~\n"
+"\t\t    ~%  ~S"
+msgstr ""
+"Ouldnshay't appenhay!  Omesay angestray ingthay inway LAYOUT-INFO:~\n"
+"\t\t    ~%  ~S"
 
 #: src/code/defstruct.lisp
 msgid ""
 "Incompatibly redefining slots of structure class ~S~@\n"
-"	  Make sure any uses of affected accessors are recompiled:~@\n"
-"	  ~@[  These slots were moved to new positions:~%    ~S~%~]~\n"
-"	  ~@[  These slots have new incompatible types:~%    ~S~%~]~\n"
-"	  ~@[  These slots were deleted:~%    ~S~%~]"
+"\t  Make sure any uses of affected accessors are recompiled:~@\n"
+"\t  ~@[  These slots were moved to new positions:~%    ~S~%~]~\n"
+"\t  ~@[  These slots have new incompatible types:~%    ~S~%~]~\n"
+"\t  ~@[  These slots were deleted:~%    ~S~%~]"
 msgstr ""
 "Incompatiblyway edefiningray otsslay ofway ucturestray assclay ~S~@\n"
-"	  Akemay uresay anyway usesway ofway affectedway accessorsway areway ecompiledray:~@\n"
-"	  ~@[  Esethay otsslay ereway ovedmay otay ewnay ositionspay:~%    ~S~%~]~\n"
-"	  ~@[  Esethay otsslay avehay ewnay incompatibleway ypestay:~%    ~S~%~]~\n"
-"	  ~@[  Esethay otsslay ereway eletedday:~%    ~S~%~]"
+"\t  Akemay uresay anyway usesway ofway affectedway accessorsway areway "
+"ecompiledray:~@\n"
+"\t  ~@[  Esethay otsslay ereway ovedmay otay ewnay ositionspay:~%    ~S~%~]"
+"~\n"
+"\t  ~@[  Esethay otsslay avehay ewnay incompatibleway ypestay:~%    ~S~%~]~\n"
+"\t  ~@[  Esethay otsslay ereway eletedday:~%    ~S~%~]"
 
 #: src/code/defstruct.lisp
-msgid "Redefining class ~S incompatibly with the current ~\n"
-"		definition."
-msgstr "Edefiningray assclay ~S incompatiblyway ithway ethay urrentcay ~\n"
-"		efinitionday."
+msgid ""
+"Redefining class ~S incompatibly with the current ~\n"
+"\t\tdefinition."
+msgstr ""
+"Edefiningray assclay ~S incompatiblyway ithway ethay urrentcay ~\n"
+"\t\tefinitionday."
 
 #: src/code/defstruct.lisp
 msgid "Invalidate already loaded code and instances, use new definition."
-msgstr "Invalidateway alreadyway oadedlay odecay andway instancesway, useway ewnay efinitionday."
+msgstr ""
+"Invalidateway alreadyway oadedlay odecay andway instancesway, useway ewnay "
+"efinitionday."
 
 #: src/code/defstruct.lisp
 msgid "Previously loaded ~S accessors will no longer work."
@@ -17583,10 +19994,10 @@ msgstr "Eviouslypray oadedlay ~S accessorsway illway onay ongerlay orkway."
 #: src/code/defstruct.lisp
 msgid ""
 "Any old ~S instances will be in a bad way.~@\n"
-"	       I hope you know what you're doing..."
+"\t       I hope you know what you're doing..."
 msgstr ""
 "Anyway oldway ~S instancesway illway ebay inway away adbay ayway.~@\n"
-"	       Iway opehay ouyay nowkay atwhay ouyay'eray oingday..."
+"\t       Iway opehay ouyay nowkay atwhay ouyay'eray oingday..."
 
 #: src/code/defstruct.lisp
 msgid "Removing old subclasses of ~S:~%  ~S"
@@ -17594,7 +20005,9 @@ msgstr "Emovingray oldway ubclassessay ofway ~S:~%  ~S"
 
 #: src/code/defstruct.lisp
 msgid "Return a copy of Structure with the same (EQL) slot values."
-msgstr "Eturnray away opycay ofway Ucturestray ithway ethay amesay (EQL) otslay aluesvay."
+msgstr ""
+"Eturnray away opycay ofway Ucturestray ithway ethay amesay (EQL) otslay "
+"aluesvay."
 
 #: src/code/defstruct.lisp
 msgid "Copying an obsolete structure:~%  ~S"
@@ -17606,11 +20019,15 @@ msgstr "Ucturesstray ofway ypetay ~S annotcay ebay umpedday asway onstantscay."
 
 #: src/code/defmacro.lisp
 msgid "A list of tests that do argument counting at expansion time."
-msgstr "Away istlay ofway eststay atthay oday argumentway ountingcay atway expansionway imetay."
+msgstr ""
+"Away istlay ofway eststay atthay oday argumentway ountingcay atway "
+"expansionway imetay."
 
 #: src/code/defmacro.lisp
 msgid "Let bindings that are done to make lambda-list parsing possible."
-msgstr "Etlay indingsbay atthay areway oneday otay akemay ambdalay-istlay arsingpay ossiblepay."
+msgstr ""
+"Etlay indingsbay atthay areway oneday otay akemay ambdalay-istlay arsingpay "
+"ossiblepay."
 
 #: src/code/defmacro.lisp
 msgid "Let bindings that the user has explicitly supplied."
@@ -17618,7 +20035,9 @@ msgstr "Etlay indingsbay atthay ethay userway ashay explicitlyway uppliedsay."
 
 #: src/code/defmacro.lisp
 msgid "Unsupplied optional and keyword arguments get this value defaultly."
-msgstr "Unsuppliedway optionalway andway eywordkay argumentsway etgay isthay aluevay efaultlyday."
+msgstr ""
+"Unsuppliedway optionalway andway eywordkay argumentsway etgay isthay aluevay "
+"efaultlyday."
 
 #: src/code/defmacro.lisp
 msgid ""
@@ -17626,8 +20045,10 @@ msgid ""
 "   should be made where this body is inserted, and a doc-string if there is\n"
 "   one."
 msgstr ""
-"Eturnsray asway ultiplemay-aluesvay away arsedpay odybay, anyway ocallay-eclarationsday atthay\n"
-"   ouldshay ebay ademay erewhay isthay odybay isway insertedway, andway away ocday-ingstray ifway erethay isway\n"
+"Eturnsray asway ultiplemay-aluesvay away arsedpay odybay, anyway ocallay-"
+"eclarationsday atthay\n"
+"   ouldshay ebay ademay erewhay isthay odybay isway insertedway, andway away "
+"ocday-ingstray ifway erethay isway\n"
 "   oneway."
 
 #: src/code/defmacro.lisp
@@ -17640,7 +20061,8 @@ msgstr "&environmentway otnay alidvay ithway ~S."
 
 #: src/code/defmacro.lisp
 msgid "&environment only valid at top level of lambda-list."
-msgstr "&environmentway onlyway alidvay atway optay evellay ofway ambdalay-istlay."
+msgstr ""
+"&environmentway onlyway alidvay atway optay evellay ofway ambdalay-istlay."
 
 #: src/code/defmacro.lisp
 msgid "Invalid ~a"
@@ -17653,10 +20075,10 @@ msgstr "Ignoreway extraway oisenay."
 #: src/code/defmacro.lisp
 msgid ""
 "More than variable, initform, and suppliedp ~\n"
-"			    in &optional binding - ~S"
+"\t\t\t    in &optional binding - ~S"
 msgstr ""
 "Oremay anthay ariablevay, initformway, andway uppliedpsay ~\n"
-"			    inway &optionalway indingbay - ~S"
+"\t\t\t    inway &optionalway indingbay - ~S"
 
 #: src/code/defmacro.lisp
 msgid "Non-symbol in lambda-list - ~S."
@@ -17670,11 +20092,13 @@ msgstr "Illegalway optionalway ariablevay amenay: ~S"
 msgid ""
 "Takes a non-keyword symbol, symbol, and returns the corresponding keyword."
 msgstr ""
-"Akestay away onnay-eywordkay ymbolsay, ymbolsay, andway eturnsray ethay orrespondingcay eywordkay."
+"Akestay away onnay-eywordkay ymbolsay, ymbolsay, andway eturnsray ethay "
+"orrespondingcay eywordkay."
 
 #: src/code/defmacro.lisp
 msgid "Illegal or ill-formed ~A argument in ~A~@[ ~S~]."
-msgstr "Illegalway orway illway-ormedfay ~Away argumentway inway ~Away~@[ ~S~]."
+msgstr ""
+"Illegalway orway illway-ormedfay ~Away argumentway inway ~Away~@[ ~S~]."
 
 #: src/code/defmacro.lisp
 msgid "Error while parsing arguments to ~A in ~S:~%"
@@ -17691,10 +20115,10 @@ msgstr "Ogusbay ublistsay:~%  ~S~%otay atisfysay ambdalay-istlay:~%  ~:S~%"
 #: src/code/defmacro.lisp
 msgid ""
 "Invalid number of elements in:~%  ~:S~%~\n"
-"	     to satisfy lambda-list:~%  ~:S~%"
+"\t     to satisfy lambda-list:~%  ~:S~%"
 msgstr ""
 "Invalidway umbernay ofway elementsway inway:~%  ~:S~%~\n"
-"	     otay atisfysay ambdalay-istlay:~%  ~:S~%"
+"\t     otay atisfysay ambdalay-istlay:~%  ~:S~%"
 
 #: src/code/defmacro.lisp
 msgid "Expected at least ~D"
@@ -17713,9 +20137,11 @@ msgid ", but got ~D."
 msgstr ", utbay otgay ~D."
 
 #: src/compiler/globaldb.lisp
-msgid "Define-Info-Class Class\n"
+msgid ""
+"Define-Info-Class Class\n"
 "  Define a new class of global information."
-msgstr "Efineday-Infoway-Assclay Assclay\n"
+msgstr ""
+"Efineday-Infoway-Assclay Assclay\n"
 "  Efineday away ewnay assclay ofway obalglay informationway."
 
 #: src/compiler/globaldb.lisp
@@ -17734,16 +20160,18 @@ msgid ""
 "  value of Info will also be true."
 msgstr ""
 "Efineday-Infoway-Ypetay Assclay Ypetay efaultday Ypetay-Ecspay\n"
-"  Efineday away ewnay ypetay ofway obalglay informationway orfay Assclay.  Ypetay isway ethay ymbolsay "
-"amenay\n"
-"  ofway ethay ypetay, Efaultday isway ethay aluevay orfay atthay ypetay enwhay itway asnhay't eenbay etsay, "
-"andway\n"
-"  Ypetay-Ecspay isway away ypetay-ecifierspay ichwhay aluesvay ofway ethay ypetay ustmay atisfysay.  Ethay\n"
-"  efaultday expressionway isway evaluatedway eachway imetay ethay informationway isway eedednay, ithway\n"
-"  Amenay oundbay otay ethay amenay orfay ichwhay ethay informationway isway eingbay ookedlay upway.  Ifway "
-"ethay\n"
-"  efaultday evaluatesway otay omethingsay ithway ethay econdsay aluevay uetray, enthay ethay "
-"econdsay\n"
+"  Efineday away ewnay ypetay ofway obalglay informationway orfay Assclay.  "
+"Ypetay isway ethay ymbolsay amenay\n"
+"  ofway ethay ypetay, Efaultday isway ethay aluevay orfay atthay ypetay "
+"enwhay itway asnhay't eenbay etsay, andway\n"
+"  Ypetay-Ecspay isway away ypetay-ecifierspay ichwhay aluesvay ofway ethay "
+"ypetay ustmay atisfysay.  Ethay\n"
+"  efaultday expressionway isway evaluatedway eachway imetay ethay "
+"informationway isway eedednay, ithway\n"
+"  Amenay oundbay otay ethay amenay orfay ichwhay ethay informationway isway "
+"eingbay ookedlay upway.  Ifway ethay\n"
+"  efaultday evaluatesway otay omethingsay ithway ethay econdsay aluevay "
+"uetray, enthay ethay econdsay\n"
 "  aluevay ofway Infoway illway alsoway ebay uetray."
 
 #: src/compiler/globaldb.lisp
@@ -17786,10 +20214,12 @@ msgid ""
 "value\n"
 "   is NIL."
 msgstr ""
-"Eturnray ethay informationway ofway ethay ecifiedspay Ypetay andway Assclay orfay Amenay.\n"
-"   Ethay econdsay aluevay isway uetray ifway erethay isway anyway uchsay informationway ecordedray.  Ifway\n"
-"   erethay isway onay informationway, ethay irstfay aluevay isway ethay efaultday andway ethay econdsay "
-"aluevay\n"
+"Eturnray ethay informationway ofway ethay ecifiedspay Ypetay andway Assclay "
+"orfay Amenay.\n"
+"   Ethay econdsay aluevay isway uetray ifway erethay isway anyway uchsay "
+"informationway ecordedray.  Ifway\n"
+"   erethay isway onay informationway, ethay irstfay aluevay isway ethay "
+"efaultday andway ethay econdsay aluevay\n"
 "   isway NIL."
 
 #: src/compiler/globaldb.lisp
@@ -17804,16 +20234,20 @@ msgid ""
 "  (represented as strings), and Value is bound to the entry's value."
 msgstr ""
 "DO-INFO (Envway &Eykay Amenay Assclay Ypetay Aluevay) Orm*Fay\n"
-"  Iterateway overway allway ethay aluesvay toredsay inway ethay Infoway-Envway Envway.  Amenay isway oundbay otay\n"
-"  ethay entryway's amenay, Assclay andway Ypetay areway oundbay otay ethay assclay andway ypetay\n"
-"  (epresentedray asway ingsstray), andway Aluevay isway oundbay otay ethay entryway's aluevay."
+"  Iterateway overway allway ethay aluesvay toredsay inway ethay Infoway-"
+"Envway Envway.  Amenay isway oundbay otay\n"
+"  ethay entryway's amenay, Assclay andway Ypetay areway oundbay otay ethay "
+"assclay andway ypetay\n"
+"  (epresentedray asway ingsstray), andway Aluevay isway oundbay otay ethay "
+"entryway's aluevay."
 
 #: src/compiler/globaldb.lisp
 msgid ""
 "Return a new compact info environment that holds the same information as\n"
 "  Env."
 msgstr ""
-"Eturnray away ewnay ompactcay infoway environmentway atthay oldshay ethay amesay informationway asway\n"
+"Eturnray away ewnay ompactcay infoway environmentway atthay oldshay ethay "
+"amesay informationway asway\n"
 "  Envway."
 
 #: src/compiler/knownfun.lisp src/compiler/globaldb.lisp
@@ -17834,8 +20268,10 @@ msgid ""
 "  current environment, allowing any inherited info to become visible.  We\n"
 "  return true if there was any info."
 msgstr ""
-"Earclay ethay informationway ofway ethay ecifiedspay Ypetay andway Assclay orfay Amenay inway ethay\n"
-"  urrentcay environmentway, allowingway anyway inheritedway infoway otay ecomebay isiblevay.  Eway\n"
+"Earclay ethay informationway ofway ethay ecifiedspay Ypetay andway Assclay "
+"orfay Amenay inway ethay\n"
+"  urrentcay environmentway, allowingway anyway inheritedway infoway otay "
+"ecomebay isiblevay.  Eway\n"
 "  eturnray uetray ifway erethay asway anyway infoway."
 
 #: src/code/macros.lisp
@@ -17852,16 +20288,18 @@ msgid ""
 "forms,\n"
 "  and the doc-string, or NIL if none."
 msgstr ""
-"Isthay unctionfay isway otay arsepay ethay eclarationsday andway ocday-ingstray outway ofway ethay odybay "
-"ofway\n"
-"  away efunday-ikelay ormfay.  Odybay isway ethay istlay ofway tuffsay ichwhay isway otay ebay arsedpay.\n"
-"  Environmentway isway ignoredway.  Ifway Ocday-Ingstray-Allowedway isway uetray, enthay away ocday ingstray\n"
-"  illway ebay arsedpay outway ofway ethay odybay andway eturnedray.  Ifway itway isway alsefay enthay away "
-"ingstray\n"
-"  illway erminatetay ethay earchsay orfay eclarationsday.  Reethay aluesvay areway eturnedray: "
-"ethay\n"
-"  ailtay ofway Odybay afterway ethay eclarationsday andway ocday ingsstray, away istlay ofway eclareday "
-"ormsfay,\n"
+"Isthay unctionfay isway otay arsepay ethay eclarationsday andway ocday-"
+"ingstray outway ofway ethay odybay ofway\n"
+"  away efunday-ikelay ormfay.  Odybay isway ethay istlay ofway tuffsay "
+"ichwhay isway otay ebay arsedpay.\n"
+"  Environmentway isway ignoredway.  Ifway Ocday-Ingstray-Allowedway isway "
+"uetray, enthay away ocday ingstray\n"
+"  illway ebay arsedpay outway ofway ethay odybay andway eturnedray.  Ifway "
+"itway isway alsefay enthay away ingstray\n"
+"  illway erminatetay ethay earchsay orfay eclarationsday.  Reethay aluesvay "
+"areway eturnedray: ethay\n"
+"  ailtay ofway Odybay afterway ethay eclarationsday andway ocday ingsstray, "
+"away istlay ofway eclareday ormsfay,\n"
 "  andway ethay ocday-ingstray, orway NIL ifway onenay."
 
 #: src/code/macros.lisp
@@ -17925,12 +20363,15 @@ msgid ""
 "Syntax like DEFMACRO, but creates a Setf-Expansion generator.  The body\n"
 "  must be a form that returns the five magical values."
 msgstr ""
-"Yntaxsay ikelay DEFMACRO, utbay eatescray away Etfsay-Expansionway eneratorgay.  Ethay odybay\n"
+"Yntaxsay ikelay DEFMACRO, utbay eatescray away Etfsay-Expansionway "
+"eneratorgay.  Ethay odybay\n"
 "  ustmay ebay away ormfay atthay eturnsray ethay ivefay agicalmay aluesvay."
 
 #: src/code/macros.lisp
 msgid "~S -- Access-function name not a symbol in DEFINE-SETF-EXPANDER."
-msgstr "~S -- Accessway-unctionfay amenay otnay away ymbolsay inway DEFINE-SETF-EXPANDER."
+msgstr ""
+"~S -- Accessway-unctionfay amenay otnay away ymbolsay inway DEFINE-SETF-"
+"EXPANDER."
 
 #: src/code/macros.lisp
 msgid "Obsolete, use define-setf-expander."
@@ -17939,10 +20380,11 @@ msgstr "Obsoleteway, useway efineday-etfsay-expanderway."
 #: src/code/macros.lisp
 msgid ""
 "Defining setf macro for destruct slot accessor; redefining as ~\n"
-"	        a normal function:~%  ~S"
+"\t        a normal function:~%  ~S"
 msgstr ""
-"Efiningday etfsay acromay orfay estructday otslay accessorway; edefiningray asway ~\n"
-"	        away ormalnay unctionfay:~%  ~S"
+"Efiningday etfsay acromay orfay estructday otslay accessorway; edefiningray "
+"asway ~\n"
+"\t        away ormalnay unctionfay:~%  ~S"
 
 #: src/code/macros.lisp
 msgid "Defining setf macro for ~S, but ~S is fbound."
@@ -17950,7 +20392,9 @@ msgstr "Efiningday etfsay acromay orfay ~S, utbay ~S isway boundfay."
 
 #: src/code/macros.lisp
 msgid "Bind the variables in LAMBDA-LIST to the contents of ARG-LIST."
-msgstr "Indbay ethay ariablesvay inway LAMBDA-LIST otay ethay ontentscay ofway ARG-LIST."
+msgstr ""
+"Indbay ethay ariablesvay inway LAMBDA-LIST otay ethay ontentscay ofway ARG-"
+"LIST."
 
 #: src/code/macros.lisp
 msgid ""
@@ -17961,12 +20405,14 @@ msgid ""
 "third\n"
 "  argument is an optional documentation string for the variable."
 msgstr ""
-"Orfay efiningday obalglay onstantscay atway optay evellay.  Ethay DEFCONSTANT ayssay atthay ethay\n"
-"  aluevay isway onstantcay andway aymay ebay ompiledcay intoway odecay.  Ifway ethay ariablevay alreadyway "
-"ashay\n"
-"  away aluevay, andway isthay isway otnay equalway otay ethay initway, anway errorway isway ignalledsay.  Ethay "
-"irdthay\n"
-"  argumentway isway anway optionalway ocumentationday ingstray orfay ethay ariablevay."
+"Orfay efiningday obalglay onstantscay atway optay evellay.  Ethay "
+"DEFCONSTANT ayssay atthay ethay\n"
+"  aluevay isway onstantcay andway aymay ebay ompiledcay intoway odecay.  "
+"Ifway ethay ariablevay alreadyway ashay\n"
+"  away aluevay, andway isthay isway otnay equalway otay ethay initway, anway "
+"errorway isway ignalledsay.  Ethay irdthay\n"
+"  argumentway isway anway optionalway ocumentationday ingstray orfay ethay "
+"ariablevay."
 
 #: src/code/macros.lisp
 msgid "Go ahead and change the value."
@@ -17983,9 +20429,12 @@ msgid ""
 "  value, the old value is not clobbered.  The third argument is an optional\n"
 "  documentation string for the variable."
 msgstr ""
-"Orfay efiningday obalglay ariablesvay atway optay evellay.  Eclaresday ethay ariablevay\n"
-"  SPECIAL andway, optionallyway, initializesway itway.  Ifway ethay ariablevay alreadyway ashay away\n"
-"  aluevay, ethay oldway aluevay isway otnay obberedclay.  Ethay irdthay argumentway isway anway optionalway\n"
+"Orfay efiningday obalglay ariablesvay atway optay evellay.  Eclaresday ethay "
+"ariablevay\n"
+"  SPECIAL andway, optionallyway, initializesway itway.  Ifway ethay "
+"ariablevay alreadyway ashay away\n"
+"  aluevay, ethay oldway aluevay isway otnay obberedclay.  Ethay irdthay "
+"argumentway isway anway optionalway\n"
 "  ocumentationday ingstray orfay ethay ariablevay."
 
 #: src/code/macros.lisp
@@ -17995,9 +20444,12 @@ msgid ""
 "  variable special and sets its value to VAL.  The third argument is\n"
 "  an optional documentation string for the parameter."
 msgstr ""
-"Efinesday away arameterpay atthay isway otnay ormallynay angedchay ybay ethay ogrampray,\n"
-"  utbay atthay aymay ebay angedchay ithoutway ausingcay anway errorway.  Eclaresday ethay\n"
-"  ariablevay ecialspay andway etssay itsway aluevay otay VAL.  Ethay irdthay argumentway isway\n"
+"Efinesday away arameterpay atthay isway otnay ormallynay angedchay ybay "
+"ethay ogrampray,\n"
+"  utbay atthay aymay ebay angedchay ithoutway ausingcay anway errorway.  "
+"Eclaresday ethay\n"
+"  ariablevay ecialspay andway etssay itsway aluevay otay VAL.  Ethay irdthay "
+"argumentway isway\n"
 "  anway optionalway ocumentationday ingstray orfay ethay arameterpay."
 
 #: src/code/macros.lisp
@@ -18005,7 +20457,8 @@ msgid ""
 "First arg is a predicate.  If it is non-null, the rest of the forms are\n"
 "  evaluated as a PROGN."
 msgstr ""
-"Irstfay argway isway away edicatepray.  Ifway itway isway onnay-ullnay, ethay estray ofway ethay ormsfay areway\n"
+"Irstfay argway isway away edicatepray.  Ifway itway isway onnay-ullnay, "
+"ethay estray ofway ethay ormsfay areway\n"
 "  evaluatedway asway away PROGN."
 
 #: src/code/macros.lisp
@@ -18013,7 +20466,8 @@ msgid ""
 "First arg is a predicate.  If it is null, the rest of the forms are\n"
 "  evaluated as a PROGN."
 msgstr ""
-"Irstfay argway isway away edicatepray.  Ifway itway isway ullnay, ethay estray ofway ethay ormsfay areway\n"
+"Irstfay argway isway away edicatepray.  Ifway itway isway ullnay, ethay "
+"estray ofway ethay ormsfay areway\n"
 "  evaluatedway asway away PROGN."
 
 #: src/code/macros.lisp
@@ -18029,20 +20483,23 @@ msgid ""
 "Evaluates FORM and returns the Nth value (zero based).  This involves no\n"
 "  consing when N is a trivial constant integer."
 msgstr ""
-"Evaluatesway FORM andway eturnsray ethay Thnay aluevay (erozay asedbay).  Isthay involvesway onay\n"
+"Evaluatesway FORM andway eturnsray ethay Thnay aluevay (erozay asedbay).  "
+"Isthay involvesway onay\n"
 "  onsingcay enwhay N isway away ivialtray onstantcay integerway."
 
 #: src/code/macros.lisp
 msgid ""
 "Returns five values needed by the SETF machinery: a list of temporary\n"
-"   variables, a list of values with which to fill them, a list of temporarie"
-"s\n"
+"   variables, a list of values with which to fill them, a list of "
+"temporaries\n"
 "   for the new values, the setting function, and the accessing function."
 msgstr ""
-"Eturnsray ivefay aluesvay eedednay ybay ethay SETF achinerymay: away istlay ofway emporarytay\n"
-"   ariablesvay, away istlay ofway aluesvay ithway ichwhay otay illfay emthay, away istlay ofway emporarietay"
-"s\n"
-"   orfay ethay ewnay aluesvay, ethay ettingsay unctionfay, andway ethay accessingway unctionfay."
+"Eturnsray ivefay aluesvay eedednay ybay ethay SETF achinerymay: away istlay "
+"ofway emporarytay\n"
+"   ariablesvay, away istlay ofway aluesvay ithway ichwhay otay illfay "
+"emthay, away istlay ofway emporarietays\n"
+"   orfay ethay ewnay aluesvay, ethay ettingsay unctionfay, andway ethay "
+"accessingway unctionfay."
 
 #: src/code/macros.lisp
 msgid "Obsolete: use GET-SETF-EXPANSION."
@@ -18050,15 +20507,17 @@ msgstr "Obsoleteway: useway GET-SETF-EXPANSION."
 
 #: src/code/macros.lisp
 msgid "Obsolete: use GET-SETF-EXPANSION and handle multiple store values."
-msgstr "Obsoleteway: useway GET-SETF-EXPANSION andway andlehay ultiplemay toresay aluesvay."
+msgstr ""
+"Obsoleteway: useway GET-SETF-EXPANSION andway andlehay ultiplemay toresay "
+"aluesvay."
 
 #: src/code/macros.lisp
 msgid ""
 "GET-SETF-METHOD used for a form with multiple store ~\n"
-"	      variables:~%  ~S"
+"\t      variables:~%  ~S"
 msgstr ""
 "GET-SETF-METHOD usedway orfay away ormfay ithway ultiplemay toresay ~\n"
-"	      ariablesvay:~%  ~S"
+"\t      ariablesvay:~%  ~S"
 
 #: src/code/macros.lisp
 msgid ""
@@ -18066,8 +20525,10 @@ msgid ""
 "  function or macro.  The format is complex.  See the manual for\n"
 "  details."
 msgstr ""
-"Associatesway away SETF updateway unctionfay orway acromay ithway ethay ecifiedspay accessway\n"
-"  unctionfay orway acromay.  Ethay ormatfay isway omplexcay.  Eesay ethay anualmay orfay\n"
+"Associatesway away SETF updateway unctionfay orway acromay ithway ethay "
+"ecifiedspay accessway\n"
+"  unctionfay orway acromay.  Ethay ormatfay isway omplexcay.  Eesay ethay "
+"anualmay orfay\n"
 "  etailsday."
 
 #: src/code/macros.lisp
@@ -18081,9 +20542,12 @@ msgid ""
 "  value.  The place argument may be any of the access forms for which SETF\n"
 "  knows a corresponding setting form."
 msgstr ""
-"Akestay airspay ofway argumentsway ikelay SETQ.  Ethay irstfay isway away aceplay andway ethay econdsay\n"
-"  isway ethay aluevay atthay isway upposedsay otay ogay intoway atthay aceplay.  Eturnsray ethay astlay\n"
-"  aluevay.  Ethay aceplay argumentway aymay ebay anyway ofway ethay accessway ormsfay orfay ichwhay SETF\n"
+"Akestay airspay ofway argumentsway ikelay SETQ.  Ethay irstfay isway away "
+"aceplay andway ethay econdsay\n"
+"  isway ethay aluevay atthay isway upposedsay otay ogay intoway atthay "
+"aceplay.  Eturnsray ethay astlay\n"
+"  aluevay.  Ethay aceplay argumentway aymay ebay anyway ofway ethay "
+"accessway ormsfay orfay ichwhay SETF\n"
 "  nowskay away orrespondingcay ettingsay ormfay."
 
 #: src/code/macros.lisp
@@ -18097,9 +20561,12 @@ msgid ""
 "  values are determined, left to right, and only then are the locations\n"
 "  updated.  Returns NIL."
 msgstr ""
-"Isthay isway otay SETF asway PSETQ isway otay SETQ.  Argsway areway alternatingway aceplay\n"
-"  expressionsway andway aluesvay otay ogay intoway osethay acesplay.  Allway ofway ethay ubformssay andway\n"
-"  aluesvay areway eterminedday, eftlay otay ightray, andway onlyway enthay areway ethay ocationslay\n"
+"Isthay isway otay SETF asway PSETQ isway otay SETQ.  Argsway areway "
+"alternatingway aceplay\n"
+"  expressionsway andway aluesvay otay ogay intoway osethay acesplay.  Allway "
+"ofway ethay ubformssay andway\n"
+"  aluesvay areway eterminedday, eftlay otay ightray, andway onlyway enthay "
+"areway ethay ocationslay\n"
 "  updatedway.  Eturnsray NIL."
 
 #: src/code/macros.lisp
@@ -18113,9 +20580,12 @@ msgid ""
 "   assigns the value of each expression to the place on its left,\n"
 "   returning the value of the leftmost."
 msgstr ""
-"Oneway orway oremay SETF-tylesay aceplay expressionsway, ollowedfay ybay away inglesay\n"
-"   aluevay expressionway.  Evaluatesway allway ofway ethay expressionsway inway urntay, enthay\n"
-"   assignsway ethay aluevay ofway eachway expressionway otay ethay aceplay onway itsway eftlay,\n"
+"Oneway orway oremay SETF-tylesay aceplay expressionsway, ollowedfay ybay "
+"away inglesay\n"
+"   aluevay expressionway.  Evaluatesway allway ofway ethay expressionsway "
+"inway urntay, enthay\n"
+"   assignsway ethay aluevay ofway eachway expressionway otay ethay aceplay "
+"onway itsway eftlay,\n"
 "   eturningray ethay aluevay ofway ethay eftmostlay."
 
 #: src/code/macros.lisp
@@ -18125,14 +20595,18 @@ msgid ""
 "   its right.  The rightmost form gets the value of the leftmost.\n"
 "   Returns NIL."
 msgstr ""
-"Akestay anyway umbernay ofway SETF-tylesay aceplay expressionsway.  Evaluatesway allway ofway ethay\n"
-"   expressionsway inway urntay, enthay assignsway otay eachway aceplay ethay aluevay ofway ethay ormfay otay\n"
-"   itsway ightray.  Ethay ightmostray ormfay etsgay ethay aluevay ofway ethay eftmostlay.\n"
+"Akestay anyway umbernay ofway SETF-tylesay aceplay expressionsway.  "
+"Evaluatesway allway ofway ethay\n"
+"   expressionsway inway urntay, enthay assignsway otay eachway aceplay ethay "
+"aluevay ofway ethay ormfay otay\n"
+"   itsway ightray.  Ethay ightmostray ormfay etsgay ethay aluevay ofway "
+"ethay eftmostlay.\n"
 "   Eturnsray NIL."
 
 #: src/code/macros.lisp
 msgid "Creates a new read-modify-write macro like PUSH or INCF."
-msgstr "Eatescray away ewnay eadray-odifymay-itewray acromay ikelay PUSH orway INCF."
+msgstr ""
+"Eatescray away ewnay eadray-odifymay-itewray acromay ikelay PUSH orway INCF."
 
 #: src/code/macros.lisp
 msgid "Non-symbol &rest arg in definition of ~S."
@@ -18140,7 +20614,8 @@ msgstr "Onnay-ymbolsay &estray argway inway efinitionday ofway ~S."
 
 #: src/code/macros.lisp
 msgid "Illegal stuff after &rest arg in Define-Modify-Macro."
-msgstr "Illegalway tuffsay afterway &estray argway inway Efineday-Odifymay-Acromay."
+msgstr ""
+"Illegalway tuffsay afterway &estray argway inway Efineday-Odifymay-Acromay."
 
 #: src/code/macros.lisp
 msgid "~S not allowed in Define-Modify-Macro lambda list."
@@ -18148,15 +20623,18 @@ msgstr "~S otnay allowedway inway Efineday-Odifymay-Acromay ambdalay istlay."
 
 #: src/code/macros.lisp
 msgid "Illegal stuff in lambda list of Define-Modify-Macro."
-msgstr "Illegalway tuffsay inway ambdalay istlay ofway Efineday-Odifymay-Acromay."
+msgstr ""
+"Illegalway tuffsay inway ambdalay istlay ofway Efineday-Odifymay-Acromay."
 
 #: src/code/macros.lisp
 msgid ""
 "Takes an object and a location holding a list.  Conses the object onto\n"
 "  the list, returning the modified list.  OBJ is evaluated before PLACE."
 msgstr ""
-"Akestay anway objectway andway away ocationlay oldinghay away istlay.  Onsescay ethay objectway ontoway\n"
-"  ethay istlay, eturningray ethay odifiedmay istlay.  OBJ isway evaluatedway eforebay PLACE."
+"Akestay anway objectway andway away ocationlay oldinghay away istlay.  "
+"Onsescay ethay objectway ontoway\n"
+"  ethay istlay, eturningray ethay odifiedmay istlay.  OBJ isway evaluatedway "
+"eforebay PLACE."
 
 #: src/code/macros.lisp
 msgid ""
@@ -18165,17 +20643,20 @@ msgid ""
 "Returns\n"
 "  NIL.  If there is a :TEST keyword, this is used for the comparison."
 msgstr ""
-"Akestay anway objectway andway away ocationlay oldinghay away istlay.  Ifway ethay objectway isway alreadyway\n"
-"  inway ethay istlay, oesday othingnay.  Elseway, onsescay ethay objectway ontoway ethay istlay.  "
-"Eturnsray\n"
-"  NIL.  Ifway erethay isway away :TEST eywordkay, isthay isway usedway orfay ethay omparisoncay."
+"Akestay anway objectway andway away ocationlay oldinghay away istlay.  Ifway "
+"ethay objectway isway alreadyway\n"
+"  inway ethay istlay, oesday othingnay.  Elseway, onsescay ethay objectway "
+"ontoway ethay istlay.  Eturnsray\n"
+"  NIL.  Ifway erethay isway away :TEST eywordkay, isthay isway usedway orfay "
+"ethay omparisoncay."
 
 #: src/code/macros.lisp
 msgid ""
 "The argument is a location holding a list.  Pops one item off the front\n"
 "  of the list and returns it."
 msgstr ""
-"Ethay argumentway isway away ocationlay oldinghay away istlay.  Opspay oneway itemway offway ethay ontfray\n"
+"Ethay argumentway isway away ocationlay oldinghay away istlay.  Opspay "
+"oneway itemway offway ethay ontfray\n"
 "  ofway ethay istlay andway eturnsray itway."
 
 #: src/code/macros.lisp
@@ -18183,16 +20664,20 @@ msgid ""
 "The first argument is some location holding a number. This number is\n"
 "  incremented by the second argument, DELTA, which defaults to 1."
 msgstr ""
-"Ethay irstfay argumentway isway omesay ocationlay oldinghay away umbernay. Isthay umbernay isway\n"
-"  incrementedway ybay ethay econdsay argumentway, DELTA, ichwhay efaultsday otay 1."
+"Ethay irstfay argumentway isway omesay ocationlay oldinghay away umbernay. "
+"Isthay umbernay isway\n"
+"  incrementedway ybay ethay econdsay argumentway, DELTA, ichwhay efaultsday "
+"otay 1."
 
 #: src/code/macros.lisp
 msgid ""
 "The first argument is some location holding a number. This number is\n"
 "  decremented by the second argument, DELTA, which defaults to 1."
 msgstr ""
-"Ethay irstfay argumentway isway omesay ocationlay oldinghay away umbernay. Isthay umbernay isway\n"
-"  ecrementedday ybay ethay econdsay argumentway, DELTA, ichwhay efaultsday otay 1."
+"Ethay irstfay argumentway isway omesay ocationlay oldinghay away umbernay. "
+"Isthay umbernay isway\n"
+"  ecrementedday ybay ethay econdsay argumentway, DELTA, ichwhay efaultsday "
+"otay 1."
 
 #: src/code/macros.lisp
 msgid ""
@@ -18201,14 +20686,19 @@ msgid ""
 "  remove the property specified by the indicator.  Returns T if such a\n"
 "  property was present, NIL if not."
 msgstr ""
-"Aceplay aymay ebay anyway aceplay expressionway acceptableway otay SETF, andway isway expectedway\n"
-"  otay oldhay away opertypray istlay orway ().  Isthay istlay isway estructivelyday alteredway otay\n"
-"  emoveray ethay opertypray ecifiedspay ybay ethay indicatorway.  Eturnsray T ifway uchsay away\n"
+"Aceplay aymay ebay anyway aceplay expressionway acceptableway otay SETF, "
+"andway isway expectedway\n"
+"  otay oldhay away opertypray istlay orway ().  Isthay istlay isway "
+"estructivelyday alteredway otay\n"
+"  emoveray ethay opertypray ecifiedspay ybay ethay indicatorway.  Eturnsray "
+"T ifway uchsay away\n"
 "  opertypray asway esentpray, NIL ifway otnay."
 
 #: src/code/macros.lisp
 msgid "Setf of Apply is only defined for function args like #'symbol."
-msgstr "Etfsay ofway Applyway isway onlyway efinedday orfay unctionfay argsway ikelay #'ymbolsay."
+msgstr ""
+"Etfsay ofway Applyway isway onlyway efinedday orfay unctionfay argsway "
+"ikelay #'ymbolsay."
 
 #: src/code/macros.lisp
 msgid ""
@@ -18216,9 +20706,12 @@ msgid ""
 "  acceptable to SETF.  Replaces the specified byte of the number in this\n"
 "  place with bits from the low-order end of the new value."
 msgstr ""
-"Ethay irstfay argumentway isway away ytebay ecifierspay.  Ethay econdsay isway anyway aceplay ormfay\n"
-"  acceptableway otay SETF.  Eplacesray ethay ecifiedspay ytebay ofway ethay umbernay inway isthay\n"
-"  aceplay ithway itsbay omfray ethay owlay-orderway endway ofway ethay ewnay aluevay."
+"Ethay irstfay argumentway isway away ytebay ecifierspay.  Ethay econdsay "
+"isway anyway aceplay ormfay\n"
+"  acceptableway otay SETF.  Eplacesray ethay ecifiedspay ytebay ofway ethay "
+"umbernay inway isthay\n"
+"  aceplay ithway itsbay omfray ethay owlay-orderway endway ofway ethay ewnay "
+"aluevay."
 
 #: src/code/macros.lisp
 msgid ""
@@ -18227,10 +20720,12 @@ msgid ""
 "place\n"
 "  with bits from the corresponding position in the new value."
 msgstr ""
-"Ethay irstfay argumentway isway away ytebay ecifierspay.  Ethay econdsay isway anyway aceplay ormfay\n"
-"  acceptableway otay SETF.  Eplacesray ethay ecifiedspay ytebay ofway ethay umbernay inway isthay "
-"aceplay\n"
-"  ithway itsbay omfray ethay orrespondingcay ositionpay inway ethay ewnay aluevay."
+"Ethay irstfay argumentway isway away ytebay ecifierspay.  Ethay econdsay "
+"isway anyway aceplay ormfay\n"
+"  acceptableway otay SETF.  Eplacesray ethay ecifiedspay ytebay ofway ethay "
+"umbernay inway isthay aceplay\n"
+"  ithway itsbay omfray ethay orrespondingcay ositionpay inway ethay ewnay "
+"aluevay."
 
 #: src/code/macros.lisp
 msgid "~S -- Bad clause in ~S."
@@ -18242,7 +20737,9 @@ msgstr "Onay efaultday auseclay allowedway inway ~S: ~S"
 
 #: src/code/macros.lisp
 msgid "T and OTHERWISE may not be used as key designators for ~A"
-msgstr "T andway OTHERWISE aymay otnay ebay usedway asway eykay esignatorsday orfay ~Away"
+msgstr ""
+"T andway OTHERWISE aymay otnay ebay usedway asway eykay esignatorsday orfay "
+"~Away"
 
 #: src/code/macros.lisp
 msgid "Bad style to use T or OTHERWISE in ECASE or CCASE"
@@ -18260,8 +20757,10 @@ msgid ""
 "  a default clause."
 msgstr ""
 "CASE Eyformkay {({(Ey*Kay) | Eykay} Orm*Fay)}*\n"
-"  Evaluatesway ethay Ormsfay inway ethay irstfay auseclay ithway away Eykay EQL otay ethay aluevay\n"
-"  ofway Eyformkay.  Ifway away ingletonsay eykay isway T orway Otherwiseway enthay ethay auseclay isway\n"
+"  Evaluatesway ethay Ormsfay inway ethay irstfay auseclay ithway away Eykay "
+"EQL otay ethay aluevay\n"
+"  ofway Eyformkay.  Ifway away ingletonsay eykay isway T orway Otherwiseway "
+"enthay ethay auseclay isway\n"
 "  away efaultday auseclay."
 
 #: src/code/macros.lisp
@@ -18272,8 +20771,10 @@ msgid ""
 "  signalled."
 msgstr ""
 "CCASE Eyformkay {({(Ey*Kay) | Eykay} Orm*Fay)}*\n"
-"  Evaluatesway ethay Ormsfay inway ethay irstfay auseclay ithway away Eykay EQL otay ethay aluevay ofway\n"
-"  Eyformkay.  Ifway onenay ofway ethay eyskay atchesmay enthay away orrectablecay errorway isway\n"
+"  Evaluatesway ethay Ormsfay inway ethay irstfay auseclay ithway away Eykay "
+"EQL otay ethay aluevay ofway\n"
+"  Eyformkay.  Ifway onenay ofway ethay eyskay atchesmay enthay away "
+"orrectablecay errorway isway\n"
 "  ignalledsay."
 
 #: src/code/macros.lisp
@@ -18283,8 +20784,10 @@ msgid ""
 "  Keyform.  If none of the keys matches then an error is signalled."
 msgstr ""
 "ECASE Eyformkay {({(Ey*Kay) | Eykay} Orm*Fay)}*\n"
-"  Evaluatesway ethay Ormsfay inway ethay irstfay auseclay ithway away Eykay EQL otay ethay aluevay ofway\n"
-"  Eyformkay.  Ifway onenay ofway ethay eyskay atchesmay enthay anway errorway isway ignalledsay."
+"  Evaluatesway ethay Ormsfay inway ethay irstfay auseclay ithway away Eykay "
+"EQL otay ethay aluevay ofway\n"
+"  Eyformkay.  Ifway onenay ofway ethay eyskay atchesmay enthay anway "
+"errorway isway ignalledsay."
 
 #: src/code/macros.lisp
 msgid ""
@@ -18294,8 +20797,10 @@ msgid ""
 "  clause is a default clause."
 msgstr ""
 "TYPECASE Eyformkay {(Ypetay Orm*Fay)}*\n"
-"  Evaluatesway ethay Ormsfay inway ethay irstfay auseclay orfay ichwhay TYPEP ofway Eyformkay\n"
-"  andway Ypetay isway uetray.  Ifway away ingletonsay eykay isway T orway Otherwiseway enthay ethay\n"
+"  Evaluatesway ethay Ormsfay inway ethay irstfay auseclay orfay ichwhay "
+"TYPEP ofway Eyformkay\n"
+"  andway Ypetay isway uetray.  Ifway away ingletonsay eykay isway T orway "
+"Otherwiseway enthay ethay\n"
 "  auseclay isway away efaultday auseclay."
 
 #: src/code/macros.lisp
@@ -18306,9 +20811,10 @@ msgid ""
 "  is true.  If no form is satisfied then a correctable error is signalled."
 msgstr ""
 "CTYPECASE Eyformkay {(Ypetay Orm*Fay)}*\n"
-"  Evaluatesway ethay Ormsfay inway ethay irstfay auseclay orfay ichwhay TYPEP ofway Eyformkay andway "
-"Ypetay\n"
-"  isway uetray.  Ifway onay ormfay isway atisfiedsay enthay away orrectablecay errorway isway ignalledsay."
+"  Evaluatesway ethay Ormsfay inway ethay irstfay auseclay orfay ichwhay "
+"TYPEP ofway Eyformkay andway Ypetay\n"
+"  isway uetray.  Ifway onay ormfay isway atisfiedsay enthay away "
+"orrectablecay errorway isway ignalledsay."
 
 #: src/code/macros.lisp
 msgid ""
@@ -18318,23 +20824,24 @@ msgid ""
 "  is true.  If no form is satisfied then an error is signalled."
 msgstr ""
 "ETYPECASE Eyformkay {(Ypetay Orm*Fay)}*\n"
-"  Evaluatesway ethay Ormsfay inway ethay irstfay auseclay orfay ichwhay TYPEP ofway Eyformkay andway "
-"Ypetay\n"
-"  isway uetray.  Ifway onay ormfay isway atisfiedsay enthay anway errorway isway ignalledsay."
+"  Evaluatesway ethay Ormsfay inway ethay irstfay auseclay orfay ichwhay "
+"TYPEP ofway Eyformkay andway Ypetay\n"
+"  isway uetray.  Ifway onay ormfay isway atisfiedsay enthay anway errorway "
+"isway ignalledsay."
 
 #: src/code/macros.lisp
 msgid ""
 "Signals an error if the value of test-form is nil.  Continuing from this\n"
 "   error using the CONTINUE restart will allow the user to alter the value "
 "of\n"
-"   some locations known to SETF, starting over with test-form.  Returns "
-"nil."
+"   some locations known to SETF, starting over with test-form.  Returns nil."
 msgstr ""
-"Ignalssay anway errorway ifway ethay aluevay ofway esttay-ormfay isway ilnay.  Ontinuingcay omfray isthay\n"
-"   errorway usingway ethay CONTINUE estartray illway allowway ethay userway otay alterway ethay aluevay "
-"ofway\n"
-"   omesay ocationslay nownkay otay SETF, tartingsay overway ithway esttay-ormfay.  Eturnsray "
-"ilnay."
+"Ignalssay anway errorway ifway ethay aluevay ofway esttay-ormfay isway "
+"ilnay.  Ontinuingcay omfray isthay\n"
+"   errorway usingway ethay CONTINUE estartray illway allowway ethay userway "
+"otay alterway ethay aluevay ofway\n"
+"   omesay ocationslay nownkay otay SETF, tartingsay overway ithway esttay-"
+"ormfay.  Eturnsray ilnay."
 
 #: src/code/macros.lisp
 msgid "The assertion ~S failed."
@@ -18351,10 +20858,12 @@ msgstr[0] " ithway ewnay aluevay orfay ~{~S~^, ~}."
 msgstr[1] " ithway ewnay aluesvay orfay ~{~S~^, ~}."
 
 #: src/code/macros.lisp
-msgid "The old value of ~S is ~S.~\n"
-"		  ~%Do you want to supply a new value? "
-msgstr "Ethay oldway aluevay ofway ~S isway ~S.~\n"
-"		  ~%Oday ouyay antway otay upplysay away ewnay aluevay? "
+msgid ""
+"The old value of ~S is ~S.~\n"
+"\t\t  ~%Do you want to supply a new value? "
+msgstr ""
+"Ethay oldway aluevay ofway ~S isway ~S.~\n"
+"\t\t  ~%Oday ouyay antway otay upplysay away ewnay aluevay? "
 
 #: src/code/macros.lisp
 msgid "~&Type a form to be evaluated:~%"
@@ -18366,9 +20875,12 @@ msgid ""
 "   specified type.  If an error is signaled, this can only return if\n"
 "   STORE-VALUE is invoked.  It will store into place and start over."
 msgstr ""
-"Ignalssay anway errorway ofway ypetay ypetay-errorway ifway ethay ontentscay ofway aceplay areway otnay ofway ethay\n"
-"   ecifiedspay ypetay.  Ifway anway errorway isway ignaledsay, isthay ancay onlyway eturnray ifway\n"
-"   STORE-VALUE isway invokedway.  Itway illway toresay intoway aceplay andway tartsay overway."
+"Ignalssay anway errorway ofway ypetay ypetay-errorway ifway ethay ontentscay "
+"ofway aceplay areway otnay ofway ethay\n"
+"   ecifiedspay ypetay.  Ifway anway errorway isway ignaledsay, isthay ancay "
+"onlyway eturnray ifway\n"
+"   STORE-VALUE isway invokedway.  Itway illway toresay intoway aceplay "
+"andway tartsay overway."
 
 #: src/code/macros.lisp
 msgid "Supply a new value of ~S."
@@ -18389,9 +20901,12 @@ msgid ""
 "  forms are not evaluated.  The Forms are executed, and when they\n"
 "  terminate, normally or otherwise, the file is closed."
 msgstr ""
-"Ethay ilefay osewhay amenay isway Ilespecfay isway openedway usingway ethay Openway-argsway andway\n"
-"  oundbay otay ethay ariablevay Arvay. Ifway ethay allcay otay openway isway unsuccessfulway, ethay\n"
-"  ormsfay areway otnay evaluatedway.  Ethay Ormsfay areway executedway, andway enwhay eythay\n"
+"Ethay ilefay osewhay amenay isway Ilespecfay isway openedway usingway ethay "
+"Openway-argsway andway\n"
+"  oundbay otay ethay ariablevay Arvay. Ifway ethay allcay otay openway isway "
+"unsuccessfulway, ethay\n"
+"  ormsfay areway otnay evaluatedway.  Ethay Ormsfay areway executedway, "
+"andway enwhay eythay\n"
 "  erminatetay, ormallynay orway otherwiseway, ethay ilefay isway osedclay."
 
 #: src/code/macros.lisp
@@ -18400,8 +20915,10 @@ msgid ""
 "   to the stream and the forms are evaluated as an implicit\n"
 "   progn.  The stream is closed upon exit."
 msgstr ""
-"Ethay ormfay eamstray ouldshay evaluateway otay away eamstray.  VAR isway oundbay\n"
-"   otay ethay eamstray andway ethay ormsfay areway evaluatedway asway anway implicitway\n"
+"Ethay ormfay eamstray ouldshay evaluateway otay away eamstray.  VAR isway "
+"oundbay\n"
+"   otay ethay eamstray andway ethay ormsfay areway evaluatedway asway anway "
+"implicitway\n"
 "   ognpray.  Ethay eamstray isway osedclay uponway exitway."
 
 #: src/code/macros.lisp
@@ -18409,7 +20926,8 @@ msgid ""
 "Binds the Var to an input stream that returns characters from String and\n"
 "  executes the body.  See manual for details."
 msgstr ""
-"Indsbay ethay Arvay otay anway inputway eamstray atthay eturnsray aracterschay omfray Ingstray andway\n"
+"Indsbay ethay Arvay otay anway inputway eamstray atthay eturnsray "
+"aracterschay omfray Ingstray andway\n"
 "  executesway ethay odybay.  Eesay anualmay orfay etailsday."
 
 #: src/code/macros.lisp
@@ -18418,8 +20936,10 @@ msgid ""
 "   the output is incrementally appended to the string (as if by use of\n"
 "   VECTOR-PUSH-EXTEND)."
 msgstr ""
-"Ifway STRING isway ecifiedspay, itway ustmay ebay away ingstray ithway away illfay ointerpay;\n"
-"   ethay outputway isway incrementallyway appendedway otay ethay ingstray (asway ifway ybay useway ofway\n"
+"Ifway STRING isway ecifiedspay, itway ustmay ebay away ingstray ithway away "
+"illfay ointerpay;\n"
+"   ethay outputway isway incrementallyway appendedway otay ethay ingstray "
+"(asway ifway ybay useway ofway\n"
 "   VECTOR-PUSH-EXTEND)."
 
 #: src/code/macros.lisp
@@ -18437,17 +20957,20 @@ msgid ""
 "be\n"
 "  used as an laternate exit mechanism."
 msgstr ""
-"DO ({(Arvay [Initway] [Tepsay])}*) (Esttay Exitway-Orm*Fay) Eclaration*Day Orm*Fay\n"
-"  Iterationway onstructcay.  Eachway Arvay isway initializedway inway arallelpay otay ethay aluevay ofway "
-"ethay\n"
-"  ecifiedspay Initway ormfay.  Onway ubsequentsay iterationsway, ethay Arsvay areway assignedway ethay\n"
-"  aluevay ofway ethay Tepsay ormfay (ifway anyway) inway aralellpay.  Ethay Esttay isway evaluatedway "
-"eforebay\n"
-"  eachway evaluationway ofway ethay odybay Ormsfay.  Enwhay ethay Esttay isway uetray, ethay Exitway-Ormsfay\n"
-"  areway evaluatedway asway away PROGN, ithway ethay esultray eingbay ethay aluevay ofway ethay DO.  Away "
-"ockblay\n"
-"  amednay NIL isway establishedway aroundway ethay entireway expansionway, allowingway RETURN otay "
-"ebay\n"
+"DO ({(Arvay [Initway] [Tepsay])}*) (Esttay Exitway-Orm*Fay) Eclaration*Day "
+"Orm*Fay\n"
+"  Iterationway onstructcay.  Eachway Arvay isway initializedway inway "
+"arallelpay otay ethay aluevay ofway ethay\n"
+"  ecifiedspay Initway ormfay.  Onway ubsequentsay iterationsway, ethay "
+"Arsvay areway assignedway ethay\n"
+"  aluevay ofway ethay Tepsay ormfay (ifway anyway) inway aralellpay.  Ethay "
+"Esttay isway evaluatedway eforebay\n"
+"  eachway evaluationway ofway ethay odybay Ormsfay.  Enwhay ethay Esttay "
+"isway uetray, ethay Exitway-Ormsfay\n"
+"  areway evaluatedway asway away PROGN, ithway ethay esultray eingbay ethay "
+"aluevay ofway ethay DO.  Away ockblay\n"
+"  amednay NIL isway establishedway aroundway ethay entireway expansionway, "
+"allowingway RETURN otay ebay\n"
 "  usedway asway anway aternatelay exitway echanismmay."
 
 #: src/code/macros.lisp
@@ -18463,16 +20986,22 @@ msgid ""
 "  of the DO.  A block named NIL is established around the entire expansion,\n"
 "  allowing RETURN to be used as an laternate exit mechanism."
 msgstr ""
-"O*Day ({(Arvay [Initway] [Tepsay])}*) (Esttay Exitway-Orm*Fay) Eclaration*Day Orm*Fay\n"
-"  Iterationway onstructcay.  Eachway Arvay isway initializedway equentiallysay (ikelay Et*Lay) otay "
-"ethay\n"
-"  aluevay ofway ethay ecifiedspay Initway ormfay.  Onway ubsequentsay iterationsway, ethay Arsvay areway\n"
-"  equentiallysay assignedway ethay aluevay ofway ethay Tepsay ormfay (ifway anyway).  Ethay Esttay isway\n"
-"  evaluatedway eforebay eachway evaluationway ofway ethay odybay Ormsfay.  Enwhay ethay Esttay isway "
-"uetray,\n"
-"  ethay Exitway-Ormsfay areway evaluatedway asway away PROGN, ithway ethay esultray eingbay ethay aluevay\n"
-"  ofway ethay DO.  Away ockblay amednay NIL isway establishedway aroundway ethay entireway expansionway,\n"
-"  allowingway RETURN otay ebay usedway asway anway aternatelay exitway echanismmay."
+"O*Day ({(Arvay [Initway] [Tepsay])}*) (Esttay Exitway-Orm*Fay) "
+"Eclaration*Day Orm*Fay\n"
+"  Iterationway onstructcay.  Eachway Arvay isway initializedway "
+"equentiallysay (ikelay Et*Lay) otay ethay\n"
+"  aluevay ofway ethay ecifiedspay Initway ormfay.  Onway ubsequentsay "
+"iterationsway, ethay Arsvay areway\n"
+"  equentiallysay assignedway ethay aluevay ofway ethay Tepsay ormfay (ifway "
+"anyway).  Ethay Esttay isway\n"
+"  evaluatedway eforebay eachway evaluationway ofway ethay odybay Ormsfay.  "
+"Enwhay ethay Esttay isway uetray,\n"
+"  ethay Exitway-Ormsfay areway evaluatedway asway away PROGN, ithway ethay "
+"esultray eingbay ethay aluevay\n"
+"  ofway ethay DO.  Away ockblay amednay NIL isway establishedway aroundway "
+"ethay entireway expansionway,\n"
+"  allowingway RETURN otay ebay usedway asway anway aternatelay exitway "
+"echanismmay."
 
 #: src/code/macros.lisp
 msgid ""
@@ -18482,8 +21011,10 @@ msgid ""
 "   forms have been evaluated."
 msgstr ""
 "PSETQ {arvay aluevay}*\n"
-"   Etsay ethay ariablesvay otay ethay aluesvay, ikelay SETQ, exceptway atthay assignmentsway\n"
-"   appenhay inway arallelpay, i.e. onay assignmentsway aketay aceplay untilway allway ethay\n"
+"   Etsay ethay ariablesvay otay ethay aluesvay, ikelay SETQ, exceptway "
+"atthay assignmentsway\n"
+"   appenhay inway arallelpay, i.e. onay assignmentsway aketay aceplay "
+"untilway allway ethay\n"
 "   ormsfay avehay eenbay evaluatedway."
 
 #: src/code/macros.lisp
@@ -18497,16 +21028,16 @@ msgstr "Unknownway eclarationday ontextcay: ~S."
 #: src/code/macros.lisp
 msgid ""
 "Context declaration spec should have context and at ~\n"
-"	  least one DECLARE form:~%  ~S"
+"\t  least one DECLARE form:~%  ~S"
 msgstr ""
 "Ontextcay eclarationday ecspay ouldshay avehay ontextcay andway atway ~\n"
-"	  eastlay oneway DECLARE ormfay:~%  ~S"
+"\t  eastlay oneway DECLARE ormfay:~%  ~S"
 
 #: src/code/macros.lisp
 msgid ""
 "WITH-COMPILATION-UNIT ({Key Value}*) Form*\n"
-"  This form affects compilations that take place within its dynamic extent. "
-" It\n"
+"  This form affects compilations that take place within its dynamic extent.  "
+"It\n"
 "  is intended to be wrapped around the compilation of all files in the same\n"
 "  system.  These keywords are defined:\n"
 "    :OVERRIDE Boolean-Form\n"
@@ -18514,8 +21045,8 @@ msgid ""
 "        until the end of the form, instead of giving them at the end of "
 "each\n"
 "        compilation.  If OVERRIDE is NIL (the default), then the outermost\n"
-"        WITH-COMPILATION-UNIT form grabs the undefined warnings.  Specifying"
-"\n"
+"        WITH-COMPILATION-UNIT form grabs the undefined warnings.  "
+"Specifying\n"
 "        OVERRIDE true causes that form to grab any enclosed warnings, even "
 "if\n"
 "        it is enclosed by another WITH-COMPILATION-UNIT.\n"
@@ -18539,102 +21070,118 @@ msgid ""
 "at\n"
 "        the head of each definition.  The declare forms for all contexts "
 "that\n"
-"	match are appended together, with earlier declarations getting\n"
-"	predecence over later ones.  A simple example:\n"
+"\tmatch are appended together, with earlier declarations getting\n"
+"\tpredecence over later ones.  A simple example:\n"
 "            :context-declarations\n"
 "            '((:external (declare (optimize (safety 2)))))\n"
 "        This will cause all functions that are named by external symbols to "
 "be\n"
 "        compiled with SAFETY 2.  The full syntax of context specs is:\n"
-"	:INTERNAL, :EXTERNAL\n"
-"	    True if the symbols is internal (external) in its home package.\n"
-"	:UNINTERNED\n"
-"	    True if the symbol has no home package.\n"
-"	:ANONYMOUS\n"
-"	    True if the function doesn't have any interesting name (not\n"
-"	    DEFMACRO, DEFUN, LABELS or FLET).\n"
-"	:MACRO, :FUNCTION\n"
-"	    :MACRO is a global (DEFMACRO) macro.  :FUNCTION is anything else.\n"
-"	:LOCAL, :GLOBAL\n"
-"	    :LOCAL is a LABELS or FLET.  :GLOBAL is anything else.\n"
-"	(:OR Context-Spec*)\n"
-"	    True in any specified context.\n"
-"	(:AND Context-Spec*)\n"
-"	    True only when all specs are true.\n"
-"	(:NOT Context-Spec)\n"
-"	    True when the spec is false.\n"
+"\t:INTERNAL, :EXTERNAL\n"
+"\t    True if the symbols is internal (external) in its home package.\n"
+"\t:UNINTERNED\n"
+"\t    True if the symbol has no home package.\n"
+"\t:ANONYMOUS\n"
+"\t    True if the function doesn't have any interesting name (not\n"
+"\t    DEFMACRO, DEFUN, LABELS or FLET).\n"
+"\t:MACRO, :FUNCTION\n"
+"\t    :MACRO is a global (DEFMACRO) macro.  :FUNCTION is anything else.\n"
+"\t:LOCAL, :GLOBAL\n"
+"\t    :LOCAL is a LABELS or FLET.  :GLOBAL is anything else.\n"
+"\t(:OR Context-Spec*)\n"
+"\t    True in any specified context.\n"
+"\t(:AND Context-Spec*)\n"
+"\t    True only when all specs are true.\n"
+"\t(:NOT Context-Spec)\n"
+"\t    True when the spec is false.\n"
 "        (:MEMBER Name*)\n"
-"	    True when the name is one of these names (EQUAL test.)\n"
-"	(:MATCH Pattern*)\n"
-"	    True when any of the patterns is a substring of the name.  The name\n"
-"	    is wrapped with $'s, so $FOO matches names beginning with FOO,\n"
-"	    etc."
+"\t    True when the name is one of these names (EQUAL test.)\n"
+"\t(:MATCH Pattern*)\n"
+"\t    True when any of the patterns is a substring of the name.  The name\n"
+"\t    is wrapped with $'s, so $FOO matches names beginning with FOO,\n"
+"\t    etc."
 msgstr ""
 "WITH-COMPILATION-UNIT ({Eykay Aluevay}*) Orm*Fay\n"
-"  Isthay ormfay affectsway ompilationscay atthay aketay aceplay ithinway itsway ynamicday extentway. "
-" Itway\n"
-"  isway intendedway otay ebay appedwray aroundway ethay ompilationcay ofway allway ilesfay inway ethay amesay\n"
+"  Isthay ormfay affectsway ompilationscay atthay aketay aceplay ithinway "
+"itsway ynamicday extentway.  Itway\n"
+"  isway intendedway otay ebay appedwray aroundway ethay ompilationcay ofway "
+"allway ilesfay inway ethay amesay\n"
 "  ystemsay.  Esethay eywordskay areway efinedday:\n"
 "    :OVERRIDE Ooleanbay-Ormfay\n"
-"        Oneway ofway ethay effectsway ofway isthay ormfay isway otay elayday undefinedway arningsway \n"
-"        untilway ethay endway ofway ethay ormfay, insteadway ofway ivinggay emthay atway ethay endway ofway "
-"eachway\n"
-"        ompilationcay.  Ifway OVERRIDE isway NIL (ethay efaultday), enthay ethay outermostway\n"
-"        WITH-COMPILATION-UNIT ormfay absgray ethay undefinedway arningsway.  Ecifyingspay"
-"\n"
-"        OVERRIDE uetray ausescay atthay ormfay otay abgray anyway enclosedway arningsway, evenway "
-"ifway\n"
+"        Oneway ofway ethay effectsway ofway isthay ormfay isway otay elayday "
+"undefinedway arningsway \n"
+"        untilway ethay endway ofway ethay ormfay, insteadway ofway ivinggay "
+"emthay atway ethay endway ofway eachway\n"
+"        ompilationcay.  Ifway OVERRIDE isway NIL (ethay efaultday), enthay "
+"ethay outermostway\n"
+"        WITH-COMPILATION-UNIT ormfay absgray ethay undefinedway arningsway.  "
+"Ecifyingspay\n"
+"        OVERRIDE uetray ausescay atthay ormfay otay abgray anyway "
+"enclosedway arningsway, evenway ifway\n"
 "        itway isway enclosedway ybay anotherway WITH-COMPILATION-UNIT.\n"
 "    :OPTIMIZE Eclday-Ormfay\n"
-"        Eclday-Ormfay ouldshay evaluateway otay anway OPTIMIZE eclarationday ecifierspay.  "
-"Isthay\n"
-"        eclarationday angeschay ethay `obalglay' olicypay orfay ompilationscay ithinway ethay\n"
+"        Eclday-Ormfay ouldshay evaluateway otay anway OPTIMIZE eclarationday "
+"ecifierspay.  Isthay\n"
+"        eclarationday angeschay ethay `obalglay' olicypay orfay "
+"ompilationscay ithinway ethay\n"
 "        odybay.\n"
 "    :OPTIMIZE-INTERFACE Eclday-Ormfay\n"
-"        Ikelay OPTIMIZE, exceptway atthay itway ecifiesspay ethay aluevay ofway ethay CMU "
-"extensionway\n"
-"        OPTIMIZE-INTERFACE olicypay (ichwhay ontrolscay argumentway ypetay andway yntaxsay\n"
+"        Ikelay OPTIMIZE, exceptway atthay itway ecifiesspay ethay aluevay "
+"ofway ethay CMU extensionway\n"
+"        OPTIMIZE-INTERFACE olicypay (ichwhay ontrolscay argumentway ypetay "
+"andway yntaxsay\n"
 "        eckingchay.)\n"
 "    :CONTEXT-DECLARATIONS Istlay-ofway-Ontextcay-Eclsday-Ormfay\n"
-"        Isthay isway away CMU extensionway ichwhay allowsway ompilationcay otay ebay ontrolledcay\n"
-"        ybay atternpay atchingmay onway ethay ontextcay inway ichwhay away efinitionday appearsway.  "
-"Ethay\n"
-"        argumentway ouldshay evaluateway otay away istlay ofway istslay ofway ethay ormfay:\n"
+"        Isthay isway away CMU extensionway ichwhay allowsway ompilationcay "
+"otay ebay ontrolledcay\n"
+"        ybay atternpay atchingmay onway ethay ontextcay inway ichwhay away "
+"efinitionday appearsway.  Ethay\n"
+"        argumentway ouldshay evaluateway otay away istlay ofway istslay "
+"ofway ethay ormfay:\n"
 "            (Ontextcay-Ecspay Eclareday-Ormfay+)\n"
-"        Inway ethay indicatedway ontextcay, ethay ecifiedspay eclareday ormsfay areway insertedway "
-"atway\n"
-"        ethay eadhay ofway eachway efinitionday.  Ethay eclareday ormsfay orfay allway ontextscay "
-"atthay\n"
-"	atchmay areway appendedway ogethertay, ithway earlierway eclarationsday ettinggay\n"
-"	edecencepray overway aterlay onesway.  Away implesay exampleway:\n"
+"        Inway ethay indicatedway ontextcay, ethay ecifiedspay eclareday "
+"ormsfay areway insertedway atway\n"
+"        ethay eadhay ofway eachway efinitionday.  Ethay eclareday ormsfay "
+"orfay allway ontextscay atthay\n"
+"\tatchmay areway appendedway ogethertay, ithway earlierway eclarationsday "
+"ettinggay\n"
+"\tedecencepray overway aterlay onesway.  Away implesay exampleway:\n"
 "            :ontextcay-eclarationsday\n"
 "            '((:externalway (eclareday (optimizeway (afetysay 2)))))\n"
-"        Isthay illway ausecay allway unctionsfay atthay areway amednay ybay externalway ymbolssay otay "
-"ebay\n"
-"        ompiledcay ithway SAFETY 2.  Ethay ullfay yntaxsay ofway ontextcay ecsspay isway:\n"
-"	:INTERNAL, :EXTERNAL\n"
-"	    Uetray ifway ethay ymbolssay isway internalway (externalway) inway itsway omehay ackagepay.\n"
-"	:UNINTERNED\n"
-"	    Uetray ifway ethay ymbolsay ashay onay omehay ackagepay.\n"
-"	:ANONYMOUS\n"
-"	    Uetray ifway ethay unctionfay oesnday't avehay anyway interestingway amenay (otnay\n"
-"	    DEFMACRO, DEFUN, LABELS orway FLET).\n"
-"	:MACRO, :FUNCTION\n"
-"	    :MACRO isway away obalglay (DEFMACRO) acromay.  :FUNCTION isway anythingway elseway.\n"
-"	:LOCAL, :GLOBAL\n"
-"	    :LOCAL isway away LABELS orway FLET.  :GLOBAL isway anythingway elseway.\n"
-"	(:OR Ontextcay-Ec*Spay)\n"
-"	    Uetray inway anyway ecifiedspay ontextcay.\n"
-"	(:AND Ontextcay-Ec*Spay)\n"
-"	    Uetray onlyway enwhay allway ecsspay areway uetray.\n"
-"	(:NOT Ontextcay-Ecspay)\n"
-"	    Uetray enwhay ethay ecspay isway alsefay.\n"
+"        Isthay illway ausecay allway unctionsfay atthay areway amednay ybay "
+"externalway ymbolssay otay ebay\n"
+"        ompiledcay ithway SAFETY 2.  Ethay ullfay yntaxsay ofway ontextcay "
+"ecsspay isway:\n"
+"\t:INTERNAL, :EXTERNAL\n"
+"\t    Uetray ifway ethay ymbolssay isway internalway (externalway) inway "
+"itsway omehay ackagepay.\n"
+"\t:UNINTERNED\n"
+"\t    Uetray ifway ethay ymbolsay ashay onay omehay ackagepay.\n"
+"\t:ANONYMOUS\n"
+"\t    Uetray ifway ethay unctionfay oesnday't avehay anyway interestingway "
+"amenay (otnay\n"
+"\t    DEFMACRO, DEFUN, LABELS orway FLET).\n"
+"\t:MACRO, :FUNCTION\n"
+"\t    :MACRO isway away obalglay (DEFMACRO) acromay.  :FUNCTION isway "
+"anythingway elseway.\n"
+"\t:LOCAL, :GLOBAL\n"
+"\t    :LOCAL isway away LABELS orway FLET.  :GLOBAL isway anythingway "
+"elseway.\n"
+"\t(:OR Ontextcay-Ec*Spay)\n"
+"\t    Uetray inway anyway ecifiedspay ontextcay.\n"
+"\t(:AND Ontextcay-Ec*Spay)\n"
+"\t    Uetray onlyway enwhay allway ecsspay areway uetray.\n"
+"\t(:NOT Ontextcay-Ecspay)\n"
+"\t    Uetray enwhay ethay ecspay isway alsefay.\n"
 "        (:MEMBER Ame*Nay)\n"
-"	    Uetray enwhay ethay amenay isway oneway ofway esethay amesnay (EQUAL esttay.)\n"
-"	(:MATCH Attern*Pay)\n"
-"	    Uetray enwhay anyway ofway ethay atternspay isway away ubstringsay ofway ethay amenay.  Ethay amenay\n"
-"	    isway appedwray ithway $'s, osay $FOO atchesmay amesnay eginningbay ithway FOO,\n"
-"	    etcway."
+"\t    Uetray enwhay ethay amenay isway oneway ofway esethay amesnay (EQUAL "
+"esttay.)\n"
+"\t(:MATCH Attern*Pay)\n"
+"\t    Uetray enwhay anyway ofway ethay atternspay isway away ubstringsay "
+"ofway ethay amenay.  Ethay amenay\n"
+"\t    isway appedwray ithway $'s, osay $FOO atchesmay amesnay eginningbay "
+"ithway FOO,\n"
+"\t    etcway."
 
 #: src/code/macros.lisp
 msgid "Odd number of key/value pairs: ~S."
@@ -18649,8 +21196,10 @@ msgid ""
 "The message-lookup domain used by INTL:GETTEXT and INTL:NGETTEXT.\n"
 "  Use (INTL:TEXTDOMAIN \"whatever\") in each source file to set this."
 msgstr ""
-"Ethay essagemay-ookuplay omainday usedway ybay INTL:GETTEXT andway INTL:NGETTEXT.\n"
-"  Useway (INTL:TEXTDOMAIN \"ateverwhay\") inway eachway ourcesay ilefay otay etsay isthay."
+"Ethay essagemay-ookuplay omainday usedway ybay INTL:GETTEXT andway INTL:"
+"NGETTEXT.\n"
+"  Useway (INTL:TEXTDOMAIN \"ateverwhay\") inway eachway ourcesay ilefay otay "
+"etsay isthay."
 
 #: src/code/intl.lisp
 msgid "Encountered illegal token: ="
@@ -18680,25 +21229,28 @@ msgstr "Expectingway endway ofway expressionway.  ~S."
 msgid ""
 "Look up STRING in the current message domain and return its translation."
 msgstr ""
-"Ooklay upway STRING inway ethay urrentcay essagemay omainday andway eturnray itsway anslationtray."
+"Ooklay upway STRING inway ethay urrentcay essagemay omainday andway eturnray "
+"itsway anslationtray."
 
 #: src/code/intl.lisp
-msgid ""
-"Look up the singular or plural form of a message in the current domain."
+msgid "Look up the singular or plural form of a message in the current domain."
 msgstr ""
-"Ooklay upway ethay ingularsay orway uralplay ormfay ofway away essagemay inway ethay urrentcay omainday."
+"Ooklay upway ethay ingularsay orway uralplay ormfay ofway away essagemay "
+"inway ethay urrentcay omainday."
 
 #: src/code/intl.lisp
 msgid ""
 "Look up STRING in the specified message domain and return its translation."
 msgstr ""
-"Ooklay upway STRING inway ethay ecifiedspay essagemay omainday andway eturnray itsway anslationtray."
+"Ooklay upway STRING inway ethay ecifiedspay essagemay omainday andway "
+"eturnray itsway anslationtray."
 
 #: src/code/intl.lisp
 msgid ""
 "Look up the singular or plural form of a message in the specified domain."
 msgstr ""
-"Ooklay upway ethay ingularsay orway uralplay ormfay ofway away essagemay inway ethay ecifiedspay omainday."
+"Ooklay upway ethay ingularsay orway uralplay ormfay ofway away essagemay "
+"inway ethay ecifiedspay omainday."
 
 #: src/code/intl.lisp
 msgid "_@ is a reserved reader macro prefix."
@@ -18722,26 +21274,28 @@ msgid ""
 "\n"
 "  Node is a form which is evaluated to obtain the node which the policy is "
 "for.\n"
-"  If Node is NIL, then we use the current policy as defined by *default-cook"
-"ie*\n"
+"  If Node is NIL, then we use the current policy as defined by *default-"
+"cookie*\n"
 "  and *current-cookie*.  This option is only well defined during IR1\n"
 "  conversion."
 msgstr ""
 "Olicypay Odenay Ondition*Cay\n"
-"  Esttay etherwhay omesay onditionscay applyway otay ethay urrentcay ompilercay olicypay orfay "
-"Odenay.\n"
-"  Eachway onditioncay isway away edicatepray ormfay ichwhay accessesway ethay olicypay aluesvay ybay\n"
-"  eferringray otay emthay asway ethay ariablesvay SPEED, SPACE, SAFETY, CSPEED, BREVITY "
-"andway\n"
-"  DEBUG.  Ethay esultsray ofway allway ethay onditionscay areway ombinedcay ithway AND andway "
-"eturnedray\n"
+"  Esttay etherwhay omesay onditionscay applyway otay ethay urrentcay "
+"ompilercay olicypay orfay Odenay.\n"
+"  Eachway onditioncay isway away edicatepray ormfay ichwhay accessesway "
+"ethay olicypay aluesvay ybay\n"
+"  eferringray otay emthay asway ethay ariablesvay SPEED, SPACE, SAFETY, "
+"CSPEED, BREVITY andway\n"
+"  DEBUG.  Ethay esultsray ofway allway ethay onditionscay areway ombinedcay "
+"ithway AND andway eturnedray\n"
 "  asway ethay esultray.\n"
 "\n"
-"  Odenay isway away ormfay ichwhay isway evaluatedway otay obtainway ethay odenay ichwhay ethay olicypay isway "
-"orfay.\n"
-"  Ifway Odenay isway NIL, enthay eway useway ethay urrentcay olicypay asway efinedday ybay default-cook*ay"
-"ie*way\n"
-"  andway *current-cookie*.  Isthay optionway isway onlyway ellway efinedday uringday IR1\n"
+"  Odenay isway away ormfay ichwhay isway evaluatedway otay obtainway ethay "
+"odenay ichwhay ethay olicypay isway orfay.\n"
+"  Ifway Odenay isway NIL, enthay eway useway ethay urrentcay olicypay asway "
+"efinedday ybay default-cook*ayie*way\n"
+"  andway *current-cookie*.  Isthay optionway isway onlyway ellway efinedday "
+"uringday IR1\n"
 "  onversioncay."
 
 #: src/compiler/macros.lisp
@@ -18754,23 +21308,26 @@ msgid ""
 "                      [Doc-String] Form*\n"
 "  Define a function that converts a Special-Form or other magical thing "
 "into\n"
-"  IR1.  Lambda-List is a defmacro style lambda list.  Start-Var and Cont-Var"
-"\n"
+"  IR1.  Lambda-List is a defmacro style lambda list.  Start-Var and Cont-"
+"Var\n"
 "  are bound to the start and result continuations for the resulting IR1.\n"
 "  This keyword is defined:\n"
 "      Kind\n"
 "          The function kind to associate with Name (default :special-form)."
 msgstr ""
-"Efday-IR1-Anslatortray Amenay (Ambdalay-Istlay Tartsay-Arvay Ontcay-Arvay {Eykay Aluevay}*)\n"
+"Efday-IR1-Anslatortray Amenay (Ambdalay-Istlay Tartsay-Arvay Ontcay-Arvay "
+"{Eykay Aluevay}*)\n"
 "                      [Ocday-Ingstray] Orm*Fay\n"
-"  Efineday away unctionfay atthay onvertscay away Ecialspay-Ormfay orway otherway agicalmay ingthay "
-"intoway\n"
-"  IR1.  Ambdalay-Istlay isway away efmacroday tylesay ambdalay istlay.  Tartsay-Arvay andway Ontcay-Arvay"
-"\n"
-"  areway oundbay otay ethay tartsay andway esultray ontinuationscay orfay ethay esultingray IR1.\n"
+"  Efineday away unctionfay atthay onvertscay away Ecialspay-Ormfay orway "
+"otherway agicalmay ingthay intoway\n"
+"  IR1.  Ambdalay-Istlay isway away efmacroday tylesay ambdalay istlay.  "
+"Tartsay-Arvay andway Ontcay-Arvay\n"
+"  areway oundbay otay ethay tartsay andway esultray ontinuationscay orfay "
+"ethay esultingray IR1.\n"
 "  Isthay eywordkay isway efinedday:\n"
 "      Indkay\n"
-"          Ethay unctionfay indkay otay associateway ithway Amenay (efaultday :ecialspay-ormfay)."
+"          Ethay unctionfay indkay otay associateway ithway Amenay "
+"(efaultday :ecialspay-ormfay)."
 
 #: src/compiler/macros.lisp
 msgid ""
@@ -18784,39 +21341,41 @@ msgid ""
 "  the supplied arguments are not compatible with the specified lambda-list,\n"
 "  then the transform automatically passes.\n"
 "  \n"
-"  Source-Transforms may only be defined for functions.  Source transformatio"
-"n\n"
-"  is not attempted if the function is declared Notinline.  Source transforms"
-"\n"
+"  Source-Transforms may only be defined for functions.  Source "
+"transformation\n"
+"  is not attempted if the function is declared Notinline.  Source "
+"transforms\n"
 "  should not examine their arguments.  If it matters how the function is "
 "used,\n"
 "  then Deftransform should be used to define an IR1 transformation.\n"
 "  \n"
 "  If the desirability of the transformation depends on the current Optimize\n"
-"  parameters, then the Policy macro should be used to determine when to "
-"pass."
+"  parameters, then the Policy macro should be used to determine when to pass."
 msgstr ""
 "Efday-Ourcesay-Ansformtray Amenay Ambdalay-Istlay Orm*Fay\n"
-"  Efineday away acromay-ikelay ourcesay-otay-ourcesay ansformationtray orfay ethay unctionfay "
-"Amenay.\n"
-"  Away ourcesay ansformtray aymay \"asspay\" ybay eturningray away onnay-ilnay econdsay aluevay.  Ifway "
-"ethay\n"
-"  ansformtray assespay, enthay ethay ormfay isway onvertedcay asway away ormalnay unctionfay allcay.  "
-"Ifway\n"
-"  ethay uppliedsay argumentsway areway otnay ompatiblecay ithway ethay ecifiedspay ambdalay-istlay,\n"
+"  Efineday away acromay-ikelay ourcesay-otay-ourcesay ansformationtray orfay "
+"ethay unctionfay Amenay.\n"
+"  Away ourcesay ansformtray aymay \"asspay\" ybay eturningray away onnay-"
+"ilnay econdsay aluevay.  Ifway ethay\n"
+"  ansformtray assespay, enthay ethay ormfay isway onvertedcay asway away "
+"ormalnay unctionfay allcay.  Ifway\n"
+"  ethay uppliedsay argumentsway areway otnay ompatiblecay ithway ethay "
+"ecifiedspay ambdalay-istlay,\n"
 "  enthay ethay ansformtray automaticallyway assespay.\n"
 "  \n"
-"  Ourcesay-Ansformstray aymay onlyway ebay efinedday orfay unctionsfay.  Ourcesay ansformatiotray"
-"n\n"
-"  isway otnay attemptedway ifway ethay unctionfay isway eclaredday Otinlinenay.  Ourcesay ansformstray"
-"\n"
-"  ouldshay otnay examineway eirthay argumentsway.  Ifway itway attersmay owhay ethay unctionfay isway "
-"usedway,\n"
-"  enthay Eftransformday ouldshay ebay usedway otay efineday anway IR1 ansformationtray.\n"
+"  Ourcesay-Ansformstray aymay onlyway ebay efinedday orfay unctionsfay.  "
+"Ourcesay ansformatiotrayn\n"
+"  isway otnay attemptedway ifway ethay unctionfay isway eclaredday "
+"Otinlinenay.  Ourcesay ansformstray\n"
+"  ouldshay otnay examineway eirthay argumentsway.  Ifway itway attersmay "
+"owhay ethay unctionfay isway usedway,\n"
+"  enthay Eftransformday ouldshay ebay usedway otay efineday anway IR1 "
+"ansformationtray.\n"
 "  \n"
-"  Ifway ethay esirabilityday ofway ethay ansformationtray ependsday onway ethay urrentcay Optimizeway\n"
-"  arameterspay, enthay ethay Olicypay acromay ouldshay ebay usedway otay etermineday enwhay otay "
-"asspay."
+"  Ifway ethay esirabilityday ofway ethay ansformationtray ependsday onway "
+"ethay urrentcay Optimizeway\n"
+"  arameterspay, enthay ethay Olicypay acromay ouldshay ebay usedway otay "
+"etermineday enwhay otay asspay."
 
 #: src/compiler/macros.lisp
 msgid ""
@@ -18825,7 +21384,8 @@ msgid ""
 "  code.  Lambda-List is a defmacro style lambda list."
 msgstr ""
 "Efday-Imitivepray-Anslatortray Amenay Ambdalay-Istlay Orm*Fay\n"
-"  Efineday away unctionfay atthay onvertscay away useway ofway (%PRIMITIVE Amenay ...) intoway Isplay\n"
+"  Efineday away unctionfay atthay onvertscay away useway ofway (%PRIMITIVE "
+"Amenay ...) intoway Isplay\n"
 "  odecay.  Ambdalay-Istlay isway away efmacroday tylesay ambdalay istlay."
 
 #: src/compiler/macros.lisp
@@ -18842,8 +21402,8 @@ msgid ""
 "  We parse the call and bind each of the lambda-list variables to the\n"
 "  continuation which represents the value of the argument.  When parsing "
 "the\n"
-"  call, we ignore the defaults, and always bind the variables for unsupplied"
-"\n"
+"  call, we ignore the defaults, and always bind the variables for "
+"unsupplied\n"
 "  arguments to NIL.  If a required argument is missing, an unknown keyword "
 "is\n"
 "  supplied, or an argument keyword is not a constant, then the transform\n"
@@ -18861,8 +21421,8 @@ msgid ""
 "  the lambda, and automatically insert declarations of the argument and "
 "result\n"
 "  types.  If the second value of the body is non-null, then it is a list of\n"
-"  declarations which are to be inserted at the head of the lambda.  Automati"
-"c\n"
+"  declarations which are to be inserted at the head of the lambda.  "
+"Automatic\n"
 "  lambda generation may be inhibited by explicitly returning a lambda from "
 "the\n"
 "  body.\n"
@@ -18891,7 +21451,7 @@ msgid ""
 "then\n"
 "              the transform automatically passes.\n"
 "    :Eval-Name\n"
-"    	    - The name and argument/result types are actually forms to be\n"
+"    \t    - The name and argument/result types are actually forms to be\n"
 "              evaluated.  Useful for getting closures that transform "
 "similar\n"
 "              functions.\n"
@@ -18901,93 +21461,112 @@ msgid ""
 "may\n"
 "              be later instantiated with %Deftransform.\n"
 "    :Important\n"
-"            - If supplied and non-NIL, note this transform as ``important,''"
-"\n"
+"            - If supplied and non-NIL, note this transform as "
+"``important,''\n"
 "              which means effeciency notes will be generated when this\n"
-"              transform fails even if brevity=speed (but not if brevity>spee"
-"d)\n"
+"              transform fails even if brevity=speed (but not if "
+"brevity>speed)\n"
 "    :When {:Native | :Byte | :Both}\n"
 "            - Indicates whether this transform applies to native code,\n"
 "              byte-code or both (default :native.)"
 msgstr ""
-"Eftransformday Amenay (Ambdalay-Istlay [Argway-Ypestay] [Esultray-Ypetay] {Eykay Aluevay}*)\n"
+"Eftransformday Amenay (Ambdalay-Istlay [Argway-Ypestay] [Esultray-Ypetay] "
+"{Eykay Aluevay}*)\n"
 "               Eclaration*Day [Ocday-Ingstray] Orm*Fay\n"
-"  Efineday anway IR1 ansformationtray orfay Amenay.  Anway IR1 ansformationtray omputescay away\n"
-"  ambdalay atthay eplacesray ethay unctionfay ariablevay eferenceray orfay ethay allcay.  Away\n"
-"  ansformtray aymay asspay (ecideday otnay otay ansformtray ethay allcay) ybay allingcay ethay Ivegay-"
-"Upway\n"
-"  unctionfay.  Ambdalay-Istlay othbay eterminesday owhay ethay urrentcay allcay isway arsedpay andway\n"
+"  Efineday anway IR1 ansformationtray orfay Amenay.  Anway IR1 "
+"ansformationtray omputescay away\n"
+"  ambdalay atthay eplacesray ethay unctionfay ariablevay eferenceray orfay "
+"ethay allcay.  Away\n"
+"  ansformtray aymay asspay (ecideday otnay otay ansformtray ethay allcay) "
+"ybay allingcay ethay Ivegay-Upway\n"
+"  unctionfay.  Ambdalay-Istlay othbay eterminesday owhay ethay urrentcay "
+"allcay isway arsedpay andway\n"
 "  ecifiesspay ethay Ambdalay-Istlay orfay ethay esultingray ambdalay.\n"
 "\n"
-"  Eway arsepay ethay allcay andway indbay eachway ofway ethay ambdalay-istlay ariablesvay otay ethay\n"
-"  ontinuationcay ichwhay epresentsray ethay aluevay ofway ethay argumentway.  Enwhay arsingpay "
-"ethay\n"
-"  allcay, eway ignoreway ethay efaultsday, andway alwaysway indbay ethay ariablesvay orfay unsuppliedway"
-"\n"
-"  argumentsway otay NIL.  Ifway away equiredray argumentway isway issingmay, anway unknownway eywordkay "
-"isway\n"
-"  uppliedsay, orway anway argumentway eywordkay isway otnay away onstantcay, enthay ethay ansformtray\n"
-"  automaticallyway assespay.  Ethay Eclarationsday applyway otay ethay indingsbay ademay ybay\n"
-"  Eftransformday atway ansformationtray imetay, atherray anthay otay ethay ariablesvay ofway ethay\n"
-"  esultingray ambdalay.  Oundbay-utbay-otnay-eferencedray arningsway areway uppressedsay orfay "
-"ethay\n"
-"  ambdalay-istlay ariablesvay.  Ethay Ocday-Ingstray isway usedway enwhay intingpray efficiencyway "
-"otesnay\n"
+"  Eway arsepay ethay allcay andway indbay eachway ofway ethay ambdalay-"
+"istlay ariablesvay otay ethay\n"
+"  ontinuationcay ichwhay epresentsray ethay aluevay ofway ethay "
+"argumentway.  Enwhay arsingpay ethay\n"
+"  allcay, eway ignoreway ethay efaultsday, andway alwaysway indbay ethay "
+"ariablesvay orfay unsuppliedway\n"
+"  argumentsway otay NIL.  Ifway away equiredray argumentway isway issingmay, "
+"anway unknownway eywordkay isway\n"
+"  uppliedsay, orway anway argumentway eywordkay isway otnay away onstantcay, "
+"enthay ethay ansformtray\n"
+"  automaticallyway assespay.  Ethay Eclarationsday applyway otay ethay "
+"indingsbay ademay ybay\n"
+"  Eftransformday atway ansformationtray imetay, atherray anthay otay ethay "
+"ariablesvay ofway ethay\n"
+"  esultingray ambdalay.  Oundbay-utbay-otnay-eferencedray arningsway areway "
+"uppressedsay orfay ethay\n"
+"  ambdalay-istlay ariablesvay.  Ethay Ocday-Ingstray isway usedway enwhay "
+"intingpray efficiencyway otesnay\n"
 "  aboutway ethay efinedday ansformtray.\n"
 "\n"
-"  Ormallynay, ethay odybay evaluatesway otay away ormfay ichwhay ecomesbay ethay odybay ofway anway\n"
-"  automaticallyway onstructedcay ambdalay.  Eway akemay Ambdalay-Istlay ethay ambdalay-istlay "
-"orfay\n"
-"  ethay ambdalay, andway automaticallyway insertway eclarationsday ofway ethay argumentway andway "
-"esultray\n"
-"  ypestay.  Ifway ethay econdsay aluevay ofway ethay odybay isway onnay-ullnay, enthay itway isway away istlay ofway\n"
-"  eclarationsday ichwhay areway otay ebay insertedway atway ethay eadhay ofway ethay ambdalay.  Automatiway"
-"c\n"
-"  ambdalay enerationgay aymay ebay inhibitedway ybay explicitlyway eturningray away ambdalay omfray "
-"ethay\n"
+"  Ormallynay, ethay odybay evaluatesway otay away ormfay ichwhay ecomesbay "
+"ethay odybay ofway anway\n"
+"  automaticallyway onstructedcay ambdalay.  Eway akemay Ambdalay-Istlay "
+"ethay ambdalay-istlay orfay\n"
+"  ethay ambdalay, andway automaticallyway insertway eclarationsday ofway "
+"ethay argumentway andway esultray\n"
+"  ypestay.  Ifway ethay econdsay aluevay ofway ethay odybay isway onnay-"
+"ullnay, enthay itway isway away istlay ofway\n"
+"  eclarationsday ichwhay areway otay ebay insertedway atway ethay eadhay "
+"ofway ethay ambdalay.  Automatiwayc\n"
+"  ambdalay enerationgay aymay ebay inhibitedway ybay explicitlyway "
+"eturningray away ambdalay omfray ethay\n"
 "  odybay.\n"
 "\n"
-"  Ethay Argway-Ypestay andway Esultray-Ypetay areway usedway otay eatecray away unctionfay ypetay ichwhay "
-"ethay\n"
-"  allcay ustmay atisfysay eforebay ansformationtray isway attemptedway.  Ethay unctionfay ypetay\n"
-"  ecifierspay isway onstructedcay ybay appingwray (FUNCTION ...) aroundway esethay aluesvay, "
-"osay\n"
-"  ethay acklay ofway away estrictionray aymay ebay ecifiedspay ybay omittingway ethay argumentway orway\n"
-"  upplyingsay *.  Ethay argumentway yntaxsay ecifiedspay inway ethay Argway-Ypestay eednay otnay ebay "
-"ethay\n"
-"  amesay asway atthay inway ethay Ambdalay-Istlay, utbay ethay ansformtray illway evernay appenhay ifway\n"
-"  ethay yntaxessay ancay't ebay atisfiedsay imultaneouslysay.  Ifway erethay isway anway existingway\n"
-"  ansformtray orfay ethay amesay unctionfay atthay ashay ethay amesay ypetay, enthay itway isway "
-"eplacedray\n"
+"  Ethay Argway-Ypestay andway Esultray-Ypetay areway usedway otay eatecray "
+"away unctionfay ypetay ichwhay ethay\n"
+"  allcay ustmay atisfysay eforebay ansformationtray isway attemptedway.  "
+"Ethay unctionfay ypetay\n"
+"  ecifierspay isway onstructedcay ybay appingwray (FUNCTION ...) aroundway "
+"esethay aluesvay, osay\n"
+"  ethay acklay ofway away estrictionray aymay ebay ecifiedspay ybay "
+"omittingway ethay argumentway orway\n"
+"  upplyingsay *.  Ethay argumentway yntaxsay ecifiedspay inway ethay Argway-"
+"Ypestay eednay otnay ebay ethay\n"
+"  amesay asway atthay inway ethay Ambdalay-Istlay, utbay ethay ansformtray "
+"illway evernay appenhay ifway\n"
+"  ethay yntaxessay ancay't ebay atisfiedsay imultaneouslysay.  Ifway erethay "
+"isway anway existingway\n"
+"  ansformtray orfay ethay amesay unctionfay atthay ashay ethay amesay "
+"ypetay, enthay itway isway eplacedray\n"
 "  ithway ethay ewnay efinitionday.\n"
 "\n"
 "  Esethay areway ethay egallay eywordkay optionsway:\n"
-"    :Esultray - Away ariablevay ichwhay isway oundbay otay ethay esultray ontinuationcay.\n"
-"    :Odenay   - Away ariablevay ichwhay isway oundbay otay ethay ombinationcay odenay orfay ethay "
-"allcay.\n"
-"    :Olicypay - Away ormfay ichwhay isway uppliedsay otay ethay Olicypay acromay otay etermineday "
-"etherwhay\n"
-"              isthay ansformationtray isway appropriateway.  Ifway ethay esultray isway alsefay, "
-"enthay\n"
+"    :Esultray - Away ariablevay ichwhay isway oundbay otay ethay esultray "
+"ontinuationcay.\n"
+"    :Odenay   - Away ariablevay ichwhay isway oundbay otay ethay "
+"ombinationcay odenay orfay ethay allcay.\n"
+"    :Olicypay - Away ormfay ichwhay isway uppliedsay otay ethay Olicypay "
+"acromay otay etermineday etherwhay\n"
+"              isthay ansformationtray isway appropriateway.  Ifway ethay "
+"esultray isway alsefay, enthay\n"
 "              ethay ansformtray automaticallyway assespay.\n"
 "    :Evalway-Amenay\n"
-"    	    - Ethay amenay andway argumentway/esultray ypestay areway actuallyway ormsfay otay ebay\n"
-"              evaluatedway.  Usefulway orfay ettinggay osuresclay atthay ansformtray "
-"imilarsay\n"
+"    \t    - Ethay amenay andway argumentway/esultray ypestay areway "
+"actuallyway ormsfay otay ebay\n"
+"              evaluatedway.  Usefulway orfay ettinggay osuresclay atthay "
+"ansformtray imilarsay\n"
 "              unctionsfay.\n"
 "    :Efunday-Onlyway\n"
-"            - Onday't actuallyway instantiateway away ansformtray, insteadway ustjay DEFUN\n"
-"              Amenay ithway ethay ecifiedspay ansformtray efinitionday unctionfay.  Isthay "
-"aymay\n"
+"            - Onday't actuallyway instantiateway away ansformtray, "
+"insteadway ustjay DEFUN\n"
+"              Amenay ithway ethay ecifiedspay ansformtray efinitionday "
+"unctionfay.  Isthay aymay\n"
 "              ebay aterlay instantiatedway ithway %Eftransformday.\n"
 "    :Importantway\n"
-"            - Ifway uppliedsay andway onnay-NIL, otenay isthay ansformtray asway ``importantway,''"
-"\n"
-"              ichwhay eansmay effeciencyway otesnay illway ebay eneratedgay enwhay isthay\n"
-"              ansformtray ailsfay evenway ifway evitybray=eedspay (utbay otnay ifway evitybray>eespay"
-"d)\n"
+"            - Ifway uppliedsay andway onnay-NIL, otenay isthay ansformtray "
+"asway ``importantway,''\n"
+"              ichwhay eansmay effeciencyway otesnay illway ebay eneratedgay "
+"enwhay isthay\n"
+"              ansformtray ailsfay evenway ifway evitybray=eedspay (utbay "
+"otnay ifway evitybray>eespayd)\n"
 "    :Enwhay {:Ativenay | :Ytebay | :Othbay}\n"
-"            - Indicatesway etherwhay isthay ansformtray appliesway otay ativenay odecay,\n"
+"            - Indicatesway etherwhay isthay ansformtray appliesway otay "
+"ativenay odecay,\n"
 "              ytebay-odecay orway othbay (efaultday :ativenay.)"
 
 #: src/compiler/macros.lisp
@@ -18998,8 +21577,8 @@ msgstr "Ancay't ecifyspay othbay DEFUN-ONLY andway EVAL-NAME."
 msgid ""
 "Defknown Name Arg-Types Result-Type [Attributes] {Key Value}* \n"
 "  Declare the function Name to be a known function.  We construct a type\n"
-"  specifier for the function by wrapping (FUNCTION ...) around the Arg-Types"
-"\n"
+"  specifier for the function by wrapping (FUNCTION ...) around the Arg-"
+"Types\n"
 "  and Result-Type.  Attributes is a an unevaluated list of the boolean\n"
 "  attributes that the function has.  These attributes are meaningful here:\n"
 "      call\n"
@@ -19040,73 +21619,86 @@ msgid ""
 "\n"
 "      predicate\n"
 "          A true predicate likely to be open-coded.  This is a hint to IR1\n"
-"	  conversion that it should ensure calls always appear as an IF test.\n"
-"	  Not usually specified to Defknown, since this is implementation\n"
-"	  dependent, and is usually automatically set by the Define-VOP\n"
-"	  :Conditional option.\n"
+"\t  conversion that it should ensure calls always appear as an IF test.\n"
+"\t  Not usually specified to Defknown, since this is implementation\n"
+"\t  dependent, and is usually automatically set by the Define-VOP\n"
+"\t  :Conditional option.\n"
 "\n"
 "  Name may also be a list of names, in which case the same information is "
 "given\n"
 "  to all the names.  The keywords specify the initial values for various\n"
 "  optimizers that the function might have."
 msgstr ""
-"Efknownday Amenay Argway-Ypestay Esultray-Ypetay [Attributesway] {Eykay Aluevay}* \n"
-"  Eclareday ethay unctionfay Amenay otay ebay away nownkay unctionfay.  Eway onstructcay away ypetay\n"
-"  ecifierspay orfay ethay unctionfay ybay appingwray (FUNCTION ...) aroundway ethay Argway-Ypestay"
-"\n"
-"  andway Esultray-Ypetay.  Attributesway isway away anway unevaluatedway istlay ofway ethay ooleanbay\n"
-"  attributesway atthay ethay unctionfay ashay.  Esethay attributesway areway eaningfulmay erehay:\n"
+"Efknownday Amenay Argway-Ypestay Esultray-Ypetay [Attributesway] {Eykay "
+"Aluevay}* \n"
+"  Eclareday ethay unctionfay Amenay otay ebay away nownkay unctionfay.  Eway "
+"onstructcay away ypetay\n"
+"  ecifierspay orfay ethay unctionfay ybay appingwray (FUNCTION ...) "
+"aroundway ethay Argway-Ypestay\n"
+"  andway Esultray-Ypetay.  Attributesway isway away anway unevaluatedway "
+"istlay ofway ethay ooleanbay\n"
+"  attributesway atthay ethay unctionfay ashay.  Esethay attributesway areway "
+"eaningfulmay erehay:\n"
 "      allcay\n"
-"         Aymay allcay unctionsfay atthay areway assedpay asway argumentsway.  Inway orderway otay "
-"etermineday\n"
-"         atwhay otherway effectsway areway esentpray, eway ustmay indfay ethay effectsway ofway allway "
-"argumentsway\n"
+"         Aymay allcay unctionsfay atthay areway assedpay asway "
+"argumentsway.  Inway orderway otay etermineday\n"
+"         atwhay otherway effectsway areway esentpray, eway ustmay indfay "
+"ethay effectsway ofway allway argumentsway\n"
 "         atthay aymay ebay unctionsfay.\n"
 "        \n"
 "      unsafeway\n"
-"         Aymay incorporateway argumentsway inway ethay esultray orway omehowsay asspay emthay "
-"upwardway.\n"
+"         Aymay incorporateway argumentsway inway ethay esultray orway "
+"omehowsay asspay emthay upwardway.\n"
 "        \n"
 "      unwindway\n"
-"         Aymay ailfay otay eturnray uringday orrectcay executionway.  Errorsway areway O.K.\n"
+"         Aymay ailfay otay eturnray uringday orrectcay executionway.  "
+"Errorsway areway O.K.\n"
 "        \n"
 "      anyway\n"
-"         Ethay (efaultday) orstway asecay.  Includesway allway ethay otherway adbay ingsthay, usplay "
-"anyway\n"
+"         Ethay (efaultday) orstway asecay.  Includesway allway ethay "
+"otherway adbay ingsthay, usplay anyway\n"
 "         otherway ossiblepay adbay ingthay.\n"
 "        \n"
 "      oldablefay\n"
-"         Aymay ebay onstantcay-oldedfay.  Ethay unctionfay ashay onay idesay effectsway, utbay aymay "
-"ebay\n"
-"         affectedway ybay idesay effectsway onway ethay argumentsway.  e.g. SVREF, MAPC.\n"
+"         Aymay ebay onstantcay-oldedfay.  Ethay unctionfay ashay onay idesay "
+"effectsway, utbay aymay ebay\n"
+"         affectedway ybay idesay effectsway onway ethay argumentsway.  e.g. "
+"SVREF, MAPC.\n"
 "        \n"
 "      ushableflay\n"
-"         Aymay ebay eliminatedway ifway aluevay isway unusedway.  Ethay unctionfay ashay onay idesay "
-"effectsway\n"
-"         exceptway ossiblypay CONS.  Ifway away unctionfay isway efinedday otay ignalsay errorsway, "
-"enthay\n"
-"         itway isway otnay ushableflay evenway ifway itway isway ovablemay orway oldablefay.\n"
+"         Aymay ebay eliminatedway ifway aluevay isway unusedway.  Ethay "
+"unctionfay ashay onay idesay effectsway\n"
+"         exceptway ossiblypay CONS.  Ifway away unctionfay isway efinedday "
+"otay ignalsay errorsway, enthay\n"
+"         itway isway otnay ushableflay evenway ifway itway isway ovablemay "
+"orway oldablefay.\n"
 "        \n"
 "      ovablemay\n"
-"         Aymay ebay ovedmay ithway impunityway.  Ashay onay idesay effectsway exceptway ossiblypay "
-"CONS,\n"
+"         Aymay ebay ovedmay ithway impunityway.  Ashay onay idesay "
+"effectsway exceptway ossiblypay CONS,\n"
 "         andway isway affectedway onlyway ybay itsway argumentsway.\n"
 "\n"
 "      edicatepray\n"
-"          Away uetray edicatepray ikelylay otay ebay openway-odedcay.  Isthay isway away inthay otay IR1\n"
-"	  onversioncay atthay itway ouldshay ensureway allscay alwaysway appearway asway anway IF esttay.\n"
-"	  Otnay usuallyway ecifiedspay otay Efknownday, incesay isthay isway implementationway\n"
-"	  ependentday, andway isway usuallyway automaticallyway etsay ybay ethay Efineday-VOP\n"
-"	  :Onditionalcay optionway.\n"
-"\n"
-"  Amenay aymay alsoway ebay away istlay ofway amesnay, inway ichwhay asecay ethay amesay informationway isway "
-"ivengay\n"
-"  otay allway ethay amesnay.  Ethay eywordskay ecifyspay ethay initialway aluesvay orfay ariousvay\n"
+"          Away uetray edicatepray ikelylay otay ebay openway-odedcay.  "
+"Isthay isway away inthay otay IR1\n"
+"\t  onversioncay atthay itway ouldshay ensureway allscay alwaysway appearway "
+"asway anway IF esttay.\n"
+"\t  Otnay usuallyway ecifiedspay otay Efknownday, incesay isthay isway "
+"implementationway\n"
+"\t  ependentday, andway isway usuallyway automaticallyway etsay ybay ethay "
+"Efineday-VOP\n"
+"\t  :Onditionalcay optionway.\n"
+"\n"
+"  Amenay aymay alsoway ebay away istlay ofway amesnay, inway ichwhay asecay "
+"ethay amesay informationway isway ivengay\n"
+"  otay allway ethay amesnay.  Ethay eywordskay ecifyspay ethay initialway "
+"aluesvay orfay ariousvay\n"
 "  optimizersway atthay ethay unctionfay ightmay avehay."
 
 #: src/compiler/macros.lisp
 msgid "Function cannot have both good and bad attributes: ~S"
-msgstr "Unctionfay annotcay avehay othbay oodgay andway adbay attributesway: ~S"
+msgstr ""
+"Unctionfay annotcay avehay othbay oodgay andway adbay attributesway: ~S"
 
 #: src/compiler/macros.lisp
 msgid ""
@@ -19136,26 +21728,33 @@ msgid ""
 msgstr ""
 "Efoptimizerday (Unctionfay Indkay) (Ambdalay-Istlay [Odenay-Arvay] Ar*Vay)\n"
 "                Eclaration*Day Orm*Fay\n"
-"  Efineday omesay Indkay ofway optimizerway orfay ethay amednay Unctionfay.  Unctionfay ustmay ebay away\n"
-"  nownkay unctionfay.  Ambdalay-Istlay isway usedway otay arsepay ethay argumentsway otay ethay\n"
-"  ombinationcay asway inway Eftransformday.  Ifway ethay argumentway yntaxsay isway invalidway orway "
-"erethay\n"
+"  Efineday omesay Indkay ofway optimizerway orfay ethay amednay Unctionfay.  "
+"Unctionfay ustmay ebay away\n"
+"  nownkay unctionfay.  Ambdalay-Istlay isway usedway otay arsepay ethay "
+"argumentsway otay ethay\n"
+"  ombinationcay asway inway Eftransformday.  Ifway ethay argumentway "
+"yntaxsay isway invalidway orway erethay\n"
 "  areway onnay-onstantcay eyskay, enthay eway implysay eturnray NIL.\n"
 "\n"
-"  Ethay unctionfay isway DEFUN'edway asway Unctionfay-Indkay-OPTIMIZER.  Ossiblepay indskay areway\n"
-"  DERIVE-TYPE, OPTIMIZER, LTN-ANNOTATE andway IR2-CONVERT.  Ifway away ymbolsay isway\n"
-"  ecifiedspay insteadway ofway away (Unctionfay Indkay) istlay, enthay eway ustjay oday away DEFUN ithway "
-"ethay\n"
-"  ymbolsay asway itsway amenay, andway onday't oday anythingway ithway ethay efinitionday.  Isthay isway\n"
-"  usefulway orfay eatingcray optimizersway otay ebay assedpay ybay amenay otay DEFKNOWN.\n"
-"\n"
-"  Ifway uppliedsay, Odenay-Arvay isway oundbay otay ethay ombinationcay odenay eingbay optimizedway.  "
-"Ifway\n"
-"  additionalway Arsvay areway uppliedsay, enthay eythay areway usedway asway ethay estray ofway ethay "
-"optimizerway\n"
-"  unctionfay's ambdalay-istlay.  LTN-ANNOTATE ethodsmay areway assedpay anway additionalway "
-"POLICY\n"
-"  argumentway, andway IR2-CONVERT ethodsmay areway assedpay anway additionalway IR2-BLOCK\n"
+"  Ethay unctionfay isway DEFUN'edway asway Unctionfay-Indkay-OPTIMIZER.  "
+"Ossiblepay indskay areway\n"
+"  DERIVE-TYPE, OPTIMIZER, LTN-ANNOTATE andway IR2-CONVERT.  Ifway away "
+"ymbolsay isway\n"
+"  ecifiedspay insteadway ofway away (Unctionfay Indkay) istlay, enthay eway "
+"ustjay oday away DEFUN ithway ethay\n"
+"  ymbolsay asway itsway amenay, andway onday't oday anythingway ithway ethay "
+"efinitionday.  Isthay isway\n"
+"  usefulway orfay eatingcray optimizersway otay ebay assedpay ybay amenay "
+"otay DEFKNOWN.\n"
+"\n"
+"  Ifway uppliedsay, Odenay-Arvay isway oundbay otay ethay ombinationcay "
+"odenay eingbay optimizedway.  Ifway\n"
+"  additionalway Arsvay areway uppliedsay, enthay eythay areway usedway asway "
+"ethay estray ofway ethay optimizerway\n"
+"  unctionfay's ambdalay-istlay.  LTN-ANNOTATE ethodsmay areway assedpay "
+"anway additionalway POLICY\n"
+"  argumentway, andway IR2-CONVERT ethodsmay areway assedpay anway "
+"additionalway IR2-BLOCK\n"
 "  argumentway."
 
 #: src/compiler/macros.lisp
@@ -19173,11 +21772,12 @@ msgid ""
 "\n"
 "  If supplied, Result-Form is the value to return."
 msgstr ""
-"Oday-Ocksblay (Ockblay-Arvay Omponentcay [Endsway] [Esultray-Ormfay]) {Eclarationday}* {Ormfay}*\n"
-"  Iterateway overway ethay ocksblay inway away omponentcay, indingbay Ockblay-Arvay otay eachway ockblay "
-"inway\n"
-"  urntay.  Ethay aluevay ofway Endsway eterminesday etherwhay otay iterateway overway ummyday eadhay "
-"andway\n"
+"Oday-Ocksblay (Ockblay-Arvay Omponentcay [Endsway] [Esultray-Ormfay]) "
+"{Eclarationday}* {Ormfay}*\n"
+"  Iterateway overway ethay ocksblay inway away omponentcay, indingbay "
+"Ockblay-Arvay otay eachway ockblay inway\n"
+"  urntay.  Ethay aluevay ofway Endsway eterminesday etherwhay otay "
+"iterateway overway ummyday eadhay andway\n"
 "  ailtay ocksblay:\n"
 "    NIL   -- Kipsay Eadhay andway Ailtay (ethay efaultday)\n"
 "    :Eadhay -- Oday eadhay utbay kipsay ailtay\n"
@@ -19196,19 +21796,21 @@ msgid ""
 "* {Form}*\n"
 "  Like Do-Blocks, only iterate over the blocks in reverse order."
 msgstr ""
-"Oday-Ocksblay-Ackwardsbay (Ockblay-Arvay Omponentcay [Endsway] [Esultray-Ormfay]) {Eclarationday}"
-"* {Ormfay}*\n"
-"  Ikelay Oday-Ocksblay, onlyway iterateway overway ethay ocksblay inway everseray orderway."
+"Oday-Ocksblay-Ackwardsbay (Ockblay-Arvay Omponentcay [Endsway] [Esultray-"
+"Ormfay]) {Eclarationday}* {Ormfay}*\n"
+"  Ikelay Oday-Ocksblay, onlyway iterateway overway ethay ocksblay inway "
+"everseray orderway."
 
 #: src/compiler/macros.lisp
 msgid ""
 "Do-Uses (Node-Var Continuation [Result]) {Declaration}* {Form}*\n"
-"  Iterate over the uses of Continuation, binding Node to each one succesivel"
-"y."
+"  Iterate over the uses of Continuation, binding Node to each one "
+"succesively."
 msgstr ""
-"Oday-Usesway (Odenay-Arvay Ontinuationcay [Esultray]) {Eclarationday}* {Ormfay}*\n"
-"  Iterateway overway ethay usesway ofway Ontinuationcay, indingbay Odenay otay eachway oneway uccesivelsay"
-"y."
+"Oday-Usesway (Odenay-Arvay Ontinuationcay [Esultray]) {Eclarationday}* "
+"{Ormfay}*\n"
+"  Iterateway overway ethay usesway ofway Ontinuationcay, indingbay Odenay "
+"otay eachway oneway uccesivelsayy."
 
 #: src/compiler/macros.lisp
 msgid ""
@@ -19219,11 +21821,14 @@ msgid ""
 "(if\n"
 "  not supplied, this is an error.)"
 msgstr ""
-"Oday-Odesnay (Odenay-Arvay Ontcay-Arvay Ockblay {Eykay Aluevay}*) {Eclarationday}* {Ormfay}*\n"
-"  Iterateway overway ethay odesnay inway Ockblay, indingbay Odenay-Arvay otay ethay eachway odenay andway\n"
-"  Ontcay-Arvay otay ethay odenay's Ontcay.  Ethay onlyway eywordkay optionway isway Estartray-P, ichwhay\n"
-"  ausescay iterationway otay ebay estartedray enwhay away odenay isway eletedday outway omfray underway usway "
-"(ifway\n"
+"Oday-Odesnay (Odenay-Arvay Ontcay-Arvay Ockblay {Eykay Aluevay}*) "
+"{Eclarationday}* {Ormfay}*\n"
+"  Iterateway overway ethay odesnay inway Ockblay, indingbay Odenay-Arvay "
+"otay ethay eachway odenay andway\n"
+"  Ontcay-Arvay otay ethay odenay's Ontcay.  Ethay onlyway eywordkay "
+"optionway isway Estartray-P, ichwhay\n"
+"  ausescay iterationway otay ebay estartedray enwhay away odenay isway "
+"eletedday outway omfray underway usway (ifway\n"
 "  otnay uppliedsay, isthay isway anway errorway.)"
 
 #: src/compiler/macros.lisp
@@ -19231,7 +21836,8 @@ msgid ""
 "Do-Nodes-Backwards (Node-Var Cont-Var Block) {Declaration}* {Form}*\n"
 "  Like Do-Nodes, only iterates in reverse order."
 msgstr ""
-"Oday-Odesnay-Ackwardsbay (Odenay-Arvay Ontcay-Arvay Ockblay) {Eclarationday}* {Ormfay}*\n"
+"Oday-Odesnay-Ackwardsbay (Odenay-Arvay Ontcay-Arvay Ockblay) {Eclarationday}"
+"* {Ormfay}*\n"
 "  Ikelay Oday-Odesnay, onlyway iteratesway inway everseray orderway."
 
 #: src/compiler/macros.lisp
@@ -19242,8 +21848,8 @@ msgid ""
 "  main conversion pass has finished."
 msgstr ""
 "Ithway-IR1-Environmentway Odenay Orm*Fay\n"
-"  Indbay ethay IR1 ontextcay ariablesvay osay atthay IR1 onversioncay ancay ebay oneday afterway "
-"ethay\n"
+"  Indbay ethay IR1 ontextcay ariablesvay osay atthay IR1 onversioncay ancay "
+"ebay oneday afterway ethay\n"
 "  ainmay onversioncay asspay ashay inishedfay."
 
 #: src/compiler/macros.lisp
@@ -19254,15 +21860,17 @@ msgid ""
 "  may be used to determine the name equality predicate."
 msgstr ""
 "LEXENV-FIND Amenay Otslay {Eykay Aluevay}*\n"
-"  Ooklay upway Amenay inway ethay exicallay environmentway amespacenay esignatedday ybay Otslay,\n"
-"  eturningray ethay <aluevay, T>, orway <NIL, NIL> ifway onay entryway.  Ethay :TEST eywordkay\n"
+"  Ooklay upway Amenay inway ethay exicallay environmentway amespacenay "
+"esignatedday ybay Otslay,\n"
+"  eturningray ethay <aluevay, T>, orway <NIL, NIL> ifway onay entryway.  "
+"Ethay :TEST eywordkay\n"
 "  aymay ebay usedway otay etermineday ethay amenay equalityway edicatepray."
 
 #: src/compiler/macros.lisp
-msgid ""
-"If true, defprinter print functions print each slot on a separate line."
+msgid "If true, defprinter print functions print each slot on a separate line."
 msgstr ""
-"Ifway uetray, efprinterday intpray unctionsfay intpray eachway otslay onway away eparatesay inelay."
+"Ifway uetray, efprinterday intpray unctionsfay intpray eachway otslay onway "
+"away eparatesay inelay."
 
 #: src/compiler/macros.lisp
 msgid ""
@@ -19289,25 +21897,33 @@ msgid ""
 "  Stream."
 msgstr ""
 "Efprinterday Amenay Otslay-Esc*Day\n"
-"  Efineday omesay indkay ofway easonableray efstructday ucturestray-intpray unctionfay.  Amenay\n"
-"  isway ethay amenay ofway ethay ucturestray.  Eway efineday away unctionfay %PRINT-amenay ichwhay\n"
-"  intspray ethay otsslay inway ethay ucturestray inway ethay ayway escribedday ybay ethay Otslay-Escsday.\n"
-"  Eachway Otslay-Escday ancay ebay away otslay amenay, indicatingway atthay ethay otslay ouldshay implysay\n"
-"  ebay intedpray.  Away Otslay-Escday aymay alsoway ebay away istlay ofway away otslay amenay andway otherway "
-"tuffsay.\n"
-"  Ethay otherway tuffsay isway omposedcay ofway eywordskay ollowedfay ybay expressionsway.  Ethay\n"
-"  expressionsway areway evaluatedway ithway ethay ariablevay ichwhay isway ethay otslay amenay oundbay\n"
-"  otay ethay aluevay ofway ethay otslay.  Esethay eywordskay areway efinedday:\n"
+"  Efineday omesay indkay ofway easonableray efstructday ucturestray-intpray "
+"unctionfay.  Amenay\n"
+"  isway ethay amenay ofway ethay ucturestray.  Eway efineday away unctionfay "
+"%PRINT-amenay ichwhay\n"
+"  intspray ethay otsslay inway ethay ucturestray inway ethay ayway "
+"escribedday ybay ethay Otslay-Escsday.\n"
+"  Eachway Otslay-Escday ancay ebay away otslay amenay, indicatingway atthay "
+"ethay otslay ouldshay implysay\n"
+"  ebay intedpray.  Away Otslay-Escday aymay alsoway ebay away istlay ofway "
+"away otslay amenay andway otherway tuffsay.\n"
+"  Ethay otherway tuffsay isway omposedcay ofway eywordskay ollowedfay ybay "
+"expressionsway.  Ethay\n"
+"  expressionsway areway evaluatedway ithway ethay ariablevay ichwhay isway "
+"ethay otslay amenay oundbay\n"
+"  otay ethay aluevay ofway ethay otslay.  Esethay eywordskay areway "
+"efinedday:\n"
 "  \n"
-"  :PRIN1    Intpray ethay aluevay ofway ethay expressionway insteadway ofway ethay otslay aluevay.\n"
+"  :PRIN1    Intpray ethay aluevay ofway ethay expressionway insteadway ofway "
+"ethay otslay aluevay.\n"
 "  :PRINC    Ikelay :PRIN1, onlyway incpray ethay aluevay\n"
 "  :TEST     Onlyway intpray omethingsay ifway ethay esttay isway uetray.\n"
 "  \n"
-"  Ifway onay intingpray ingthay isway ecifiedspay enthay ethay otslay aluevay isway intedpray asway "
-"PRIN1.\n"
+"  Ifway onay intingpray ingthay isway ecifiedspay enthay ethay otslay "
+"aluevay isway intedpray asway PRIN1.\n"
 "  \n"
-"  Ethay ucturestray eingbay intedpray isway oundbay otay Ucturestray andway ethay eamstray isway oundbay "
-"otay\n"
+"  Ethay ucturestray eingbay intedpray isway oundbay otay Ucturestray andway "
+"ethay eamstray isway oundbay otay\n"
 "  Eamstray."
 
 #: src/compiler/macros.lisp
@@ -19322,28 +21938,30 @@ msgstr "Unknownway attributeway amenay: ~S."
 #: src/compiler/vmdef.lisp src/compiler/node.lisp src/compiler/macros.lisp
 msgid ""
 "Automagically generated boolean attribute test function.  See\n"
-"	    Def-Boolean-Attribute."
+"\t    Def-Boolean-Attribute."
 msgstr ""
-"Automagicallyway eneratedgay ooleanbay attributeway esttay unctionfay.  Eesay\n"
-"	    Efday-Ooleanbay-Attributeway."
+"Automagicallyway eneratedgay ooleanbay attributeway esttay unctionfay.  "
+"Eesay\n"
+"\t    Efday-Ooleanbay-Attributeway."
 
 #: src/compiler/knownfun.lisp src/compiler/new-assem.lisp
 #: src/compiler/vmdef.lisp src/compiler/node.lisp src/compiler/macros.lisp
 msgid ""
 "Automagically generated boolean attribute setter.  See\n"
-"	    Def-Boolean-Attribute."
+"\t    Def-Boolean-Attribute."
 msgstr ""
 "Automagicallyway eneratedgay ooleanbay attributeway ettersay.  Eesay\n"
-"	    Efday-Ooleanbay-Attributeway."
+"\t    Efday-Ooleanbay-Attributeway."
 
 #: src/compiler/knownfun.lisp src/compiler/new-assem.lisp
 #: src/compiler/vmdef.lisp src/compiler/node.lisp src/compiler/macros.lisp
 msgid ""
 "Automagically generated boolean attribute creation function.  See\n"
-"	    Def-Boolean-Attribute."
+"\t    Def-Boolean-Attribute."
 msgstr ""
-"Automagicallyway eneratedgay ooleanbay attributeway eationcray unctionfay.  Eesay\n"
-"	    Efday-Ooleanbay-Attributeway."
+"Automagicallyway eneratedgay ooleanbay attributeway eationcray unctionfay.  "
+"Eesay\n"
+"\t    Efday-Ooleanbay-Attributeway."
 
 #: src/compiler/macros.lisp
 msgid ""
@@ -19354,8 +21972,8 @@ msgid ""
 "  generate some macros to manipulate sets of the attributes: \n"
 "\n"
 "    NAME-attributep attributes attribute-name*\n"
-"      Return true if one of the named attributes is present, false otherwise"
-".\n"
+"      Return true if one of the named attributes is present, false "
+"otherwise.\n"
 "      When set with SETF, updates the place Attributes setting or clearing "
 "the\n"
 "      specified attributes.\n"
@@ -19364,16 +21982,18 @@ msgid ""
 "      Return a set of the named attributes."
 msgstr ""
 "Efday-Ooleanbay-Attributeway Amenay Attributeway-Ame*Nay\n"
-"  Efineday away ewnay assclay ofway ooleanbay attributesway, ithway ethay attributesway avinhay ethay\n"
-"  ecifiedspay Attributeway-Amesnay.  Amenay isway ethay amenay ofway ethay assclay, ichwhay isway usedway "
-"otay\n"
-"  enerategay omesay acrosmay otay anipulatemay etssay ofway ethay attributesway: \n"
+"  Efineday away ewnay assclay ofway ooleanbay attributesway, ithway ethay "
+"attributesway avinhay ethay\n"
+"  ecifiedspay Attributeway-Amesnay.  Amenay isway ethay amenay ofway ethay "
+"assclay, ichwhay isway usedway otay\n"
+"  enerategay omesay acrosmay otay anipulatemay etssay ofway ethay "
+"attributesway: \n"
 "\n"
 "    NAME-attributepway attributesway attributeway-ame*nay\n"
-"      Eturnray uetray ifway oneway ofway ethay amednay attributesway isway esentpray, alsefay otherwiseway"
-".\n"
-"      Enwhay etsay ithway SETF, updatesway ethay aceplay Attributesway ettingsay orway earingclay "
-"ethay\n"
+"      Eturnray uetray ifway oneway ofway ethay amednay attributesway isway "
+"esentpray, alsefay otherwiseway.\n"
+"      Enwhay etsay ithway SETF, updatesway ethay aceplay Attributesway "
+"ettingsay orway earingclay ethay\n"
 "      ecifiedspay attributesway.\n"
 "\n"
 "    NAME-attributesway attributeway-ame*nay\n"
@@ -19384,7 +22004,8 @@ msgid ""
 "Returns the union of all the sets of boolean attributes which are its\n"
 "  arguments."
 msgstr ""
-"Eturnsray ethay unionway ofway allway ethay etssay ofway ooleanbay attributesway ichwhay areway itsway\n"
+"Eturnsray ethay unionway ofway allway ethay etssay ofway ooleanbay "
+"attributesway ichwhay areway itsway\n"
 "  argumentsway."
 
 #: src/compiler/macros.lisp
@@ -19393,8 +22014,8 @@ msgid ""
 "its\n"
 "  arguments."
 msgstr ""
-"Eturnsray ethay intersectionway ofway allway ethay etssay ofway ooleanbay attributesway ichwhay areway "
-"itsway\n"
+"Eturnsray ethay intersectionway ofway allway ethay etssay ofway ooleanbay "
+"attributesway ichwhay areway itsway\n"
 "  argumentsway."
 
 #: src/compiler/macros.lisp
@@ -19402,7 +22023,8 @@ msgid ""
 "Returns true if the attributes present in Attr1 are indentical to those in\n"
 "  Attr2."
 msgstr ""
-"Eturnsray uetray ifway ethay attributesway esentpray inway Attrway1 areway indenticalway otay osethay inway\n"
+"Eturnsray uetray ifway ethay attributesway esentpray inway Attrway1 areway "
+"indenticalway otay osethay inway\n"
 "  Attrway2."
 
 #: src/compiler/macros.lisp
@@ -19411,19 +22033,21 @@ msgstr "~S isway otnay ethay amenay ofway anway eventway."
 
 #: src/compiler/macros.lisp
 msgid "Return the number of times that Event has happened."
-msgstr "Eturnray ethay umbernay ofway imestay atthay Eventway ashay appenedhay."
+msgstr ""
+"Eturnray ethay umbernay ofway imestay atthay Eventway ashay appenedhay."
 
 #: src/compiler/macros.lisp
 msgid ""
 "Return the function that is called when Event happens.  If this is null,\n"
 "  there is no action.  The function is passed the node to which the event\n"
-"  happened, or NIL if there is no relevant node.  This may be set with "
-"SETF."
+"  happened, or NIL if there is no relevant node.  This may be set with SETF."
 msgstr ""
-"Eturnray ethay unctionfay atthay isway alledcay enwhay Eventway appenshay.  Ifway isthay isway ullnay,\n"
-"  erethay isway onay actionway.  Ethay unctionfay isway assedpay ethay odenay otay ichwhay ethay eventway\n"
-"  appenedhay, orway NIL ifway erethay isway onay elevantray odenay.  Isthay aymay ebay etsay ithway "
-"SETF."
+"Eturnray ethay unctionfay atthay isway alledcay enwhay Eventway appenshay.  "
+"Ifway isthay isway ullnay,\n"
+"  erethay isway onay actionway.  Ethay unctionfay isway assedpay ethay "
+"odenay otay ichwhay ethay eventway\n"
+"  appenedhay, orway NIL ifway erethay isway onay elevantray odenay.  Isthay "
+"aymay ebay etsay ithway SETF."
 
 #: src/compiler/macros.lisp
 msgid ""
@@ -19432,9 +22056,10 @@ msgid ""
 "when\n"
 "  the event happens.  This may be set with SETF."
 msgstr ""
-"Eturnray ethay onnay-egativenay integerway ichwhay epresentsray ethay evellay ofway ignificancesay\n"
-"  ofway ethay eventway Amenay.  Isthay isway usedway otay etermineday etherwhay otay intpray away essagemay "
-"enwhay\n"
+"Eturnray ethay onnay-egativenay integerway ichwhay epresentsray ethay "
+"evellay ofway ignificancesay\n"
+"  ofway ethay eventway Amenay.  Isthay isway usedway otay etermineday "
+"etherwhay otay intpray away essagemay enwhay\n"
 "  ethay eventway appenshay.  Isthay aymay ebay etsay ithway SETF."
 
 #: src/compiler/macros.lisp
@@ -19447,10 +22072,12 @@ msgid ""
 "  whether to print a Note when the event happens."
 msgstr ""
 "Efeventday Amenay Escriptionday\n"
-"  Efineday away ewnay indkay ofway eventway.  Amenay isway away ymbolsay ichwhay amesnay ethay eventway andway\n"
-"  Escriptionday isway away ingstray ichwhay escribesday ethay eventway.  Evellay (efaultday 0) isway "
-"ethay\n"
-"  evellay ofway ignificancesay associatedway ithway isthay eventway; itway isway usedway otay etermineday\n"
+"  Efineday away ewnay indkay ofway eventway.  Amenay isway away ymbolsay "
+"ichwhay amesnay ethay eventway andway\n"
+"  Escriptionday isway away ingstray ichwhay escribesday ethay eventway.  "
+"Evellay (efaultday 0) isway ethay\n"
+"  evellay ofway ignificancesay associatedway ithway isthay eventway; itway "
+"isway usedway otay etermineday\n"
 "  etherwhay otay intpray away Otenay enwhay ethay eventway appenshay."
 
 #: src/compiler/macros.lisp
@@ -19458,7 +22085,8 @@ msgid ""
 "This variable is a non-negative integer specifying the lowest level of\n"
 "  event that will print a Note when it occurs."
 msgstr ""
-"Isthay ariablevay isway away onnay-egativenay integerway ecifyingspay ethay owestlay evellay ofway\n"
+"Isthay ariablevay isway away onnay-egativenay integerway ecifyingspay ethay "
+"owestlay evellay ofway\n"
 "  eventway atthay illway intpray away Otenay enwhay itway occursway."
 
 #: src/compiler/macros.lisp
@@ -19469,8 +22097,8 @@ msgid ""
 "  to determine the node to which the event happened."
 msgstr ""
 "Eventway Amenay Odenay\n"
-"  Otenay atthay ethay eventway ithway ethay ecifiedspay Amenay ashay appenedhay.  Odenay isway "
-"evaluatedway\n"
+"  Otenay atthay ethay eventway ithway ethay ecifiedspay Amenay ashay "
+"appenedhay.  Odenay isway evaluatedway\n"
 "  otay etermineday ethay odenay otay ichwhay ethay eventway appenedhay."
 
 #: src/compiler/macros.lisp
@@ -19480,9 +22108,10 @@ msgid ""
 "the\n"
 "  stream to write to."
 msgstr ""
-"Intpray away istinglay ofway eventsway andway eirthay ountscay, ortedsay ybay ethay ountcay.  Eventsway\n"
-"  atthay appenedhay ewerfay anthay Inmay-Ountcay imestay illway otnay ebay intedpray.  Eamstray isway "
-"ethay\n"
+"Intpray away istinglay ofway eventsway andway eirthay ountscay, ortedsay "
+"ybay ethay ountcay.  Eventsway\n"
+"  atthay appenedhay ewerfay anthay Inmay-Ountcay imestay illway otnay ebay "
+"intedpray.  Eamstray isway ethay\n"
 "  eamstray otay itewray otay."
 
 #: src/compiler/macros.lisp
@@ -19491,8 +22120,10 @@ msgid ""
 "  Next.  Key, Test and Test-Not are the same as for generic sequence\n"
 "  functions."
 msgstr ""
-"Indfay Elementway inway away ullnay-erminatedtay Istlay inkedlay ybay ethay accessorway unctionfay\n"
-"  Extnay.  Eykay, Esttay andway Esttay-Otnay areway ethay amesay asway orfay enericgay equencesay\n"
+"Indfay Elementway inway away ullnay-erminatedtay Istlay inkedlay ybay ethay "
+"accessorway unctionfay\n"
+"  Extnay.  Eykay, Esttay andway Esttay-Otnay areway ethay amesay asway orfay "
+"enericgay equencesay\n"
 "  unctionsfay."
 
 #: src/compiler/debug.lisp src/compiler/pack.lisp src/compiler/represent.lisp
@@ -19503,13 +22134,14 @@ msgstr "Illysay otay upplysay othbay :Esttay andway :Esttay-Otnay."
 #: src/compiler/macros.lisp
 msgid ""
 "Return the position of Element (or NIL if absent) in a null-terminated List\n"
-"  linked by the accessor function Next.  Key, Test and Test-Not are the "
-"same as\n"
+"  linked by the accessor function Next.  Key, Test and Test-Not are the same "
+"as\n"
 "  for generic sequence functions."
 msgstr ""
-"Eturnray ethay ositionpay ofway Elementway (orway NIL ifway absentway) inway away ullnay-erminatedtay Istlay\n"
-"  inkedlay ybay ethay accessorway unctionfay Extnay.  Eykay, Esttay andway Esttay-Otnay areway ethay "
-"amesay asway\n"
+"Eturnray ethay ositionpay ofway Elementway (orway NIL ifway absentway) inway "
+"away ullnay-erminatedtay Istlay\n"
+"  inkedlay ybay ethay accessorway unctionfay Extnay.  Eykay, Esttay andway "
+"Esttay-Otnay areway ethay amesay asway\n"
 "  orfay enericgay equencesay unctionsfay."
 
 #: src/compiler/macros.lisp
@@ -19517,8 +22149,10 @@ msgid ""
 "Map Function over the elements in a null-terminated List linked by the\n"
 "  accessor function Next, returning a list of the results."
 msgstr ""
-"Apmay Unctionfay overway ethay elementsway inway away ullnay-erminatedtay Istlay inkedlay ybay ethay\n"
-"  accessorway unctionfay Extnay, eturningray away istlay ofway ethay esultsray."
+"Apmay Unctionfay overway ethay elementsway inway away ullnay-erminatedtay "
+"Istlay inkedlay ybay ethay\n"
+"  accessorway unctionfay Extnay, eturningray away istlay ofway ethay "
+"esultsray."
 
 #: src/compiler/macros.lisp
 msgid ""
@@ -19528,9 +22162,10 @@ msgid ""
 "  that is stored in Place.  Item must appear exactly once in the list."
 msgstr ""
 "Eletefday-Inway Extnay Aceplay Itemway\n"
-"  Eleteday Itemway omfray away ullnay-erminatedtay istlay inkedlay ybay ethay accessorway unctionfay "
-"Extnay\n"
-"  atthay isway toredsay inway Aceplay.  Itemway ustmay appearway exactlyway onceway inway ethay istlay."
+"  Eleteday Itemway omfray away ullnay-erminatedtay istlay inkedlay ybay "
+"ethay accessorway unctionfay Extnay\n"
+"  atthay isway toredsay inway Aceplay.  Itemway ustmay appearway exactlyway "
+"onceway inway ethay istlay."
 
 #: src/compiler/macros.lisp
 msgid ""
@@ -19538,8 +22173,8 @@ msgid ""
 "in\n"
 "  Place."
 msgstr ""
-"Ushpay Itemway ontoway away istlay inkedlay ybay ethay accessorway unctionfay Extnay atthay isway toredsay "
-"inway\n"
+"Ushpay Itemway ontoway away istlay inkedlay ybay ethay accessorway "
+"unctionfay Extnay atthay isway toredsay inway\n"
 "  Aceplay."
 
 #: src/compiler/macros.lisp
@@ -19559,16 +22194,20 @@ msgid "No more slots can follow a :rest-p slot."
 msgstr "Onay oremay otsslay ancay ollowfay away :estray-p otslay."
 
 #: src/compiler/generic/vm-macs.lisp
-msgid "Number of slots used by each ~S~\n"
-"				  ~@[~* including the header~]."
-msgstr "Umbernay ofway otsslay usedway ybay eachway ~S~\n"
-"				  ~@[~* includingway ethay eaderhay~]."
+msgid ""
+"Number of slots used by each ~S~\n"
+"\t\t\t\t  ~@[~* including the header~]."
+msgstr ""
+"Umbernay ofway otsslay usedway ybay eachway ~S~\n"
+"\t\t\t\t  ~@[~* includingway ethay eaderhay~]."
 
 #: src/compiler/backend.lisp
-msgid "Machine specific support routine ~S ~\n"
-"				  undefined for ~S"
-msgstr "Achinemay ecificspay upportsay outineray ~S ~\n"
-"				  undefinedway orfay ~S"
+msgid ""
+"Machine specific support routine ~S ~\n"
+"\t\t\t\t  undefined for ~S"
+msgstr ""
+"Achinemay ecificspay upportsay outineray ~S ~\n"
+"\t\t\t\t  undefinedway orfay ~S"
 
 #: src/compiler/backend.lisp
 msgid "Unknown VM support routine: ~A"
@@ -19576,7 +22215,9 @@ msgstr "Unknownway VM upportsay outineray: ~Away"
 
 #: src/compiler/backend.lisp
 msgid "The backend for the machine we are running on. Do not change this."
-msgstr "Ethay ackendbay orfay ethay achinemay eway areway unningray onway. Oday otnay angechay isthay."
+msgstr ""
+"Ethay ackendbay orfay ethay achinemay eway areway unningray onway. Oday "
+"otnay angechay isthay."
 
 #: src/compiler/backend.lisp
 msgid "The backend we are attempting to compile."
@@ -19594,21 +22235,27 @@ msgstr "Omputecay ethay *FEATURES* istlay otay useway ithway BACKEND."
 msgid ""
 "Same as EXT:FEATUREP, except use the features found in *TARGET-BACKEND*."
 msgstr ""
-"Amesay asway EXT:FEATUREP, exceptway useway ethay eaturesfay oundfay inway *TARGET-BACKEND*."
+"Amesay asway EXT:FEATUREP, exceptway useway ethay eaturesfay oundfay inway "
+"*TARGET-BACKEND*."
 
 #: src/compiler/backend.lisp
 msgid "Same as EXT:FEATUREP, except use the features found in *BACKEND*."
-msgstr "Amesay asway EXT:FEATUREP, exceptway useway ethay eaturesfay oundfay inway *BACKEND*."
+msgstr ""
+"Amesay asway EXT:FEATUREP, exceptway useway ethay eaturesfay oundfay inway "
+"*BACKEND*."
 
 #: src/compiler/backend.lisp
 msgid ""
 "Same as EXT:FEATUREP, except use the features found in *NATIVE-BACKEND*."
 msgstr ""
-"Amesay asway EXT:FEATUREP, exceptway useway ethay eaturesfay oundfay inway *NATIVE-BACKEND*."
+"Amesay asway EXT:FEATUREP, exceptway useway ethay eaturesfay oundfay inway "
+"*NATIVE-BACKEND*."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Number of bits at the low end of a pointer used for type information."
-msgstr "Umbernay ofway itsbay atway ethay owlay endway ofway away ointerpay usedway orfay ypetay informationway."
+msgstr ""
+"Umbernay ofway itsbay atway ethay owlay endway ofway away ointerpay usedway "
+"orfay ypetay informationway."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Mask to extract the low tag bits from a pointer."
@@ -19619,12 +22266,15 @@ msgid ""
 "Exclusive upper bound on the value of the low tag bits from a\n"
 "  pointer."
 msgstr ""
-"Exclusiveway upperway oundbay onway ethay aluevay ofway ethay owlay agtay itsbay omfray away\n"
+"Exclusiveway upperway oundbay onway ethay aluevay ofway ethay owlay agtay "
+"itsbay omfray away\n"
 "  ointerpay."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Number of bits used in the header word of a data block for typeing."
-msgstr "Umbernay ofway itsbay usedway inway ethay eaderhay ordway ofway away ataday ockblay orfay ypeingtay."
+msgstr ""
+"Umbernay ofway itsbay usedway inway ethay eaderhay ordway ofway away ataday "
+"ockblay orfay ypeingtay."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Mask to extract the type from a header word."
@@ -19644,39 +22294,56 @@ msgstr "Umbernay ofway otsslay usedway ybay eachway CONS."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Number of slots used by each RATIO including the header."
-msgstr "Umbernay ofway otsslay usedway ybay eachway RATIO includingway ethay eaderhay."
+msgstr ""
+"Umbernay ofway otsslay usedway ybay eachway RATIO includingway ethay "
+"eaderhay."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Number of slots used by each SINGLE-FLOAT including the header."
-msgstr "Umbernay ofway otsslay usedway ybay eachway SINGLE-FLOAT includingway ethay eaderhay."
+msgstr ""
+"Umbernay ofway otsslay usedway ybay eachway SINGLE-FLOAT includingway ethay "
+"eaderhay."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Number of slots used by each DOUBLE-FLOAT including the header."
-msgstr "Umbernay ofway otsslay usedway ybay eachway DOUBLE-FLOAT includingway ethay eaderhay."
+msgstr ""
+"Umbernay ofway otsslay usedway ybay eachway DOUBLE-FLOAT includingway ethay "
+"eaderhay."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Number of slots used by each COMPLEX including the header."
-msgstr "Umbernay ofway otsslay usedway ybay eachway COMPLEX includingway ethay eaderhay."
+msgstr ""
+"Umbernay ofway otsslay usedway ybay eachway COMPLEX includingway ethay "
+"eaderhay."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Number of slots used by each FDEFN including the header."
-msgstr "Umbernay ofway otsslay usedway ybay eachway FDEFN includingway ethay eaderhay."
+msgstr ""
+"Umbernay ofway otsslay usedway ybay eachway FDEFN includingway ethay "
+"eaderhay."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Number of slots used by each VALUE-CELL including the header."
-msgstr "Umbernay ofway otsslay usedway ybay eachway VALUE-CELL includingway ethay eaderhay."
+msgstr ""
+"Umbernay ofway otsslay usedway ybay eachway VALUE-CELL includingway ethay "
+"eaderhay."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Number of slots used by each SAP including the header."
-msgstr "Umbernay ofway otsslay usedway ybay eachway SAP includingway ethay eaderhay."
+msgstr ""
+"Umbernay ofway otsslay usedway ybay eachway SAP includingway ethay eaderhay."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Number of slots used by each WEAK-POINTER including the header."
-msgstr "Umbernay ofway otsslay usedway ybay eachway WEAK-POINTER includingway ethay eaderhay."
+msgstr ""
+"Umbernay ofway otsslay usedway ybay eachway WEAK-POINTER includingway ethay "
+"eaderhay."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Number of slots used by each SCAVENGER-HOOK including the header."
-msgstr "Umbernay ofway otsslay usedway ybay eachway SCAVENGER-HOOK includingway ethay eaderhay."
+msgstr ""
+"Umbernay ofway otsslay usedway ybay eachway SCAVENGER-HOOK includingway "
+"ethay eaderhay."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Number of slots used by each BINDING."
@@ -19692,31 +22359,35 @@ msgstr "Umbernay ofway otsslay usedway ybay eachway CATCH-BLOCK."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Number of slots used by each SYMBOL including the header."
-msgstr "Umbernay ofway otsslay usedway ybay eachway SYMBOL includingway ethay eaderhay."
+msgstr ""
+"Umbernay ofway otsslay usedway ybay eachway SYMBOL includingway ethay "
+"eaderhay."
 
 #: src/compiler/generic/objdef.lisp
-msgid ""
-"Number of slots used by each COMPLEX-SINGLE-FLOAT including the header."
+msgid "Number of slots used by each COMPLEX-SINGLE-FLOAT including the header."
 msgstr ""
-"Umbernay ofway otsslay usedway ybay eachway COMPLEX-SINGLE-FLOAT includingway ethay eaderhay."
+"Umbernay ofway otsslay usedway ybay eachway COMPLEX-SINGLE-FLOAT "
+"includingway ethay eaderhay."
 
 #: src/compiler/generic/objdef.lisp
-msgid ""
-"Number of slots used by each COMPLEX-DOUBLE-FLOAT including the header."
+msgid "Number of slots used by each COMPLEX-DOUBLE-FLOAT including the header."
 msgstr ""
-"Umbernay ofway otsslay usedway ybay eachway COMPLEX-DOUBLE-FLOAT includingway ethay eaderhay."
+"Umbernay ofway otsslay usedway ybay eachway COMPLEX-DOUBLE-FLOAT "
+"includingway ethay eaderhay."
 
 #: src/compiler/generic/objdef.lisp
 msgid "Number of slots used by each DOUBLE-DOUBLE-FLOAT including the header."
-msgstr "Umbernay ofway otsslay usedway ybay eachway DOUBLE-DOUBLE-FLOAT includingway ethay eaderhay."
+msgstr ""
+"Umbernay ofway otsslay usedway ybay eachway DOUBLE-DOUBLE-FLOAT includingway "
+"ethay eaderhay."
 
 #: src/compiler/generic/objdef.lisp
 msgid ""
 "Number of slots used by each COMPLEX-DOUBLE-DOUBLE-FLOAT including the "
 "header."
 msgstr ""
-"Umbernay ofway otsslay usedway ybay eachway COMPLEX-DOUBLE-DOUBLE-FLOAT includingway ethay "
-"eaderhay."
+"Umbernay ofway otsslay usedway ybay eachway COMPLEX-DOUBLE-DOUBLE-FLOAT "
+"includingway ethay eaderhay."
 
 #: src/compiler/generic/interr.lisp
 msgid "Unknown internal error: ~S"
@@ -19729,32 +22400,41 @@ msgstr "ocallay-ntay-imitlay otnay away mvay:ordway-itsbay ultiplemay."
 #: src/compiler/pack.lisp src/compiler/life.lisp src/compiler/bit-util.lisp
 msgid ""
 "Argument and/or result bit arrays not the same length:~\n"
-"			 ~%  ~S~%  ~S  ~%  ~S"
+"\t\t\t ~%  ~S~%  ~S  ~%  ~S"
 msgstr ""
-"Argumentway andway/orway esultray itbay arraysway otnay ethay amesay engthlay:~\n"
-"			 ~%  ~S~%  ~S  ~%  ~S"
+"Argumentway andway/orway esultray itbay arraysway otnay ethay amesay "
+"engthlay:~\n"
+"\t\t\t ~%  ~S~%  ~S  ~%  ~S"
 
 #: src/compiler/ctype.lisp
 msgid "Function called with ~R argument, but wants exactly ~R."
 msgid_plural "Function called with ~R arguments, but wants exactly ~R."
-msgstr[0] "Unctionfay alledcay ithway ~R argumentway, utbay antsway exactlyway ~R."
-msgstr[1] "Unctionfay alledcay ithway ~R argumentsway, utbay antsway exactlyway ~R."
+msgstr[0] ""
+"Unctionfay alledcay ithway ~R argumentway, utbay antsway exactlyway ~R."
+msgstr[1] ""
+"Unctionfay alledcay ithway ~R argumentsway, utbay antsway exactlyway ~R."
 
 #: src/compiler/ctype.lisp
 msgid "Function called with ~R argument, but wants at least ~R."
 msgid_plural "Function called with ~R arguments, but wants at least ~R."
-msgstr[0] "Unctionfay alledcay ithway ~R argumentway, utbay antsway atway eastlay ~R."
-msgstr[1] "Unctionfay alledcay ithway ~R argumentsway, utbay antsway atway eastlay ~R."
+msgstr[0] ""
+"Unctionfay alledcay ithway ~R argumentway, utbay antsway atway eastlay ~R."
+msgstr[1] ""
+"Unctionfay alledcay ithway ~R argumentsway, utbay antsway atway eastlay ~R."
 
 #: src/compiler/ctype.lisp
 msgid "Function called with ~R argument, but wants at most ~R."
 msgid_plural "Function called with ~R arguments, but wants at most ~R."
-msgstr[0] "Unctionfay alledcay ithway ~R argumentway, utbay antsway atway ostmay ~R."
-msgstr[1] "Unctionfay alledcay ithway ~R argumentsway, utbay antsway atway ostmay ~R."
+msgstr[0] ""
+"Unctionfay alledcay ithway ~R argumentway, utbay antsway atway ostmay ~R."
+msgstr[1] ""
+"Unctionfay alledcay ithway ~R argumentsway, utbay antsway atway ostmay ~R."
 
 #: src/compiler/ctype.lisp
 msgid "Function has an odd number of arguments in the keyword portion."
-msgstr "Unctionfay ashay anway oddway umbernay ofway argumentsway inway ethay eywordkay ortionpay."
+msgstr ""
+"Unctionfay ashay anway oddway umbernay ofway argumentsway inway ethay "
+"eywordkay ortionpay."
 
 #: src/compiler/ctype.lisp
 msgid "Can't tell whether the result is a ~S."
@@ -19783,10 +22463,10 @@ msgstr "Ethay ~:R argumentway isway otnay away onstantcay."
 #: src/compiler/ctype.lisp
 msgid ""
 "Can't tell whether the ~:R argument is a ~\n"
-"		             constant ~S:~%  ~S"
+"\t\t             constant ~S:~%  ~S"
 msgstr ""
 "Ancay't elltay etherwhay ethay ~:R argumentway isway away ~\n"
-"		             onstantcay ~S:~%  ~S"
+"\t\t             onstantcay ~S:~%  ~S"
 
 #: src/compiler/ctype.lisp
 msgid "The ~:R argument is not a constant ~S:~%  ~S"
@@ -19794,7 +22474,9 @@ msgstr "Ethay ~:R argumentway isway otnay away onstantcay ~S:~%  ~S"
 
 #: src/compiler/ctype.lisp
 msgid "The ~:R argument (in keyword position) is not a constant."
-msgstr "Ethay ~:R argumentway (inway eywordkay ositionpay) isway otnay away onstantcay."
+msgstr ""
+"Ethay ~:R argumentway (inway eywordkay ositionpay) isway otnay away "
+"onstantcay."
 
 #: src/compiler/ctype.lisp
 msgid "The value of ~S is not a constant"
@@ -19808,45 +22490,56 @@ msgstr "~S isway otnay away nownkay argumentway eywordkay."
 msgid "Function previously called with ~R argument, but wants at least ~R."
 msgid_plural ""
 "Function previously called with ~R arguments, but wants at least ~R."
-msgstr[0] "Unctionfay eviouslypray alledcay ithway ~R argumentway, utbay antsway atway eastlay ~R."
+msgstr[0] ""
+"Unctionfay eviouslypray alledcay ithway ~R argumentway, utbay antsway atway "
+"eastlay ~R."
 msgstr[1] ""
-"Unctionfay eviouslypray alledcay ithway ~R argumentsway, utbay antsway atway eastlay ~R."
+"Unctionfay eviouslypray alledcay ithway ~R argumentsway, utbay antsway atway "
+"eastlay ~R."
 
 #: src/compiler/ctype.lisp
 msgid "Function previously called with ~R argument, but wants at most ~R."
 msgid_plural ""
 "Function previously called with ~R arguments, but wants at most ~R."
-msgstr[0] "Unctionfay eviouslypray alledcay ithway ~R argumentway, utbay antsway atway ostmay ~R."
+msgstr[0] ""
+"Unctionfay eviouslypray alledcay ithway ~R argumentway, utbay antsway atway "
+"ostmay ~R."
 msgstr[1] ""
-"Unctionfay eviouslypray alledcay ithway ~R argumentsway, utbay antsway atway ostmay ~R."
+"Unctionfay eviouslypray alledcay ithway ~R argumentsway, utbay antsway atway "
+"ostmay ~R."
 
 #: src/compiler/ctype.lisp
 msgid ""
 "Function previously called with an odd number of arguments in ~\n"
-"	      the keyword portion."
+"\t      the keyword portion."
 msgstr ""
-"Unctionfay eviouslypray alledcay ithway anway oddway umbernay ofway argumentsway inway ~\n"
-"	      ethay eywordkay ortionpay."
+"Unctionfay eviouslypray alledcay ithway anway oddway umbernay ofway "
+"argumentsway inway ~\n"
+"\t      ethay eywordkay ortionpay."
 
 #: src/compiler/ctype.lisp
 msgid "Can't tell whether previous ~? argument type ~S is a ~S."
-msgstr "Ancay't elltay etherwhay eviouspray ~? argumentway ypetay ~S isway away ~S."
+msgstr ""
+"Ancay't elltay etherwhay eviouspray ~? argumentway ypetay ~S isway away ~S."
 
 #: src/compiler/ctype.lisp
 msgid "~:(~?~) argument should be a ~S but was a ~S in a previous call."
-msgstr "~:(~?~) argumentway ouldshay ebay away ~S utbay asway away ~S inway away eviouspray allcay."
+msgstr ""
+"~:(~?~) argumentway ouldshay ebay away ~S utbay asway away ~S inway away "
+"eviouspray allcay."
 
 #: src/compiler/ctype.lisp
 msgid "Function previously called with unknown argument keyword ~S."
-msgstr "Unctionfay eviouslypray alledcay ithway unknownway argumentway eywordkay ~S."
+msgstr ""
+"Unctionfay eviouslypray alledcay ithway unknownway argumentway eywordkay ~S."
 
 #: src/compiler/ctype.lisp
 msgid ""
 "Definition's declared type for variable ~A:~%  ~S~@\n"
-"		   conflicts with this type from ~A:~%  ~S"
+"\t\t   conflicts with this type from ~A:~%  ~S"
 msgstr ""
 "Efinitionday's eclaredday ypetay orfay ariablevay ~Away:~%  ~S~@\n"
-"		   onflictscay ithway isthay ypetay omfray ~Away:~%  ~S"
+"\t\t   onflictscay ithway isthay ypetay omfray ~Away:~%  ~S"
 
 #. updated to allow better translations.
 #: src/compiler/ctype.lisp
@@ -19864,10 +22557,12 @@ msgid "optional"
 msgstr "optionalway"
 
 #: src/compiler/ctype.lisp
-msgid "Definition ~:[doesn't have~;has~] ~A, but ~\n"
-"		~A ~:[doesn't~;does~]."
-msgstr "Efinitionday ~:[oesnday't avehay~;ashay~] ~Away, utbay ~\n"
-"		~Away ~:[oesnday't~;oesday~]."
+msgid ""
+"Definition ~:[doesn't have~;has~] ~A, but ~\n"
+"\t\t~A ~:[doesn't~;does~]."
+msgstr ""
+"Efinitionday ~:[oesnday't avehay~;ashay~] ~Away, utbay ~\n"
+"\t\t~Away ~:[oesnday't~;oesday~]."
 
 #: src/compiler/ctype.lisp
 msgid "keyword args"
@@ -19906,20 +22601,21 @@ msgstr[1] "Efinitionday ashay ~R argsway, utbay ethay ~Away ashay ~R."
 #: src/compiler/ctype.lisp
 msgid ""
 "The result type from ~A:~%  ~S~@\n"
-"	   conflicts with the definition's result type assertion:~%  ~S"
+"\t   conflicts with the definition's result type assertion:~%  ~S"
 msgstr ""
 "Ethay esultray ypetay omfray ~Away:~%  ~S~@\n"
-"	   onflictscay ithway ethay efinitionday's esultray ypetay assertionway:~%  ~S"
+"\t   onflictscay ithway ethay efinitionday's esultray ypetay assertionway:~"
+"%  ~S"
 
 #: src/compiler/ctype.lisp
 msgid ""
 "Assignment to argument: ~S~%  ~\n"
-"			       prevents use of assertion from function ~\n"
-"			       type ~A:~%  ~S~%"
+"\t\t\t       prevents use of assertion from function ~\n"
+"\t\t\t       type ~A:~%  ~S~%"
 msgstr ""
 "Assignmentway otay argumentway: ~S~%  ~\n"
-"			       eventspray useway ofway assertionway omfray unctionfay ~\n"
-"			       ypetay ~Away:~%  ~S~%"
+"\t\t\t       eventspray useway ofway assertionway omfray unctionfay ~\n"
+"\t\t\t       ypetay ~Away:~%  ~S~%"
 
 #: src/compiler/ctype.lisp
 msgid "previous declaration"
@@ -19952,11 +22648,12 @@ msgid ""
 "  that the live set is computed."
 msgstr ""
 "NOTE-THIS-LOCATION VOP Indkay\n"
-"  Otenay atthay ethay urrentcay odecay ocationlay isway anway interestingway (otay ethay ebuggerday)\n"
-"  ocationlay ofway ethay ecifiedspay Indkay.  VOP isway ethay VOP esponsibleray orfay isthay "
-"odecay.\n"
-"  Isthay VOP ustmay ecifyspay omesay onnay-ullnay :SAVE-P aluevay (erhapspay :COMPUTE-ONLY) "
-"osay\n"
+"  Otenay atthay ethay urrentcay odecay ocationlay isway anway interestingway "
+"(otay ethay ebuggerday)\n"
+"  ocationlay ofway ethay ecifiedspay Indkay.  VOP isway ethay VOP "
+"esponsibleray orfay isthay odecay.\n"
+"  Isthay VOP ustmay ecifyspay omesay onnay-ullnay :SAVE-P aluevay "
+"(erhapspay :COMPUTE-ONLY) osay\n"
 "  atthay ethay ivelay etsay isway omputedcay."
 
 #: src/compiler/vmdef.lisp
@@ -19967,8 +22664,10 @@ msgid ""
 "   it."
 msgstr ""
 "NOTE-NEXT-INSTRUCTION VOP Indkay\n"
-"   Imilarsay otay NOTE-THIS-LOCATION, exceptway ethay useway ethay ocationlay ofway ethay extnay\n"
-"   instructionway orfay ethay odecay ocationlay, ereverwhay ethay edulerschay ecidedday otay utpay\n"
+"   Imilarsay otay NOTE-THIS-LOCATION, exceptway ethay useway ethay "
+"ocationlay ofway ethay extnay\n"
+"   instructionway orfay ethay odecay ocationlay, ereverwhay ethay "
+"edulerschay ecidedday otay utpay\n"
 "   itway."
 
 #: src/compiler/meta-vmdef.lisp
@@ -19978,17 +22677,19 @@ msgid ""
 "  :Unbounded or :Non-Packed.  The following keywords are legal:\n"
 "\n"
 "  :Size <Size>\n"
-"      Specify the number of locations in a :Finite SB or the initial size "
-"of a\n"
+"      Specify the number of locations in a :Finite SB or the initial size of "
+"a\n"
 "      :Unbounded SB."
 msgstr ""
 "Efineday-Toragesay-Asebay Amenay Indkay {Eykay Aluevay}*\n"
-"  Efineday away toragesay asebay avinghay ethay ecifiedspay Amenay.  Indkay aymay ebay :Initefay,\n"
-"  :Unboundedway orway :Onnay-Ackedpay.  Ethay ollowingfay eywordskay areway egallay:\n"
+"  Efineday away toragesay asebay avinghay ethay ecifiedspay Amenay.  Indkay "
+"aymay ebay :Initefay,\n"
+"  :Unboundedway orway :Onnay-Ackedpay.  Ethay ollowingfay eywordskay areway "
+"egallay:\n"
 "\n"
 "  :Izesay <Izesay>\n"
-"      Ecifyspay ethay umbernay ofway ocationslay inway away :Initefay SB orway ethay initialway izesay "
-"ofway away\n"
+"      Ecifyspay ethay umbernay ofway ocationslay inway away :Initefay SB "
+"orway ethay initialway izesay ofway away\n"
 "      :Unboundedway SB."
 
 #: src/compiler/meta-vmdef.lisp
@@ -20033,7 +22734,8 @@ msgid ""
 "      Indicates other SCs that can be used to hold values from this SC "
 "across\n"
 "      calls or when storage in this SC is exhausted.  The SCs should be\n"
-"      specified in order of decreasing \"goodness\".  There must be at least\n"
+"      specified in order of decreasing \"goodness\".  There must be at "
+"least\n"
 "      one SC in an unbounded SB, unless this SC is only used for restricted "
 "or\n"
 "      wired TNs.\n"
@@ -20043,46 +22745,55 @@ msgid ""
 "this\n"
 "      SC by a move function."
 msgstr ""
-"Efineday-Toragesay-Assclay Amenay Umbernay Toragesay-Asebay {Eykay Aluevay}*\n"
-"  Efineday away toragesay assclay Amenay atthay usesway ethay amednay Toragesay-Asebay.  Umbernay isway "
-"away\n"
-"  mallsay, onnay-egativenay integerway atthay isway usedway asway anway aliasway.  Ethay ollowingfay\n"
+"Efineday-Toragesay-Assclay Amenay Umbernay Toragesay-Asebay {Eykay Aluevay}"
+"*\n"
+"  Efineday away toragesay assclay Amenay atthay usesway ethay amednay "
+"Toragesay-Asebay.  Umbernay isway away\n"
+"  mallsay, onnay-egativenay integerway atthay isway usedway asway anway "
+"aliasway.  Ethay ollowingfay\n"
 "  eywordskay areway efinedday:\n"
 "\n"
 "  :Elementway-Izesay Izesay\n"
-"      Ethay izesay ofway objectsway inway isthay SC inway ateverwhay unitsway ethay SB usesway.  Isthay\n"
+"      Ethay izesay ofway objectsway inway isthay SC inway ateverwhay "
+"unitsway ethay SB usesway.  Isthay\n"
 "      efaultsday otay 1.\n"
 "\n"
 "  :Alignmentway Izesay\n"
-"      Ethay alignmentway estrictionsray orfay isthay SC.  Nstay illway onlyway ebay allocatedway "
-"atway\n"
-"      offsetsway atthay areway anway evenway ultiplemay ofway isthay umbernay.  Efaultsday otay 1.\n"
+"      Ethay alignmentway estrictionsray orfay isthay SC.  Nstay illway "
+"onlyway ebay allocatedway atway\n"
+"      offsetsway atthay areway anway evenway ultiplemay ofway isthay "
+"umbernay.  Efaultsday otay 1.\n"
 "\n"
 "  :Ocationslay (Ocation*Lay)\n"
-"      Ifway ethay SB isway :Initefay, enthay isthay isway away istlay ofway ethay offsetsway ithinway ethay "
-"SB\n"
+"      Ifway ethay SB isway :Initefay, enthay isthay isway away istlay ofway "
+"ethay offsetsway ithinway ethay SB\n"
 "      atthay areway inway isthay SC.\n"
 "\n"
 "  :Eserveray-Ocationslay (Ocation*Lay)\n"
-"      Away ubsetsay ofway ethay Ocationslay atthay ethay egisterray allocatorway ouldshay ytray otay\n"
-"      eserveray orfay operandway oadinglay (insteadway ofway otay oldhay ariablevay aluesvay.)\n"
+"      Away ubsetsay ofway ethay Ocationslay atthay ethay egisterray "
+"allocatorway ouldshay ytray otay\n"
+"      eserveray orfay operandway oadinglay (insteadway ofway otay oldhay "
+"ariablevay aluesvay.)\n"
 "\n"
 "  :Avesay-P {T | NIL}\n"
-"      Ifway T, enthay aluesvay toredsay inway isthay SC ustmay ebay avedsay inway oneway ofway ethay\n"
+"      Ifway T, enthay aluesvay toredsay inway isthay SC ustmay ebay avedsay "
+"inway oneway ofway ethay\n"
 "      onnay-avesay-p :Alternateway-Sscay acrossway allscay.\n"
 "\n"
 "  :Alternateway-Sscay (*Scay)\n"
-"      Indicatesway otherway Sscay atthay ancay ebay usedway otay oldhay aluesvay omfray isthay SC "
-"acrossway\n"
-"      allscay orway enwhay toragesay inway isthay SC isway exhaustedway.  Ethay Sscay ouldshay ebay\n"
-"      ecifiedspay inway orderway ofway ecreasingday \"oodnessgay\".  Erethay ustmay ebay atway eastlay\n"
-"      oneway SC inway anway unboundedway SB, unlessway isthay SC isway onlyway usedway orfay estrictedray "
-"orway\n"
+"      Indicatesway otherway Sscay atthay ancay ebay usedway otay oldhay "
+"aluesvay omfray isthay SC acrossway\n"
+"      allscay orway enwhay toragesay inway isthay SC isway exhaustedway.  "
+"Ethay Sscay ouldshay ebay\n"
+"      ecifiedspay inway orderway ofway ecreasingday \"oodnessgay\".  Erethay "
+"ustmay ebay atway eastlay\n"
+"      oneway SC inway anway unboundedway SB, unlessway isthay SC isway "
+"onlyway usedway orfay estrictedray orway\n"
 "      iredway Nstay.\n"
 "\n"
 "  :Onstantcay-Sscay (*Scay)\n"
-"      Away istlay ofway ethay amesnay ofway allway ethay onstantcay Sscay atthay ancay ebay oadedlay intoway "
-"isthay\n"
+"      Away istlay ofway ethay amesnay ofway allway ethay onstantcay Sscay "
+"atthay ancay ebay oadedlay intoway isthay\n"
 "      SC ybay away ovemay unctionfay."
 
 #: src/compiler/meta-vmdef.lisp
@@ -20103,7 +22814,9 @@ msgstr "Eserveray-Ocationslay otnay away ubsetsay ofway Ocationslay."
 
 #: src/compiler/meta-vmdef.lisp
 msgid "Meaningless to specify alternate or constant SCs in a ~S SB."
-msgstr "Eaninglessmay otay ecifyspay alternateway orway onstantcay Sscay inway away ~S SB."
+msgstr ""
+"Eaninglessmay otay ecifyspay alternateway orway onstantcay Sscay inway away "
+"~S SB."
 
 #: src/compiler/meta-vmdef.lisp
 msgid ""
@@ -20118,15 +22831,18 @@ msgid ""
 "  All uses of DEFINE-MOVE-FUNCTION should be compiled before any uses of\n"
 "  DEFINE-VOP."
 msgstr ""
-"Efineday-Ovemay-Unctionfay (Amenay Ostcay) ambdalay-istlay ({(Omfray-*Scay) (Otay-*Scay)}*) orm*fay\n"
-"  Efineday ethay unctionfay Amenay andway otenay itway asway ethay unctionfay usedway orfay ovingmay "
-"operandsway\n"
-"  omfray ethay Omfray-Sscay otay ethay Otay-Sscay.  Ostcay isway ethay ostcay ofway isthay ovemay "
-"operationway.\n"
-"  Ethay unctionfay isway alledcay ithway reethay argumentsway: ethay VOP (orfay ontextcay), andway "
-"ethay\n"
-"  ourcesay andway estinationday Nstay.  Anway ASSEMBLE ormfay isway appedwray aroundway ethay odybay.\n"
-"  Allway usesway ofway DEFINE-MOVE-FUNCTION ouldshay ebay ompiledcay eforebay anyway usesway ofway\n"
+"Efineday-Ovemay-Unctionfay (Amenay Ostcay) ambdalay-istlay ({(Omfray-*Scay) "
+"(Otay-*Scay)}*) orm*fay\n"
+"  Efineday ethay unctionfay Amenay andway otenay itway asway ethay "
+"unctionfay usedway orfay ovingmay operandsway\n"
+"  omfray ethay Omfray-Sscay otay ethay Otay-Sscay.  Ostcay isway ethay "
+"ostcay ofway isthay ovemay operationway.\n"
+"  Ethay unctionfay isway alledcay ithway reethay argumentsway: ethay VOP "
+"(orfay ontextcay), andway ethay\n"
+"  ourcesay andway estinationday Nstay.  Anway ASSEMBLE ormfay isway "
+"appedwray aroundway ethay odybay.\n"
+"  Allway usesway ofway DEFINE-MOVE-FUNCTION ouldshay ebay ompiledcay "
+"eforebay anyway usesway ofway\n"
 "  DEFINE-VOP."
 
 #: src/compiler/meta-vmdef.lisp
@@ -20141,11 +22857,14 @@ msgid ""
 "takes\n"
 "  an extra argument, which is the frame pointer of the frame to move into."
 msgstr ""
-"Efineday-Ovemay-VOP Amenay {:Ovemay | :Ovemay-Argumentway} {(Omfray-*Scay) (Otay-*Scay)}*\n"
-"  Akemay Amenay ebay ethay VOP usedway otay ovemay aluesvay inway ethay ecifiedspay Omfray-Sscay otay ethay\n"
-"  epresentationray ofway ethay Otay-Sscay.  Ifway indkay isway :Ovemay-Argumentway, enthay ethay VOP "
-"akestay\n"
-"  anway extraway argumentway, ichwhay isway ethay amefray ointerpay ofway ethay amefray otay ovemay intoway."
+"Efineday-Ovemay-VOP Amenay {:Ovemay | :Ovemay-Argumentway} {(Omfray-*Scay) "
+"(Otay-*Scay)}*\n"
+"  Akemay Amenay ebay ethay VOP usedway otay ovemay aluesvay inway ethay "
+"ecifiedspay Omfray-Sscay otay ethay\n"
+"  epresentationray ofway ethay Otay-Sscay.  Ifway indkay isway :Ovemay-"
+"Argumentway, enthay ethay VOP akestay\n"
+"  anway extraway argumentway, ichwhay isway ethay amefray ointerpay ofway "
+"ethay amefray otay ovemay intoway."
 
 #: src/compiler/meta-vmdef.lisp
 msgid "Unknown kind ~S."
@@ -20164,13 +22883,15 @@ msgid ""
 "      (defaults to Name.)"
 msgstr ""
 "Efday-Imitivepray-Ypetay Amenay (*Scay) {Eykay Aluevay}*\n"
-"   Efineday away imitivepray ypetay Amenay.  Eachway SC ecifiesspay away Toragesay Assclay atthay "
-"aluesvay\n"
-"   ofway isthay ypetay aymay ebay allocatedway inway.  Ethay ollowingfay eywordkay optionsway areway\n"
+"   Efineday away imitivepray ypetay Amenay.  Eachway SC ecifiesspay away "
+"Toragesay Assclay atthay aluesvay\n"
+"   ofway isthay ypetay aymay ebay allocatedway inway.  Ethay ollowingfay "
+"eywordkay optionsway areway\n"
 "   efinedday:\n"
 "  \n"
 "  :Ypetay\n"
-"      Ethay ypetay escriptorday orfay ethay Isplay ypetay atthay isway equivalentway otay isthay ypetay\n"
+"      Ethay ypetay escriptorday orfay ethay Isplay ypetay atthay isway "
+"equivalentway otay isthay ypetay\n"
 "      (efaultsday otay Amenay.)"
 
 #: src/compiler/meta-vmdef.lisp
@@ -20179,7 +22900,8 @@ msgid ""
 "  Define name to be an alias for Result in VOP operand type restrictions."
 msgstr ""
 "DEF-PRIMITIVE-TYPE-ALIAS Amenay Esultray\n"
-"  Efineday amenay otay ebay anway aliasway orfay Esultray inway VOP operandway ypetay estrictionsray."
+"  Efineday amenay otay ebay anway aliasway orfay Esultray inway VOP "
+"operandway ypetay estrictionsray."
 
 #: src/compiler/meta-vmdef.lisp
 msgid ""
@@ -20193,13 +22915,15 @@ msgid ""
 "      checking that the value is of this type in the process."
 msgstr ""
 "Imitivepray-Ypetay-VOP Opvay (Ind*Kay) Ype*Tay\n"
-"  Annotateway allway ethay ecifiedspay imitivepray Ypestay ithway ethay amednay VOP underway eachway "
-"ofway\n"
+"  Annotateway allway ethay ecifiedspay imitivepray Ypestay ithway ethay "
+"amednay VOP underway eachway ofway\n"
 "  ethay ecifiedspay indskay:\n"
 "\n"
 "  :Eckchay\n"
-"      Away oneway argumentway oneway esultray VOP atthay ovesmay ethay argumentway otay ethay esultray,\n"
-"      eckingchay atthay ethay aluevay isway ofway isthay ypetay inway ethay ocesspray."
+"      Away oneway argumentway oneway esultray VOP atthay ovesmay ethay "
+"argumentway otay ethay esultray,\n"
+"      eckingchay atthay ethay aluevay isway ofway isthay ypetay inway ethay "
+"ocesspray."
 
 #: src/compiler/meta-vmdef.lisp
 msgid "Unknown kind: ~S."
@@ -20249,26 +22973,27 @@ msgstr "Ouldnshay't appenhay?"
 #: src/compiler/meta-vmdef.lisp
 msgid ""
 "No move function defined to ~:[save~;load~] SC ~S~\n"
-"			  ~:[to~;from~] from SC ~S."
+"\t\t\t  ~:[to~;from~] from SC ~S."
 msgstr ""
 "Onay ovemay unctionfay efinedday otay ~:[avesay~;oadlay~] SC ~S~\n"
-"			  ~:[otay~;omfray~] omfray SC ~S."
+"\t\t\t  ~:[otay~;omfray~] omfray SC ~S."
 
 #: src/compiler/meta-vmdef.lisp
 msgid ""
 "Can't tell whether to ~:[save~;load~] with ~S~@\n"
-"				 or ~S when operand is in SC ~S."
+"\t\t\t\t or ~S when operand is in SC ~S."
 msgstr ""
 "Ancay't elltay etherwhay otay ~:[avesay~;oadlay~] ithway ~S~@\n"
-"				 orway ~S enwhay operandway isway inway SC ~S."
+"\t\t\t\t orway ~S enwhay operandway isway inway SC ~S."
 
 #: src/compiler/meta-vmdef.lisp
 msgid ""
 "SC ~S has no alternate~:[~; or constant~] SCs, yet it is~@\n"
-"	          mentioned in the restriction for operand ~S."
+"\t          mentioned in the restriction for operand ~S."
 msgstr ""
-"SC ~S ashay onay alternateway~:[~; orway onstantcay~] Sscay, etyay itway isway~@\n"
-"	          entionedmay inway ethay estrictionray orfay operandway ~S."
+"SC ~S ashay onay alternateway~:[~; orway onstantcay~] Sscay, etyay itway "
+"isway~@\n"
+"\t          entionedmay inway ethay estrictionray orfay operandway ~S."
 
 #: src/compiler/meta-vmdef.lisp
 msgid "Malformed operand specifier: ~S."
@@ -20345,10 +23070,10 @@ msgstr "Unknownway optionway ecifierspay: ~S."
 #: src/compiler/meta-vmdef.lisp
 msgid ""
 "No move function defined to move ~:[from~;to~] SC ~\n"
-"	              ~S~%~:[to~;from~] alternate or constant SC ~S."
+"\t              ~S~%~:[to~;from~] alternate or constant SC ~S."
 msgstr ""
 "Onay ovemay unctionfay efinedday otay ovemay ~:[omfray~;otay~] SC ~\n"
-"	              ~S~%~:[otay~;omfray~] alternateway orway onstantcay SC ~S."
+"\t              ~S~%~:[otay~;omfray~] alternateway orway onstantcay SC ~S."
 
 #: src/compiler/meta-vmdef.lisp
 msgid "Bad thing to be a operand type: ~S."
@@ -20361,10 +23086,10 @@ msgstr "Adbay PRIMITIVE-TYPE amenay inway ~S: ~S"
 #: src/compiler/meta-vmdef.lisp
 msgid ""
 "Can't include primitive-type ~\n"
-"				             alias ~S in a :OR restriction: ~S."
+"\t\t\t\t             alias ~S in a :OR restriction: ~S."
 msgstr ""
 "Ancay't includeway imitivepray-ypetay ~\n"
-"				             aliasway ~S inway away :OR estrictionray: ~S."
+"\t\t\t\t             aliasway ~S inway away :OR estrictionray: ~S."
 
 #: src/compiler/meta-vmdef.lisp
 msgid "Can't :CONSTANT for a result."
@@ -20377,26 +23102,27 @@ msgstr "Adbay :CONSTANT argumentway ypetay ecspay: ~S."
 #: src/compiler/meta-vmdef.lisp
 msgid ""
 "In the ~A ~:[result~;argument~] to VOP ~S,~@\n"
-"	            none of the SCs allowed by the operand type ~S can ~\n"
-"		    directly be loaded~@\n"
-"		    into any of the restriction's SCs:~%  ~S~:[~;~@\n"
-"		    [* type operand must allow T's SCs.]~]"
+"\t            none of the SCs allowed by the operand type ~S can ~\n"
+"\t\t    directly be loaded~@\n"
+"\t\t    into any of the restriction's SCs:~%  ~S~:[~;~@\n"
+"\t\t    [* type operand must allow T's SCs.]~]"
 msgstr ""
 "Inway ethay ~Away ~:[esultray~;argumentway~] otay VOP ~S,~@\n"
-"	            onenay ofway ethay Sscay allowedway ybay ethay operandway ypetay ~S ancay ~\n"
-"		    irectlyday ebay oadedlay~@\n"
-"		    intoway anyway ofway ethay estrictionray's Sscay:~%  ~S~:[~;~@\n"
-"		    [* ypetay operandway ustmay allowway T's Sscay.]~]"
+"\t            onenay ofway ethay Sscay allowedway ybay ethay operandway "
+"ypetay ~S ancay ~\n"
+"\t\t    irectlyday ebay oadedlay~@\n"
+"\t\t    intoway anyway ofway ethay estrictionray's Sscay:~%  ~S~:[~;~@\n"
+"\t\t    [* ypetay operandway ustmay allowway T's Sscay.]~]"
 
 #: src/compiler/meta-vmdef.lisp
 msgid ""
 "~:[Result~;Argument~] ~A to VOP ~S~@\n"
-"	         has SC restriction ~S which is ~\n"
-"		 not allowed by the operand type:~%  ~S"
+"\t         has SC restriction ~S which is ~\n"
+"\t\t not allowed by the operand type:~%  ~S"
 msgstr ""
 "~:[Esultray~;Argumentway~] ~Away otay VOP ~S~@\n"
-"	         ashay SC estrictionray ~S ichwhay isway ~\n"
-"		 otnay allowedway ybay ethay operandway ypetay:~%  ~S"
+"\t         ashay SC estrictionray ~S ichwhay isway ~\n"
+"\t\t otnay allowedway ybay ethay operandway ypetay:~%  ~S"
 
 #: src/compiler/meta-vmdef.lisp
 msgid "Expected ~D ~:[result~;argument~] type: ~S."
@@ -20417,8 +23143,8 @@ msgid ""
 "Define-VOP (Name [Inherits]) Spec*\n"
 "  Define the symbol Name to be a Virtual OPeration in the compiler.  If\n"
 "  specified, Inherits is the name of a VOP that we default unspecified\n"
-"  information from.  Each Spec is a list beginning with a keyword indicating"
-"\n"
+"  information from.  Each Spec is a list beginning with a keyword "
+"indicating\n"
 "  the interpretation of the other forms in the Spec:\n"
 "  \n"
 "  :Args {(Name {Key Value}*)}*\n"
@@ -20432,40 +23158,40 @@ msgid ""
 "      operand options are defined: \n"
 "\n"
 "      :SCs (SC*)\n"
-"	  :SCs specifies good SCs for this operand.  Other SCs will be\n"
-"	  penalized according to move costs.  A load TN will be allocated if\n"
-"	  necessary, guaranteeing that the operand is always one of the\n"
-"	  specified SCs.\n"
+"\t  :SCs specifies good SCs for this operand.  Other SCs will be\n"
+"\t  penalized according to move costs.  A load TN will be allocated if\n"
+"\t  necessary, guaranteeing that the operand is always one of the\n"
+"\t  specified SCs.\n"
 "\n"
 "      :Load-TN Load-Name\n"
 "          Load-Name is bound to the load TN allocated for this operand, or "
 "to\n"
-"	  NIL if no load TN was allocated.\n"
+"\t  NIL if no load TN was allocated.\n"
 "\n"
 "      :Load-If Expression\n"
 "          Controls whether automatic operand loading is done.  Expression "
 "is\n"
-"	  evaluated with the fixed operand TNs bound.  If Expression is true,\n"
-"	  then loading is done and the variable is bound to the load TN in\n"
-"	  the generator body.  Otherwise, loading is not done, and the variable\n"
-"	  is bound to the actual operand.\n"
+"\t  evaluated with the fixed operand TNs bound.  If Expression is true,\n"
+"\t  then loading is done and the variable is bound to the load TN in\n"
+"\t  the generator body.  Otherwise, loading is not done, and the variable\n"
+"\t  is bound to the actual operand.\n"
 "\n"
 "      :More T-or-NIL\n"
-"	  If specified, Name is bound to the TN-Ref for the first argument or\n"
-"	  result following the fixed arguments or results.  A more operand must\n"
-"	  appear last, and cannot be targeted or restricted.\n"
+"\t  If specified, Name is bound to the TN-Ref for the first argument or\n"
+"\t  result following the fixed arguments or results.  A more operand must\n"
+"\t  appear last, and cannot be targeted or restricted.\n"
 "\n"
 "      :Target Operand\n"
-"	  This operand is targeted to the named operand, indicating a desire to\n"
-"	  pack in the same location.  Not legal for results.\n"
+"\t  This operand is targeted to the named operand, indicating a desire to\n"
+"\t  pack in the same location.  Not legal for results.\n"
 "\n"
 "      :From Time-Spec\n"
 "      :To Time-Spec\n"
-"	  Specify the beginning or end of the operand's lifetime.  :From can\n"
-"	  only be used with results, and :To only with arguments.  The default\n"
-"	  for the N'th argument/result is (:ARGUMENT N)/(:RESULT N).  These\n"
-"	  options are necessary primarily when operands are read or written out\n"
-"	  of order.\n"
+"\t  Specify the beginning or end of the operand's lifetime.  :From can\n"
+"\t  only be used with results, and :To only with arguments.  The default\n"
+"\t  for the N'th argument/result is (:ARGUMENT N)/(:RESULT N).  These\n"
+"\t  options are necessary primarily when operands are read or written out\n"
+"\t  of order.\n"
 "   \n"
 "  :Conditional\n"
 "      This is used in place of :RESULTS with conditional branch VOPs.  "
@@ -20486,19 +23212,19 @@ msgid ""
 "\n"
 "      :SC SC-Name\n"
 "      :Offset SB-Offset\n"
-"	  Force the temporary to be allocated in the specified SC with the\n"
-"	  specified offset.  Offset is evaluated at macroexpand time.  If\n"
-"	  Offset is emitted, the register allocator chooses a free location in\n"
-"	  SC.  If both SC and Offset are omitted, then the temporary is packed\n"
-"	  according to its primitive type.\n"
+"\t  Force the temporary to be allocated in the specified SC with the\n"
+"\t  specified offset.  Offset is evaluated at macroexpand time.  If\n"
+"\t  Offset is emitted, the register allocator chooses a free location in\n"
+"\t  SC.  If both SC and Offset are omitted, then the temporary is packed\n"
+"\t  according to its primitive type.\n"
 "\n"
 "      :From Time-Spec\n"
 "      :To Time-Spec\n"
-"	  Similar to the argument/result option, this specifies the start and\n"
-"	  end of the temporarys' lives.  The defaults are :Load and :Save, i.e.\n"
-"	  the duration of the VOP.  The other intervening phases are :Argument,\n"
-"	  :Eval and :Result.  Non-zero sub-phases can be specified by a list,\n"
-"	  e.g. by default the second argument's life ends at (:Argument 1).\n"
+"\t  Similar to the argument/result option, this specifies the start and\n"
+"\t  end of the temporarys' lives.  The defaults are :Load and :Save, i.e.\n"
+"\t  the duration of the VOP.  The other intervening phases are :Argument,\n"
+"\t  :Eval and :Result.  Non-zero sub-phases can be specified by a list,\n"
+"\t  e.g. by default the second argument's life ends at (:Argument 1).\n"
 " \n"
 "  :Generator Cost Form*\n"
 "      Specifies the translation into assembly code. Cost is the estimated "
@@ -20558,15 +23284,15 @@ msgid ""
 "  :Result-Types {* | PType | (:OR PType*)}*\n"
 "      Specify the template type restrictions used for automatic "
 "translation.\n"
-"      If there is a :More operand, the last type is the more type.  :CONSTAN"
-"T\n"
+"      If there is a :More operand, the last type is the more type.  :"
+"CONSTANT\n"
 "      specifies that the argument must be a compile-time constant of the\n"
 "      specified Lisp type.  The constant values of :CONSTANT arguments are\n"
 "      passed as additional :INFO arguments rather than as :ARGS.\n"
 "  \n"
 "  :Translate Name*\n"
-"      This option causes the VOP template to be entered as an IR2 translatio"
-"n\n"
+"      This option causes the VOP template to be entered as an IR2 "
+"translation\n"
 "      for the named functions.\n"
 "\n"
 "  :Policy {:Small | :Fast | :Safe | :Fast-Safe}\n"
@@ -20591,179 +23317,226 @@ msgid ""
 "      frame."
 msgstr ""
 "Efineday-VOP (Amenay [Inheritsway]) Ec*Spay\n"
-"  Efineday ethay ymbolsay Amenay otay ebay away Irtualvay Operationway inway ethay ompilercay.  Ifway\n"
-"  ecifiedspay, Inheritsway isway ethay amenay ofway away VOP atthay eway efaultday unspecifiedway\n"
-"  informationway omfray.  Eachway Ecspay isway away istlay eginningbay ithway away eywordkay indicatingway"
-"\n"
+"  Efineday ethay ymbolsay Amenay otay ebay away Irtualvay Operationway inway "
+"ethay ompilercay.  Ifway\n"
+"  ecifiedspay, Inheritsway isway ethay amenay ofway away VOP atthay eway "
+"efaultday unspecifiedway\n"
+"  informationway omfray.  Eachway Ecspay isway away istlay eginningbay "
+"ithway away eywordkay indicatingway\n"
 "  ethay interpretationway ofway ethay otherway ormsfay inway ethay Ecspay:\n"
 "  \n"
 "  :Argsway {(Amenay {Eykay Aluevay}*)}*\n"
 "  :Esultsray {(Amenay {Eykay Aluevay}*)}*\n"
-"      Ethay Argsway andway Esultsray areway ecificationsspay ofway ethay operandway Nstay assedpay otay "
-"ethay\n"
-"      VOP.  Ifway erethay isway anway inheritedway VOP, anyway unspecifiedway optionsway areway "
-"efaultedday\n"
-"      omfray ethay inheritedway argumentway (orway esultray) ofway ethay amesay amenay.  Ethay "
-"ollowingfay\n"
+"      Ethay Argsway andway Esultsray areway ecificationsspay ofway ethay "
+"operandway Nstay assedpay otay ethay\n"
+"      VOP.  Ifway erethay isway anway inheritedway VOP, anyway "
+"unspecifiedway optionsway areway efaultedday\n"
+"      omfray ethay inheritedway argumentway (orway esultray) ofway ethay "
+"amesay amenay.  Ethay ollowingfay\n"
 "      operandway optionsway areway efinedday: \n"
 "\n"
 "      :Sscay (*Scay)\n"
-"	  :Sscay ecifiesspay oodgay Sscay orfay isthay operandway.  Otherway Sscay illway ebay\n"
-"	  enalizedpay accordingway otay ovemay ostscay.  Away oadlay TN illway ebay allocatedway ifway\n"
-"	  ecessarynay, uaranteeinggay atthay ethay operandway isway alwaysway oneway ofway ethay\n"
-"	  ecifiedspay Sscay.\n"
+"\t  :Sscay ecifiesspay oodgay Sscay orfay isthay operandway.  Otherway Sscay "
+"illway ebay\n"
+"\t  enalizedpay accordingway otay ovemay ostscay.  Away oadlay TN illway "
+"ebay allocatedway ifway\n"
+"\t  ecessarynay, uaranteeinggay atthay ethay operandway isway alwaysway "
+"oneway ofway ethay\n"
+"\t  ecifiedspay Sscay.\n"
 "\n"
 "      :Oadlay-TN Oadlay-Amenay\n"
-"          Oadlay-Amenay isway oundbay otay ethay oadlay TN allocatedway orfay isthay operandway, orway "
-"otay\n"
-"	  NIL ifway onay oadlay TN asway allocatedway.\n"
+"          Oadlay-Amenay isway oundbay otay ethay oadlay TN allocatedway "
+"orfay isthay operandway, orway otay\n"
+"\t  NIL ifway onay oadlay TN asway allocatedway.\n"
 "\n"
 "      :Oadlay-Ifway Expressionway\n"
-"          Ontrolscay etherwhay automaticway operandway oadinglay isway oneday.  Expressionway "
-"isway\n"
-"	  evaluatedway ithway ethay ixedfay operandway Nstay oundbay.  Ifway Expressionway isway uetray,\n"
-"	  enthay oadinglay isway oneday andway ethay ariablevay isway oundbay otay ethay oadlay TN inway\n"
-"	  ethay eneratorgay odybay.  Otherwiseway, oadinglay isway otnay oneday, andway ethay ariablevay\n"
-"	  isway oundbay otay ethay actualway operandway.\n"
+"          Ontrolscay etherwhay automaticway operandway oadinglay isway "
+"oneday.  Expressionway isway\n"
+"\t  evaluatedway ithway ethay ixedfay operandway Nstay oundbay.  Ifway "
+"Expressionway isway uetray,\n"
+"\t  enthay oadinglay isway oneday andway ethay ariablevay isway oundbay otay "
+"ethay oadlay TN inway\n"
+"\t  ethay eneratorgay odybay.  Otherwiseway, oadinglay isway otnay oneday, "
+"andway ethay ariablevay\n"
+"\t  isway oundbay otay ethay actualway operandway.\n"
 "\n"
 "      :Oremay T-orway-NIL\n"
-"	  Ifway ecifiedspay, Amenay isway oundbay otay ethay TN-Efray orfay ethay irstfay argumentway orway\n"
-"	  esultray ollowingfay ethay ixedfay argumentsway orway esultsray.  Away oremay operandway ustmay\n"
-"	  appearway astlay, andway annotcay ebay argetedtay orway estrictedray.\n"
+"\t  Ifway ecifiedspay, Amenay isway oundbay otay ethay TN-Efray orfay ethay "
+"irstfay argumentway orway\n"
+"\t  esultray ollowingfay ethay ixedfay argumentsway orway esultsray.  Away "
+"oremay operandway ustmay\n"
+"\t  appearway astlay, andway annotcay ebay argetedtay orway estrictedray.\n"
 "\n"
 "      :Argettay Operandway\n"
-"	  Isthay operandway isway argetedtay otay ethay amednay operandway, indicatingway away esireday otay\n"
-"	  ackpay inway ethay amesay ocationlay.  Otnay egallay orfay esultsray.\n"
+"\t  Isthay operandway isway argetedtay otay ethay amednay operandway, "
+"indicatingway away esireday otay\n"
+"\t  ackpay inway ethay amesay ocationlay.  Otnay egallay orfay esultsray.\n"
 "\n"
 "      :Omfray Imetay-Ecspay\n"
 "      :Otay Imetay-Ecspay\n"
-"	  Ecifyspay ethay eginningbay orway endway ofway ethay operandway's ifetimelay.  :Omfray ancay\n"
-"	  onlyway ebay usedway ithway esultsray, andway :Otay onlyway ithway argumentsway.  Ethay efaultday\n"
-"	  orfay ethay N'thay argumentway/esultray isway (:ARGUMENT N)/(:RESULT N).  Esethay\n"
-"	  optionsway areway ecessarynay imarilypray enwhay operandsway areway eadray orway ittenwray outway\n"
-"	  ofway orderway.\n"
+"\t  Ecifyspay ethay eginningbay orway endway ofway ethay operandway's "
+"ifetimelay.  :Omfray ancay\n"
+"\t  onlyway ebay usedway ithway esultsray, andway :Otay onlyway ithway "
+"argumentsway.  Ethay efaultday\n"
+"\t  orfay ethay N'thay argumentway/esultray isway (:ARGUMENT N)/(:RESULT "
+"N).  Esethay\n"
+"\t  optionsway areway ecessarynay imarilypray enwhay operandsway areway "
+"eadray orway ittenwray outway\n"
+"\t  ofway orderway.\n"
 "   \n"
 "  :Onditionalcay\n"
-"      Isthay isway usedway inway aceplay ofway :RESULTS ithway onditionalcay anchbray Opsvay.  "
-"Erethay\n"
-"      areway onay esultray aluesvay: ethay esultray isway away ansfertray ofway ontrolcay.  Ethay "
-"argettay\n"
-"      abellay isway assedpay asway ethay irstfay :INFO argway.  Ethay econdsay :INFO argway isway uetray "
-"ifway\n"
-"      ethay ensesay ofway ethay esttay ouldshay ebay egatednay.  Away idesay-effectway isway otay etsay ethay\n"
-"      PREDICATE attributeway orfay unctionsfay inway ethay :TRANSLATE optionway.\n"
+"      Isthay isway usedway inway aceplay ofway :RESULTS ithway onditionalcay "
+"anchbray Opsvay.  Erethay\n"
+"      areway onay esultray aluesvay: ethay esultray isway away ansfertray "
+"ofway ontrolcay.  Ethay argettay\n"
+"      abellay isway assedpay asway ethay irstfay :INFO argway.  Ethay "
+"econdsay :INFO argway isway uetray ifway\n"
+"      ethay ensesay ofway ethay esttay ouldshay ebay egatednay.  Away idesay-"
+"effectway isway otay etsay ethay\n"
+"      PREDICATE attributeway orfay unctionsfay inway ethay :TRANSLATE "
+"optionway.\n"
 "  \n"
 "  :Emporarytay ({Eykay Aluevay}*) Ame*Nay\n"
-"      Allocateway away emporarytay TN orfay eachway Amenay, indingbay atthay ariablevay otay ethay "
-"TN\n"
-"      ithinway ethay odybay ofway ethay eneratorsgay.  Inway additionway otay :Argettay (ichwhay isway \n"
-"      isway ethay amesay asway orfay operandsway), ethay ollowingfay optionsway areway\n"
+"      Allocateway away emporarytay TN orfay eachway Amenay, indingbay atthay "
+"ariablevay otay ethay TN\n"
+"      ithinway ethay odybay ofway ethay eneratorsgay.  Inway additionway "
+"otay :Argettay (ichwhay isway \n"
+"      isway ethay amesay asway orfay operandsway), ethay ollowingfay "
+"optionsway areway\n"
 "      efinedday:\n"
 "\n"
 "      :SC SC-Amenay\n"
 "      :Offsetway SB-Offsetway\n"
-"	  Orcefay ethay emporarytay otay ebay allocatedway inway ethay ecifiedspay SC ithway ethay\n"
-"	  ecifiedspay offsetway.  Offsetway isway evaluatedway atway acroexpandmay imetay.  Ifway\n"
-"	  Offsetway isway emittedway, ethay egisterray allocatorway ooseschay away eefray ocationlay inway\n"
-"	  SC.  Ifway othbay SC andway Offsetway areway omittedway, enthay ethay emporarytay isway ackedpay\n"
-"	  accordingway otay itsway imitivepray ypetay.\n"
+"\t  Orcefay ethay emporarytay otay ebay allocatedway inway ethay ecifiedspay "
+"SC ithway ethay\n"
+"\t  ecifiedspay offsetway.  Offsetway isway evaluatedway atway acroexpandmay "
+"imetay.  Ifway\n"
+"\t  Offsetway isway emittedway, ethay egisterray allocatorway ooseschay away "
+"eefray ocationlay inway\n"
+"\t  SC.  Ifway othbay SC andway Offsetway areway omittedway, enthay ethay "
+"emporarytay isway ackedpay\n"
+"\t  accordingway otay itsway imitivepray ypetay.\n"
 "\n"
 "      :Omfray Imetay-Ecspay\n"
 "      :Otay Imetay-Ecspay\n"
-"	  Imilarsay otay ethay argumentway/esultray optionway, isthay ecifiesspay ethay tartsay andway\n"
-"	  endway ofway ethay emporarystay' iveslay.  Ethay efaultsday areway :Oadlay andway :Avesay, i.e.\n"
-"	  ethay urationday ofway ethay VOP.  Ethay otherway interveningway asesphay areway :Argumentway,\n"
-"	  :Evalway andway :Esultray.  Onnay-erozay ubsay-asesphay ancay ebay ecifiedspay ybay away istlay,\n"
-"	  e.g. ybay efaultday ethay econdsay argumentway's ifelay endsway atway (:Argumentway 1).\n"
+"\t  Imilarsay otay ethay argumentway/esultray optionway, isthay ecifiesspay "
+"ethay tartsay andway\n"
+"\t  endway ofway ethay emporarystay' iveslay.  Ethay efaultsday areway :"
+"Oadlay andway :Avesay, i.e.\n"
+"\t  ethay urationday ofway ethay VOP.  Ethay otherway interveningway "
+"asesphay areway :Argumentway,\n"
+"\t  :Evalway andway :Esultray.  Onnay-erozay ubsay-asesphay ancay ebay "
+"ecifiedspay ybay away istlay,\n"
+"\t  e.g. ybay efaultday ethay econdsay argumentway's ifelay endsway atway (:"
+"Argumentway 1).\n"
 " \n"
 "  :Eneratorgay Ostcay Orm*Fay\n"
-"      Ecifiesspay ethay anslationtray intoway assemblyway odecay. Ostcay isway ethay estimatedway "
-"ostcay\n"
-"      ofway ethay odecay emittedway ybay isthay eneratorgay. Ethay odybay isway arbitraryway Isplay "
-"odecay\n"
-"      atthay emitsway ethay assemblyway anguagelay anslationtray ofway ethay VOP.  Anway Assembleway\n"
-"      ormfay isway appedwray aroundway ethay odybay, osay odecay aymay ebay emittedway ybay usingway ethay\n"
-"      ocallay Instway acromay.  Uringday ethay evaluationway ofway ethay odybay, ethay amesnay ofway "
-"ethay\n"
-"      operandsway andway emporariestay areway oundbay otay ethay actualway Nstay.\n"
+"      Ecifiesspay ethay anslationtray intoway assemblyway odecay. Ostcay "
+"isway ethay estimatedway ostcay\n"
+"      ofway ethay odecay emittedway ybay isthay eneratorgay. Ethay odybay "
+"isway arbitraryway Isplay odecay\n"
+"      atthay emitsway ethay assemblyway anguagelay anslationtray ofway ethay "
+"VOP.  Anway Assembleway\n"
+"      ormfay isway appedwray aroundway ethay odybay, osay odecay aymay ebay "
+"emittedway ybay usingway ethay\n"
+"      ocallay Instway acromay.  Uringday ethay evaluationway ofway ethay "
+"odybay, ethay amesnay ofway ethay\n"
+"      operandsway andway emporariestay areway oundbay otay ethay actualway "
+"Nstay.\n"
 "  \n"
 "  :Effectsway Effect*Way\n"
 "  :Affectedway Effect*Way\n"
-"      Ecifiesspay ethay idesay effectsway atthay isthay VOP ashay andway ethay idesay effectsway "
-"atthay\n"
-"      effectway itsway executionway.  Ifway unspecifiedway, esethay efaultday otay ethay orstway "
-"asecay.\n"
+"      Ecifiesspay ethay idesay effectsway atthay isthay VOP ashay andway "
+"ethay idesay effectsway atthay\n"
+"      effectway itsway executionway.  Ifway unspecifiedway, esethay "
+"efaultday otay ethay orstway asecay.\n"
 "  \n"
 "  :Infoway Ame*Nay\n"
-"      Efineday omesay agicmay argumentsway atthay areway assedpay irectlyday otay ethay odecay\n"
-"      eneratorgay.  Ethay orrespondingcay ailingtray argumentsway otay VOP orway %Imitivepray "
-"areway\n"
-"      toredsay inway ethay VOP ucturestray.  Ithinway ethay odybay ofway ethay eneratorsgay, ethay\n"
-"      amednay ariablesvay areway oundbay otay esethay aluesvay.  Exceptway inway ethay asecay ofway\n"
-"      :Onditionalcay Opsvay, :Infoway argumentsway annotcay ebay ecifiedspay orfay VOPS atthay "
-"areway\n"
-"      ethay irectday anslationtray orfay away unctionfay (ecifiedspay ybay :Anslatetray).\n"
+"      Efineday omesay agicmay argumentsway atthay areway assedpay irectlyday "
+"otay ethay odecay\n"
+"      eneratorgay.  Ethay orrespondingcay ailingtray argumentsway otay VOP "
+"orway %Imitivepray areway\n"
+"      toredsay inway ethay VOP ucturestray.  Ithinway ethay odybay ofway "
+"ethay eneratorsgay, ethay\n"
+"      amednay ariablesvay areway oundbay otay esethay aluesvay.  Exceptway "
+"inway ethay asecay ofway\n"
+"      :Onditionalcay Opsvay, :Infoway argumentsway annotcay ebay ecifiedspay "
+"orfay VOPS atthay areway\n"
+"      ethay irectday anslationtray orfay away unctionfay (ecifiedspay ybay :"
+"Anslatetray).\n"
 "\n"
 "  :Ignoreway Ame*Nay\n"
-"      Ausescay ethay amednay ariablesvay otay ebay eclaredday IGNORE inway ethay eneratorgay "
-"odybay.\n"
+"      Ausescay ethay amednay ariablesvay otay ebay eclaredday IGNORE inway "
+"ethay eneratorgay odybay.\n"
 "\n"
 "  :Ariantvay Ing*Thay\n"
 "  :Ariantvay-Arsvay Ame*Nay\n"
-"      Esethay optionsway ovidepray away ayway otay arameterizepay amiliesfay ofway Opsvay atthay "
-"ifferday\n"
-"      onlyway iviallytray.  :Ariantvay akesmay ethay ecifiedspay evaluatedway Ingsthay ebay ethay\n"
-"      \"ariantvay\" associatedway ithway isthay VOP.  :Ariantvay-Arsvay ausescay ethay amednay\n"
-"      ariablesvay otay ebay oundbay otay ethay orrespondingcay Ingsthay ithinway ethay odybay ofway "
-"ethay\n"
+"      Esethay optionsway ovidepray away ayway otay arameterizepay amiliesfay "
+"ofway Opsvay atthay ifferday\n"
+"      onlyway iviallytray.  :Ariantvay akesmay ethay ecifiedspay "
+"evaluatedway Ingsthay ebay ethay\n"
+"      \"ariantvay\" associatedway ithway isthay VOP.  :Ariantvay-Arsvay "
+"ausescay ethay amednay\n"
+"      ariablesvay otay ebay oundbay otay ethay orrespondingcay Ingsthay "
+"ithinway ethay odybay ofway ethay\n"
 "      eneratorgay.\n"
 "\n"
 "  :Ariantvay-Ostcay Ostcay\n"
-"      Ecifiesspay ethay ostcay ofway isthay VOP, overridingway ethay ostcay ofway anyway inheritedway\n"
+"      Ecifiesspay ethay ostcay ofway isthay VOP, overridingway ethay ostcay "
+"ofway anyway inheritedway\n"
 "      eneratorgay.\n"
 "\n"
 "  :Otenay {Ingstray | NIL}\n"
-"      Away ortshay ounnay-ikelay rasephay escribingday atwhay isthay VOP \"oesday\", i.e. ethay\n"
-"      implementationway ategystray.  Ifway uppliedsay, efficencyway otesnay illway ebay "
-"eneratedgay\n"
-"      enwhay ypetay uncertaintyway eventspray :TRANSLATE omfray orkingway.  NIL inhibitsway "
-"anyway\n"
+"      Away ortshay ounnay-ikelay rasephay escribingday atwhay isthay VOP "
+"\"oesday\", i.e. ethay\n"
+"      implementationway ategystray.  Ifway uppliedsay, efficencyway otesnay "
+"illway ebay eneratedgay\n"
+"      enwhay ypetay uncertaintyway eventspray :TRANSLATE omfray orkingway.  "
+"NIL inhibitsway anyway\n"
 "      efficencyway otenay.\n"
 "\n"
 "  :Argway-Ypestay    {* | Typepay | (:OR Type*Pay) | (:CONSTANT Ypetay)}*\n"
 "  :Esultray-Ypestay {* | Typepay | (:OR Type*Pay)}*\n"
-"      Ecifyspay ethay emplatetay ypetay estrictionsray usedway orfay automaticway "
-"anslationtray.\n"
-"      Ifway erethay isway away :Oremay operandway, ethay astlay ypetay isway ethay oremay ypetay.  :CONSTAN"
-"T\n"
-"      ecifiesspay atthay ethay argumentway ustmay ebay away ompilecay-imetay onstantcay ofway ethay\n"
-"      ecifiedspay Isplay ypetay.  Ethay onstantcay aluesvay ofway :CONSTANT argumentsway areway\n"
-"      assedpay asway additionalway :INFO argumentsway atherray anthay asway :ARGS.\n"
+"      Ecifyspay ethay emplatetay ypetay estrictionsray usedway orfay "
+"automaticway anslationtray.\n"
+"      Ifway erethay isway away :Oremay operandway, ethay astlay ypetay isway "
+"ethay oremay ypetay.  :CONSTANT\n"
+"      ecifiesspay atthay ethay argumentway ustmay ebay away ompilecay-imetay "
+"onstantcay ofway ethay\n"
+"      ecifiedspay Isplay ypetay.  Ethay onstantcay aluesvay ofway :CONSTANT "
+"argumentsway areway\n"
+"      assedpay asway additionalway :INFO argumentsway atherray anthay asway :"
+"ARGS.\n"
 "  \n"
 "  :Anslatetray Ame*Nay\n"
-"      Isthay optionway ausescay ethay VOP emplatetay otay ebay enteredway asway anway IR2 anslatiotray"
-"n\n"
+"      Isthay optionway ausescay ethay VOP emplatetay otay ebay enteredway "
+"asway anway IR2 anslatiotrayn\n"
 "      orfay ethay amednay unctionsfay.\n"
 "\n"
 "  :Olicypay {:Mallsay | :Astfay | :Afesay | :Astfay-Afesay}\n"
-"      Ecifiesspay ethay olicypay underway ichwhay isthay VOP isway ethay estbay anslationtray.\n"
+"      Ecifiesspay ethay olicypay underway ichwhay isthay VOP isway ethay "
+"estbay anslationtray.\n"
 "\n"
 "  :Uardgay Ormfay\n"
-"      Ecifiesspay away Ormfay atthay isway evaluatedway inway ethay obalglay environmentway.  Ifway\n"
-"      ormfay eturnsray NIL, enthay emissionway ofway isthay VOP isway ohibitedpray evenway enwhay\n"
+"      Ecifiesspay away Ormfay atthay isway evaluatedway inway ethay obalglay "
+"environmentway.  Ifway\n"
+"      ormfay eturnsray NIL, enthay emissionway ofway isthay VOP isway "
+"ohibitedpray evenway enwhay\n"
 "      allway otherway estrictionsray areway etmay.\n"
 "\n"
 "  :VOP-Arvay Amenay\n"
 "  :Odenay-Arvay Amenay\n"
-"      Inway ethay eneratorgay, indbay ethay ecifiedspay ariablevay otay ethay VOP orway ethay Odenay "
-"atthay\n"
+"      Inway ethay eneratorgay, indbay ethay ecifiedspay ariablevay otay "
+"ethay VOP orway ethay Odenay atthay\n"
 "      eneratedgay isthay VOP.\n"
 "\n"
 "  :Avesay-P {NIL | T | :Omputecay-Onlyway | :Orcefay-Otay-Tacksay}\n"
 "      Indicatesway owhay away VOP antsway ivelay egistersray avedsay.\n"
 "\n"
-"  :Ovemay-Argsway {NIL | :Ullfay-Allcay | :Ocallay-Allcay | :Nownkay-Eturnray}\n"
-"      Indicatesway ifway andway owhay ethay oremay argsway ouldshay ebay ovedmay intoway away ifferentday\n"
+"  :Ovemay-Argsway {NIL | :Ullfay-Allcay | :Ocallay-Allcay | :Nownkay-"
+"Eturnray}\n"
+"      Indicatesway ifway andway owhay ethay oremay argsway ouldshay ebay "
+"ovedmay intoway away ifferentday\n"
 "      amefray."
 
 #: src/compiler/meta-vmdef.lisp
@@ -20773,7 +23546,8 @@ msgid ""
 "  Block."
 msgstr ""
 "Emitway-Emplatetay Odenay Ockblay Emplatetay Argsway Esultsray [Infoway]\n"
-"  Allcay ethay emitway unctionfay orfay Emplatetay, inkinglay ethay esultray inway atway ethay endway ofway\n"
+"  Allcay ethay emitway unctionfay orfay Emplatetay, inkinglay ethay esultray "
+"inway atway ethay endway ofway\n"
 "  Ockblay."
 
 #: src/compiler/meta-vmdef.lisp
@@ -20795,19 +23569,24 @@ msgid ""
 "  codegen info."
 msgstr ""
 "VOP Amenay Odenay Ockblay Arg*Way Info*Way Esult*Ray\n"
-"  Emitway ethay VOP (orway otherway emplatetay) Amenay atway ethay endway ofway ethay IR2-Ockblay Ockblay,\n"
-"  usingway Odenay orfay ethay ourcesay ontextcay.  Ethay interpretationway ofway ethay emainingray\n"
-"  argumentsway ependsday onway ethay umbernay ofway operandsway ofway ariousvay indskay atthay areway\n"
-"  eclaredday inway ethay emplatetay efinitionday.  VOP annotcay ebay usedway orfay emplatestay "
-"atthay\n"
-"  avehay oremay-argsway orway oremay-esultsray, incesay ethay umbernay ofway argumentsway andway esultsray "
-"isway\n"
+"  Emitway ethay VOP (orway otherway emplatetay) Amenay atway ethay endway "
+"ofway ethay IR2-Ockblay Ockblay,\n"
+"  usingway Odenay orfay ethay ourcesay ontextcay.  Ethay interpretationway "
+"ofway ethay emainingray\n"
+"  argumentsway ependsday onway ethay umbernay ofway operandsway ofway "
+"ariousvay indskay atthay areway\n"
+"  eclaredday inway ethay emplatetay efinitionday.  VOP annotcay ebay usedway "
+"orfay emplatestay atthay\n"
+"  avehay oremay-argsway orway oremay-esultsray, incesay ethay umbernay ofway "
+"argumentsway andway esultsray isway\n"
 "  indeterminateway orfay esethay emplatestay.  Useway Op*Vay insteadway.\n"
 "  \n"
-"  Argsway andway Esultsray areway ethay Nstay atthay areway otay ebay eferencedray ybay ethay emplatetay\n"
-"  asway argumentsway andway esultsray.  Ifway ethay emplatetay ashay odegencay-infoway argumentsway, "
-"enthay\n"
-"  ethay appropriateway umbernay ofway Infoway ormsfay ollowingfay ethay Argumentsway areway usedway orfay\n"
+"  Argsway andway Esultsray areway ethay Nstay atthay areway otay ebay "
+"eferencedray ybay ethay emplatetay\n"
+"  asway argumentsway andway esultsray.  Ifway ethay emplatetay ashay "
+"odegencay-infoway argumentsway, enthay\n"
+"  ethay appropriateway umbernay ofway Infoway ormsfay ollowingfay ethay "
+"Argumentsway areway usedway orfay\n"
 "  odegencay infoway."
 
 #: src/compiler/meta-vmdef.lisp
@@ -20826,32 +23605,36 @@ msgid ""
 "lists.\n"
 "\n"
 "  The Arguments and Results are TNs to be referenced as the first arguments\n"
-"  and results to the template.  More-Args and More-Results are heads of "
-"TN-Ref\n"
+"  and results to the template.  More-Args and More-Results are heads of TN-"
+"Ref\n"
 "  lists that are added onto the end of the TN-Refs for the explicitly "
 "supplied\n"
-"  operand TNs.  The TN-Refs for the more operands must have the TN and "
-"Write-P\n"
+"  operand TNs.  The TN-Refs for the more operands must have the TN and Write-"
+"P\n"
 "  slots correctly initialized.\n"
 "\n"
 "  As with VOP, the Info forms are evaluated and passed as codegen info\n"
 "  arguments."
 msgstr ""
-"Op*Vay Amenay Odenay Ockblay (Arg*Way Oremay-Argsway) (Esult*Ray Oremay-Esultsray) Info*Way\n"
-"  Ikelay VOP, utbay allowsway orfay emissionway ofway emplatestay ithway arbitraryway umbersnay ofway\n"
-"  argumentsway, andway orfay emissionway ofway emplatestay usingway alreadyway-eatedcray TN-Efray "
-"istslay.\n"
-"\n"
-"  Ethay Argumentsway andway Esultsray areway Nstay otay ebay eferencedray asway ethay irstfay argumentsway\n"
-"  andway esultsray otay ethay emplatetay.  Oremay-Argsway andway Oremay-Esultsray areway eadshay ofway "
-"TN-Efray\n"
-"  istslay atthay areway addedway ontoway ethay endway ofway ethay TN-Efsray orfay ethay explicitlyway "
-"uppliedsay\n"
-"  operandway Nstay.  Ethay TN-Efsray orfay ethay oremay operandsway ustmay avehay ethay TN andway "
-"Itewray-P\n"
+"Op*Vay Amenay Odenay Ockblay (Arg*Way Oremay-Argsway) (Esult*Ray Oremay-"
+"Esultsray) Info*Way\n"
+"  Ikelay VOP, utbay allowsway orfay emissionway ofway emplatestay ithway "
+"arbitraryway umbersnay ofway\n"
+"  argumentsway, andway orfay emissionway ofway emplatestay usingway "
+"alreadyway-eatedcray TN-Efray istslay.\n"
+"\n"
+"  Ethay Argumentsway andway Esultsray areway Nstay otay ebay eferencedray "
+"asway ethay irstfay argumentsway\n"
+"  andway esultsray otay ethay emplatetay.  Oremay-Argsway andway Oremay-"
+"Esultsray areway eadshay ofway TN-Efray\n"
+"  istslay atthay areway addedway ontoway ethay endway ofway ethay TN-Efsray "
+"orfay ethay explicitlyway uppliedsay\n"
+"  operandway Nstay.  Ethay TN-Efsray orfay ethay oremay operandsway ustmay "
+"avehay ethay TN andway Itewray-P\n"
 "  otsslay orrectlycay initializedway.\n"
 "\n"
-"  Asway ithway VOP, ethay Infoway ormsfay areway evaluatedway andway assedpay asway odegencay infoway\n"
+"  Asway ithway VOP, ethay Infoway ormsfay areway evaluatedway andway "
+"assedpay asway odegencay infoway\n"
 "  argumentsway."
 
 #: src/compiler/meta-vmdef.lisp
@@ -20870,18 +23653,19 @@ msgstr "Expectedway ~D infoway argsway."
 msgid ""
 "SC-Case TN {({(SC-Name*) | SC-Name | T} Form*)}*\n"
 "  Case off of TN's SC.  The first clause containing TN's SC is evaulated,\n"
-"  returning the values of the last form.  A clause beginning with T specifie"
-"s a\n"
-"  default.  If it appears, it must be last.  If no default is specified, "
-"and no\n"
+"  returning the values of the last form.  A clause beginning with T "
+"specifies a\n"
+"  default.  If it appears, it must be last.  If no default is specified, and "
+"no\n"
 "  clause matches, then an error is signalled."
 msgstr ""
 "SC-Asecay TN {({(SC-Ame*Nay) | SC-Amenay | T} Orm*Fay)}*\n"
-"  Asecay offway ofway TN's SC.  Ethay irstfay auseclay ontainingcay TN's SC isway evaulatedway,\n"
-"  eturningray ethay aluesvay ofway ethay astlay ormfay.  Away auseclay eginningbay ithway T ecifiespay"
-"s away\n"
-"  efaultday.  Ifway itway appearsway, itway ustmay ebay astlay.  Ifway onay efaultday isway ecifiedspay, "
-"andway onay\n"
+"  Asecay offway ofway TN's SC.  Ethay irstfay auseclay ontainingcay TN's SC "
+"isway evaulatedway,\n"
+"  eturningray ethay aluesvay ofway ethay astlay ormfay.  Away auseclay "
+"eginningbay ithway T ecifiespays away\n"
+"  efaultday.  Ifway itway appearsway, itway ustmay ebay astlay.  Ifway onay "
+"efaultday isway ecifiedspay, andway onay\n"
 "  auseclay atchesmay, enthay anway errorway isway ignalledsay."
 
 #: src/compiler/meta-vmdef.lisp
@@ -20898,7 +23682,8 @@ msgid ""
 "  Returns true if TNs SC is any of the named SCs, false otherwise."
 msgstr ""
 "SC-Isway TN *Scay\n"
-"  Eturnsray uetray ifway Nstay SC isway anyway ofway ethay amednay Sscay, alsefay otherwiseway."
+"  Eturnsray uetray ifway Nstay SC isway anyway ofway ethay amednay Sscay, "
+"alsefay otherwiseway."
 
 #: src/compiler/meta-vmdef.lisp
 msgid ""
@@ -20906,19 +23691,21 @@ msgid ""
 "  Iterate over the IR2 blocks in component, in emission order."
 msgstr ""
 "Oday-IR2-Ocksblay (Ockblay-Arvay Omponentcay [Esultray]) Orm*Fay\n"
-"  Iterateway overway ethay IR2 ocksblay inway omponentcay, inway emissionway orderway."
+"  Iterateway overway ethay IR2 ocksblay inway omponentcay, inway emissionway "
+"orderway."
 
 #: src/compiler/meta-vmdef.lisp
 msgid ""
 "DO-LIVE-TNS (TN-Var Live Block [Result]) Form*\n"
-"  Iterate over all the TNs live at some point, with the live set represented"
-" by\n"
+"  Iterate over all the TNs live at some point, with the live set represented "
+"by\n"
 "  a local conflicts bit-vector and the IR2-Block containing the location."
 msgstr ""
 "DO-LIVE-TNS (TN-Arvay Ivelay Ockblay [Esultray]) Orm*Fay\n"
-"  Iterateway overway allway ethay Nstay ivelay atway omesay ointpay, ithway ethay ivelay etsay epresentedray"
-" ybay\n"
-"  away ocallay onflictscay itbay-ectorvay andway ethay IR2-Ockblay ontainingcay ethay ocationlay."
+"  Iterateway overway allway ethay Nstay ivelay atway omesay ointpay, ithway "
+"ethay ivelay etsay epresentedray ybay\n"
+"  away ocallay onflictscay itbay-ectorvay andway ethay IR2-Ockblay "
+"ontainingcay ethay ocationlay."
 
 #: src/compiler/meta-vmdef.lisp
 msgid ""
@@ -20926,7 +23713,8 @@ msgid ""
 "  Iterate over all the IR2 blocks in the environment Env, in emit order."
 msgstr ""
 "DO-ENVIRONMENT-IR2-BLOCKS (Ockblay-Arvay Envway [Esultray]) Orm*Fay\n"
-"  Iterateway overway allway ethay IR2 ocksblay inway ethay environmentway Envway, inway emitway orderway."
+"  Iterateway overway allway ethay IR2 ocksblay inway ethay environmentway "
+"Envway, inway emitway orderway."
 
 #: src/compiler/disassem.lisp
 msgid ""
@@ -20934,13 +23722,17 @@ msgid ""
 "  NIL means use the default.  A value of zero gives the effect of not\n"
 "  aligning the arguments at all."
 msgstr ""
-"Ethay idthway ofway ethay olumncay inway ichwhay instructionway-amesnay areway intedpray.\n"
-"  NIL eansmay useway ethay efaultday.  Away aluevay ofway erozay ivesgay ethay effectway ofway otnay\n"
+"Ethay idthway ofway ethay olumncay inway ichwhay instructionway-amesnay "
+"areway intedpray.\n"
+"  NIL eansmay useway ethay efaultday.  Away aluevay ofway erozay ivesgay "
+"ethay effectway ofway otnay\n"
 "  aligningway ethay argumentsway atway allway."
 
 #: src/compiler/disassem.lisp
 msgid "The column in which end-of-line comments for notes are started."
-msgstr "Ethay olumncay inway ichwhay endway-ofway-inelay ommentscay orfay otesnay areway tartedsay."
+msgstr ""
+"Ethay olumncay inway ichwhay endway-ofway-inelay ommentscay orfay otesnay "
+"areway tartedsay."
 
 #: src/compiler/disassem.lisp
 msgid ""
@@ -20967,7 +23759,8 @@ msgstr ""
 "      Izesay ofway away achinemay addressway, inway itsbay.\n"
 "      \n"
 "  :OPCODE-COLUMN-WIDTH\n"
-"      Idthway ofway ethay olumncay usedway orfay intingpray ethay opcodeway ortionpay ofway ethay\n"
+"      Idthway ofway ethay olumncay usedway orfay intingpray ethay opcodeway "
+"ortionpay ofway ethay\n"
 "      instructionway, orway NIL otay useway ethay efaultday."
 
 #: src/compiler/disassem.lisp
@@ -20986,8 +23779,8 @@ msgid ""
 "  :PREFILTER function\n"
 "      A function which is called (along with all other prefilters, in the\n"
 "      order that their arguments appear in the instruction- format) before\n"
-"      any printing is done, to filter the raw value.  Any uses of READ-SUFFI"
-"X\n"
+"      any printing is done, to filter the raw value.  Any uses of READ-"
+"SUFFIX\n"
 "      must be done inside a prefilter.\n"
 "      \n"
 "  :PRINTER function-string-or-vector\n"
@@ -21003,33 +23796,40 @@ msgid ""
 "      value."
 msgstr ""
 "DEFINE-ARGUMENT-TYPE Amenay {Eykay Aluevay}*\n"
-"  Efineday away isassemblerday argumentway ypetay NAME (ichwhay ancay enthay ebay eferencedray inway\n"
-"  anotherway argumentway efinitionday usingway ethay :TYPE eywordkay argumentway).  Eywordkay\n"
+"  Efineday away isassemblerday argumentway ypetay NAME (ichwhay ancay enthay "
+"ebay eferencedray inway\n"
+"  anotherway argumentway efinitionday usingway ethay :TYPE eywordkay "
+"argumentway).  Eywordkay\n"
 "  argumentsway areway:\n"
 "\n"
 "  :SIGN-EXTEND ooleanbay\n"
-"      Ifway onnay-NIL, ethay awray aluevay ofway isthay argumentway isway ignsay-extendedway.\n"
+"      Ifway onnay-NIL, ethay awray aluevay ofway isthay argumentway isway "
+"ignsay-extendedway.\n"
 "\n"
 "  :TYPE argway-ypetay-amenay\n"
 "      Inheritway anyway opertiespray ofway ivengay argumentway-ypetay.\n"
 "\n"
 "  :PREFILTER unctionfay\n"
-"      Away unctionfay ichwhay isway alledcay (alongway ithway allway otherway efilterspray, inway ethay\n"
-"      orderway atthay eirthay argumentsway appearway inway ethay instructionway- ormatfay) eforebay\n"
-"      anyway intingpray isway oneday, otay ilterfay ethay awray aluevay.  Anyway usesway ofway READ-SUFFI"
-"X\n"
+"      Away unctionfay ichwhay isway alledcay (alongway ithway allway "
+"otherway efilterspray, inway ethay\n"
+"      orderway atthay eirthay argumentsway appearway inway ethay "
+"instructionway- ormatfay) eforebay\n"
+"      anyway intingpray isway oneday, otay ilterfay ethay awray aluevay.  "
+"Anyway usesway ofway READ-SUFFIX\n"
 "      ustmay ebay oneday insideway away efilterpray.\n"
 "      \n"
 "  :PRINTER unctionfay-ingstray-orway-ectorvay\n"
-"      Away unctionfay, ingstray, orway ectorvay ichwhay isway usedway otay intpray anway argumentway ofway\n"
+"      Away unctionfay, ingstray, orway ectorvay ichwhay isway usedway otay "
+"intpray anway argumentway ofway\n"
 "      isthay ypetay.\n"
 "      \n"
 "  :USE-LABEL \n"
-"      Ifway onnay-NIL, ethay aluevay ofway anway argumentway ofway isthay ypetay isway usedway asway anway\n"
-"      addressway, andway ifway atthay addressway occursway insideway ethay isassembledday odecay, itway "
-"isway\n"
-"      eplacedray ybay away abellay.  Ifway isthay isway away unctionfay, itway isway alledcay otay ilterfay "
-"ethay\n"
+"      Ifway onnay-NIL, ethay aluevay ofway anway argumentway ofway isthay "
+"ypetay isway usedway asway anway\n"
+"      addressway, andway ifway atthay addressway occursway insideway ethay "
+"isassembledday odecay, itway isway\n"
+"      eplacedray ybay away abellay.  Ifway isthay isway away unctionfay, "
+"itway isway alledcay otay ilterfay ethay\n"
 "      aluevay."
 
 #: src/compiler/disassem.lisp
@@ -21083,8 +23883,8 @@ msgid ""
 "  :PREFILTER function\n"
 "      A function which is called (along with all other prefilters, in the\n"
 "      order that their arguments appear in the instruction-format) before\n"
-"      any printing is done, to filter the raw value.  Any uses of READ-SUFFI"
-"X\n"
+"      any printing is done, to filter the raw value.  Any uses of READ-"
+"SUFFIX\n"
 "      must be done inside a prefilter.\n"
 "\n"
 "  :PRINTER function-string-or-vector\n"
@@ -21095,66 +23895,89 @@ msgid ""
 "      that address occurs inside the disassembled code, it is replaced by a\n"
 "      label.  If this is a function, it is called to filter the value."
 msgstr ""
-"DEFINE-INSTRUCTION-FORMAT (Amenay Engthlay {Ormatfay-Eykay Aluevay}*) Argway-Ef*Day\n"
-"  Efineday anway instructionway ormatfay NAME orfay ethay isassemblerday's useway.  LENGTH isway\n"
+"DEFINE-INSTRUCTION-FORMAT (Amenay Engthlay {Ormatfay-Eykay Aluevay}*) Argway-"
+"Ef*Day\n"
+"  Efineday anway instructionway ormatfay NAME orfay ethay isassemblerday's "
+"useway.  LENGTH isway\n"
 "  ethay engthlay ofway ethay ormatfay inway itsbay.\n"
 "  Ossiblepay FORMAT-Eyskay:\n"
 "\n"
 "  :INCLUDE otherway-ormatfay-amenay\n"
-"      Inheritway allway argumentsway andway opertiespray ofway ethay ivengay ormatfay.  Anyway\n"
-"      argumentsway efinedday inway ethay urrentcay ormatfay efinitionday illway eitherway odifymay\n"
-"      ethay opycay ofway anway existingway argumentway (eepingkay inway ethay amesay orderway ithway\n"
-"      espectray otay enwhay epray-ilterfay's areway alledcay), ifway itway ashay ethay amesay amenay asway\n"
+"      Inheritway allway argumentsway andway opertiespray ofway ethay ivengay "
+"ormatfay.  Anyway\n"
+"      argumentsway efinedday inway ethay urrentcay ormatfay efinitionday "
+"illway eitherway odifymay\n"
+"      ethay opycay ofway anway existingway argumentway (eepingkay inway "
+"ethay amesay orderway ithway\n"
+"      espectray otay enwhay epray-ilterfay's areway alledcay), ifway itway "
+"ashay ethay amesay amenay asway\n"
 "      oneway, orway ebay addedway otay ethay endway.\n"
 "  :DEFAULT-PRINTER interpray-istlay\n"
-"      Useway ethay ivengay PRINTER-LIST asway away ormatfay otay intpray anyway instructionsway ofway\n"
+"      Useway ethay ivengay PRINTER-LIST asway away ormatfay otay intpray "
+"anyway instructionsway ofway\n"
 "      isthay ormatfay enwhay eythay onday't ecifyspay omethingsay elseway.\n"
 "\n"
-"  Eachway ARG-DEF efinesday oneway argumentway inway ethay ormatfay, andway isway ofway ethay ormfay\n"
+"  Eachway ARG-DEF efinesday oneway argumentway inway ethay ormatfay, andway "
+"isway ofway ethay ormfay\n"
 "    (Argway-Amenay {Argway-Eykay Aluevay}*)\n"
 "\n"
-"  Ossiblepay ARG-Eyskay (ethay aluesvay areway evaulatedway unlessway otherwiseway ecifiedspay):\n"
+"  Ossiblepay ARG-Eyskay (ethay aluesvay areway evaulatedway unlessway "
+"otherwiseway ecifiedspay):\n"
 "  \n"
 "  :FIELDS ytebay-ecspay-istlay\n"
-"      Ethay argumentway akestay aluesvay omfray esethay ieldsfay inway ethay instructionway.  Ifway\n"
-"      ethay istlay isway ofway engthlay oneway, enthay ethay orrespondingcay aluevay isway uppliedsay "
-"ybay\n"
-"      itselfway; otherwiseway itway isway away istlay ofway ethay aluesvay.  Ethay istlay aymay ebay NIL.\n"
+"      Ethay argumentway akestay aluesvay omfray esethay ieldsfay inway ethay "
+"instructionway.  Ifway\n"
+"      ethay istlay isway ofway engthlay oneway, enthay ethay orrespondingcay "
+"aluevay isway uppliedsay ybay\n"
+"      itselfway; otherwiseway itway isway away istlay ofway ethay aluesvay.  "
+"Ethay istlay aymay ebay NIL.\n"
 "  :FIELD ytebay-ecspay\n"
 "      Ethay amesay asway :FIELDS (istlay ytebay-ecspay).\n"
 "\n"
 "  :VALUE aluevay\n"
-"      Ifway ethay argumentway onlyway ashay oneway ieldfay, isthay isway ethay aluevay itway ouldshay avehay,\n"
-"      otherwiseway itway's away istlay ofway ethay aluesvay ofway ethay individualway ieldsfay.  Isthay "
-"ancay\n"
-"      ebay overriddenway inway anway instructionway-efinitionday orway away ormatfay efinitionday\n"
-"      includingway isthay oneway ybay ecifyingspay anotherway, orway NIL otay indicateway atthay "
-"itway's\n"
+"      Ifway ethay argumentway onlyway ashay oneway ieldfay, isthay isway "
+"ethay aluevay itway ouldshay avehay,\n"
+"      otherwiseway itway's away istlay ofway ethay aluesvay ofway ethay "
+"individualway ieldsfay.  Isthay ancay\n"
+"      ebay overriddenway inway anway instructionway-efinitionday orway away "
+"ormatfay efinitionday\n"
+"      includingway isthay oneway ybay ecifyingspay anotherway, orway NIL "
+"otay indicateway atthay itway's\n"
 "      ariablevay.\n"
 "\n"
 "  :SIGN-EXTEND ooleanbay\n"
-"      Ifway onnay-NIL, ethay awray aluevay ofway isthay argumentway isway ignsay-extendedway,\n"
-"      immediatelyway afterway eingbay extractedway omfray ethay instructionway (eforebay anyway\n"
-"      efilterspray areway unray, orfay instanceway).  Ifway ethay argumentway ashay ultiplemay\n"
+"      Ifway onnay-NIL, ethay awray aluevay ofway isthay argumentway isway "
+"ignsay-extendedway,\n"
+"      immediatelyway afterway eingbay extractedway omfray ethay "
+"instructionway (eforebay anyway\n"
+"      efilterspray areway unray, orfay instanceway).  Ifway ethay "
+"argumentway ashay ultiplemay\n"
 "      ieldsfay, eythay areway allway ignsay-extendedway.\n"
 "\n"
 "  :TYPE argway-ypetay-amenay\n"
-"      Inheritway anyway opertiespray ofway ethay ivengay argumentway-ypetay.\n"
+"      Inheritway anyway opertiespray ofway ethay ivengay argumentway-"
+"ypetay.\n"
 "\n"
 "  :PREFILTER unctionfay\n"
-"      Away unctionfay ichwhay isway alledcay (alongway ithway allway otherway efilterspray, inway ethay\n"
-"      orderway atthay eirthay argumentsway appearway inway ethay instructionway-ormatfay) eforebay\n"
-"      anyway intingpray isway oneday, otay ilterfay ethay awray aluevay.  Anyway usesway ofway READ-SUFFI"
-"X\n"
+"      Away unctionfay ichwhay isway alledcay (alongway ithway allway "
+"otherway efilterspray, inway ethay\n"
+"      orderway atthay eirthay argumentsway appearway inway ethay "
+"instructionway-ormatfay) eforebay\n"
+"      anyway intingpray isway oneday, otay ilterfay ethay awray aluevay.  "
+"Anyway usesway ofway READ-SUFFIX\n"
 "      ustmay ebay oneday insideway away efilterpray.\n"
 "\n"
 "  :PRINTER unctionfay-ingstray-orway-ectorvay\n"
-"      Away unctionfay, ingstray, orway ectorvay ichwhay isway usedway otay intpray isthay argumentway.\n"
+"      Away unctionfay, ingstray, orway ectorvay ichwhay isway usedway otay "
+"intpray isthay argumentway.\n"
 "      \n"
 "  :USE-LABEL \n"
-"      Ifway onnay-NIL, ethay aluevay ofway isthay argumentway isway usedway asway anway addressway, andway ifway\n"
-"      atthay addressway occursway insideway ethay isassembledday odecay, itway isway eplacedray ybay away\n"
-"      abellay.  Ifway isthay isway away unctionfay, itway isway alledcay otay ilterfay ethay aluevay."
+"      Ifway onnay-NIL, ethay aluevay ofway isthay argumentway isway usedway "
+"asway anway addressway, andway ifway\n"
+"      atthay addressway occursway insideway ethay isassembledday odecay, "
+"itway isway eplacedray ybay away\n"
+"      abellay.  Ifway isthay isway away unctionfay, itway isway alledcay "
+"otay ilterfay ethay aluevay."
 
 #: src/compiler/disassem.lisp
 msgid "~d bits is not a byte-multiple"
@@ -21162,7 +23985,9 @@ msgstr "~d itsbay isway otnay away ytebay-ultiplemay"
 
 #: src/compiler/disassem.lisp
 msgid "Returns non-NIL if ADDRESS is aligned on a SIZE byte boundary."
-msgstr "Eturnsray onnay-NIL ifway ADDRESS isway alignedway onway away SIZE ytebay oundarybay."
+msgstr ""
+"Eturnsray onnay-NIL ifway ADDRESS isway alignedway onway away SIZE ytebay "
+"oundarybay."
 
 #: src/compiler/disassem.lisp
 msgid "Return ADDRESS aligned *upward* to a SIZE byte boundary."
@@ -21173,7 +23998,8 @@ msgid ""
 "If CAR is eq to the car of OLD-CONS and CDR is eq to the CDR, return\n"
 "  OLD-CONS, otherwise return (cons CAR CDR)."
 msgstr ""
-"Ifway CAR isway eqway otay ethay arcay ofway OLD-CONS andway CDR isway eqway otay ethay CDR, eturnray\n"
+"Ifway CAR isway eqway otay ethay arcay ofway OLD-CONS andway CDR isway eqway "
+"otay ethay CDR, eturnray\n"
 "  OLD-CONS, otherwiseway eturnray (onscay CAR CDR)."
 
 #: src/compiler/disassem.lisp
@@ -21182,13 +24008,17 @@ msgid ""
 "  as long as the results of calling FUN on the elements of LIST are\n"
 "  eq to the original."
 msgstr ""
-"Away implesay (oneway istlay argway) apcarmay atthay avoidsway onsingcay upway away ewnay istlay\n"
-"  asway onglay asway ethay esultsray ofway allingcay FUN onway ethay elementsway ofway LIST areway\n"
+"Away implesay (oneway istlay argway) apcarmay atthay avoidsway onsingcay "
+"upway away ewnay istlay\n"
+"  asway onglay asway ethay esultsray ofway allingcay FUN onway ethay "
+"elementsway ofway LIST areway\n"
 "  eqway otay ethay originalway."
 
 #: src/compiler/disassem.lisp
 msgid "Can't dump functions, so function ref form must be quoted: ~s"
-msgstr "Ancay't umpday unctionsfay, osay unctionfay efray ormfay ustmay ebay otedquay: ~s"
+msgstr ""
+"Ancay't umpday unctionsfay, osay unctionfay efray ormfay ustmay ebay "
+"otedquay: ~s"
 
 #: src/compiler/disassem.lisp
 msgid "Unknown argument ~s"
@@ -21205,10 +24035,10 @@ msgstr "Unknownway argway-ormfay indkay ~s"
 #: src/compiler/disassem.lisp
 msgid ""
 "Cannot label a multiple-field argument ~\n"
-"			      unless using a function: ~s"
+"\t\t\t      unless using a function: ~s"
 msgstr ""
 "Annotcay abellay away ultiplemay-ieldfay argumentway ~\n"
-"			      unlessway usingway away unctionfay: ~s"
+"\t\t\t      unlessway usingway away unctionfay: ~s"
 
 #: src/compiler/disassem.lisp
 msgid "Bogus!  Can't use the :printed value of an arg!"
@@ -21217,16 +24047,18 @@ msgstr "Ogusbay!  Ancay't useway ethay :intedpray aluevay ofway anway argway!"
 #: src/compiler/disassem.lisp
 msgid ""
 "number of constants doesn't match number of fields ~\n"
-"			  in: (~s :constant~{ ~s~})"
+"\t\t\t  in: (~s :constant~{ ~s~})"
 msgstr ""
 "umbernay ofway onstantscay oesnday't atchmay umbernay ofway ieldsfay ~\n"
-"			  inway: (~s :onstantcay~{ ~s~})"
+"\t\t\t  inway: (~s :onstantcay~{ ~s~})"
 
 #: src/compiler/disassem.lisp
-msgid "Can't compare differently sized fields: ~\n"
-"		          (~s :same-as ~s)"
-msgstr "Ancay't omparecay ifferentlyday izedsay ieldsfay: ~\n"
-"		          (~s :amesay-asway ~s)"
+msgid ""
+"Can't compare differently sized fields: ~\n"
+"\t\t          (~s :same-as ~s)"
+msgstr ""
+"Ancay't omparecay ifferentlyday izedsay ieldsfay: ~\n"
+"\t\t          (~s :amesay-asway ~s)"
 
 #: src/compiler/disassem.lisp
 msgid "Bogus test-form: ~s"
@@ -21234,7 +24066,9 @@ msgstr "Ogusbay esttay-ormfay: ~s"
 
 #: src/compiler/disassem.lisp
 msgid "Returns the first non-keyword symbol in a depth-first search of TREE."
-msgstr "Eturnsray ethay irstfay onnay-eywordkay ymbolsay inway away epthday-irstfay earchsay ofway TREE."
+msgstr ""
+"Eturnsray ethay irstfay onnay-eywordkay ymbolsay inway away epthday-irstfay "
+"earchsay ofway TREE."
 
 #: src/compiler/disassem.lisp
 msgid "Illegal printer: ~s"
@@ -21246,7 +24080,8 @@ msgstr "Unknownway interpray elementway: ~s"
 
 #: src/compiler/disassem.lisp
 msgid "First arg to :USING must be a string or #'function"
-msgstr "Irstfay argway otay :USING ustmay ebay away ingstray orway #'unctionfay"
+msgstr ""
+"Irstfay argway otay :USING ustmay ebay away ingstray orway #'unctionfay"
 
 #: src/compiler/disassem.lisp
 msgid "No suitable choice found in ~s"
@@ -21255,17 +24090,18 @@ msgstr "Onay uitablesay oicechay oundfay inway ~s"
 #: src/compiler/disassem.lisp
 msgid ""
 "Returns a version of the disassembly-template PRINTER with compile-time\n"
-"  tests (e.g. :constant without a value), and any :CHOOSE operators resolved"
-"\n"
+"  tests (e.g. :constant without a value), and any :CHOOSE operators "
+"resolved\n"
 "  properly for the args ARGS.  (:CHOOSE Sub*) simply returns the first Sub "
 "in\n"
 "  which every field reference refers to a valid arg."
 msgstr ""
-"Eturnsray away ersionvay ofway ethay isassemblyday-emplatetay PRINTER ithway ompilecay-imetay\n"
-"  eststay (e.g. :onstantcay ithoutway away aluevay), andway anyway :CHOOSE operatorsway esolvedray"
-"\n"
-"  operlypray orfay ethay argsway ARGS.  (:CHOOSE Ub*Say) implysay eturnsray ethay irstfay Ubsay "
-"inway\n"
+"Eturnsray away ersionvay ofway ethay isassemblyday-emplatetay PRINTER ithway "
+"ompilecay-imetay\n"
+"  eststay (e.g. :onstantcay ithoutway away aluevay), andway anyway :CHOOSE "
+"operatorsway esolvedray\n"
+"  operlypray orfay ethay argsway ARGS.  (:CHOOSE Ub*Say) implysay eturnsray "
+"ethay irstfay Ubsay inway\n"
 "  ichwhay everyway ieldfay eferenceray efersray otay away alidvay argway."
 
 #: src/compiler/disassem.lisp
@@ -21278,24 +24114,26 @@ msgid ""
 "          Can't specify fields except using DEFINE-INSTRUCTION-FORMAT.~:>"
 msgstr ""
 "~@<Inway argway ~s:  ~3i~:_~\n"
-"          Ancay't ecifyspay ieldsfay exceptway usingway DEFINE-INSTRUCTION-FORMAT.~:>"
+"          Ancay't ecifyspay ieldsfay exceptway usingway DEFINE-INSTRUCTION-"
+"FORMAT.~:>"
 
 #: src/compiler/disassem.lisp
 msgid ""
 "~@<In arg ~s:  ~3i~:_~\n"
-"				     Field ~s doesn't fit in an ~\n"
-"				     instruction-format ~d bits wide.~:>"
+"\t\t\t\t     Field ~s doesn't fit in an ~\n"
+"\t\t\t\t     instruction-format ~d bits wide.~:>"
 msgstr ""
 "~@<Inway argway ~s:  ~3i~:_~\n"
-"				     Ieldfay ~s oesnday't itfay inway anway ~\n"
-"				     instructionway-ormatfay ~d itsbay ideway.~:>"
+"\t\t\t\t     Ieldfay ~s oesnday't itfay inway anway ~\n"
+"\t\t\t\t     instructionway-ormatfay ~d itsbay ideway.~:>"
 
 #: src/compiler/disassem.lisp
 msgid ""
 "Generate a form to specify global disassembler params.  See the\n"
 "  documentation for SET-DISASSEM-PARAMS for more info."
 msgstr ""
-"Enerategay away ormfay otay ecifyspay obalglay isassemblerday aramspay.  Eesay ethay\n"
+"Enerategay away ormfay otay ecifyspay obalglay isassemblerday aramspay.  "
+"Eesay ethay\n"
 "  ocumentationday orfay SET-DISASSEM-PARAMS orfay oremay infoway."
 
 #: src/compiler/disassem.lisp
@@ -21303,7 +24141,8 @@ msgid ""
 "Generate a form to define a disassembler argument type.  See\n"
 "  DEFINE-ARGUMENT-TYPE for more info."
 msgstr ""
-"Enerategay away ormfay otay efineday away isassemblerday argumentway ypetay.  Eesay\n"
+"Enerategay away ormfay otay efineday away isassemblerday argumentway "
+"ypetay.  Eesay\n"
 "  DEFINE-ARGUMENT-TYPE orfay oremay infoway."
 
 #: src/compiler/disassem.lisp
@@ -21327,30 +24166,33 @@ msgid ""
 "Returns non-NIL if the instruction SPECIAL is a more specific version of\n"
 "  GENERAL (i.e., the same instruction, but with more constraints)."
 msgstr ""
-"Eturnsray onnay-NIL ifway ethay instructionway SPECIAL isway away oremay ecificspay ersionvay ofway\n"
-"  GENERAL (i.e., ethay amesay instructionway, utbay ithway oremay onstraintscay)."
+"Eturnsray onnay-NIL ifway ethay instructionway SPECIAL isway away oremay "
+"ecificspay ersionvay ofway\n"
+"  GENERAL (i.e., ethay amesay instructionway, utbay ithway oremay "
+"onstraintscay)."
 
 #: src/compiler/disassem.lisp
 msgid ""
-"Returns an integer corresponding to the specifivity of the instruction "
-"INST."
+"Returns an integer corresponding to the specifivity of the instruction INST."
 msgstr ""
-"Eturnsray anway integerway orrespondingcay otay ethay ecifivityspay ofway ethay instructionway "
-"INST."
+"Eturnsray anway integerway orrespondingcay otay ethay ecifivityspay ofway "
+"ethay instructionway INST."
 
 #: src/compiler/disassem.lisp
 msgid ""
 "Order the list of instructions INSTS with more specific (more constant\n"
-"  bits, or same-as argument constains) ones first.  Returns the ordered "
-"list."
+"  bits, or same-as argument constains) ones first.  Returns the ordered list."
 msgstr ""
-"Orderway ethay istlay ofway instructionsway INSTS ithway oremay ecificspay (oremay onstantcay\n"
-"  itsbay, orway amesay-asway argumentway onstainscay) onesway irstfay.  Eturnsray ethay orderedway "
-"istlay."
+"Orderway ethay istlay ofway instructionsway INSTS ithway oremay ecificspay "
+"(oremay onstantcay\n"
+"  itsbay, orway amesay-asway argumentway onstainscay) onesway irstfay.  "
+"Eturnsray ethay orderedway istlay."
 
 #: src/compiler/disassem.lisp
 msgid "Instructions either aren't related or conflict in some way:~% ~s"
-msgstr "Instructionsway eitherway arenway't elatedray orway onflictcay inway omesay ayway:~% ~s"
+msgstr ""
+"Instructionsway eitherway arenway't elatedray orway onflictcay inway omesay "
+"ayway:~% ~s"
 
 #: src/compiler/disassem.lisp
 msgid ""
@@ -21358,9 +24200,12 @@ msgid ""
 "  more general form of all the others, in which case they are put into its\n"
 "  specializers list, and it is returned.  Otherwise an error is signaled."
 msgstr ""
-"Ivengay away istlay ofway instructionsway INSTS, Eessay ifway oneway ofway esethay instructionsway isway away\n"
-"  oremay eneralgay ormfay ofway allway ethay othersway, inway ichwhay asecay eythay areway utpay intoway itsway\n"
-"  ecializersspay istlay, andway itway isway eturnedray.  Otherwiseway anway errorway isway ignaledsay."
+"Ivengay away istlay ofway instructionsway INSTS, Eessay ifway oneway ofway "
+"esethay instructionsway isway away\n"
+"  oremay eneralgay ormfay ofway allway ethay othersway, inway ichwhay asecay "
+"eythay areway utpay intoway itsway\n"
+"  ecializersspay istlay, andway itway isway eturnedray.  Otherwiseway anway "
+"errorway isway ignaledsay."
 
 #: src/compiler/disassem.lisp
 msgid "Multiple specializing masters: ~s"
@@ -21368,7 +24213,8 @@ msgstr "Ultiplemay ecializingspay astersmay: ~s"
 
 #: src/compiler/disassem.lisp
 msgid "Returns non-NIL if all constant-bits in INST match CHUNK."
-msgstr "Eturnsray onnay-NIL ifway allway onstantcay-itsbay inway INST atchmay CHUNK."
+msgstr ""
+"Eturnsray onnay-NIL ifway allway onstantcay-itsbay inway INST atchmay CHUNK."
 
 #: src/compiler/disassem.lisp
 msgid ""
@@ -21377,9 +24223,10 @@ msgid ""
 "are\n"
 "  met by CHUNK.  If none do, then INST is returned."
 msgstr ""
-"Ivengay anway instructionway objectway, INST, andway away itbay-atternpay, CHUNK, ickspay ethay\n"
-"  ostmay ecificspay instructionway onway INST's ecializerspay istlay owhay's onstraintscay "
-"areway\n"
+"Ivengay anway instructionway objectway, INST, andway away itbay-atternpay, "
+"CHUNK, ickspay ethay\n"
+"  ostmay ecificspay instructionway onway INST's ecializerspay istlay owhay's "
+"onstraintscay areway\n"
 "  etmay ybay CHUNK.  Ifway onenay oday, enthay INST isway eturnedray."
 
 #: src/compiler/disassem.lisp
@@ -21387,7 +24234,8 @@ msgid ""
 "Returns the instruction object within INST-SPACE corresponding to the\n"
 "  bit-pattern CHUNK, or NIL if there isn't one."
 msgstr ""
-"Eturnsray ethay instructionway objectway ithinway INST-SPACE orrespondingcay otay ethay\n"
+"Eturnsray ethay instructionway objectway ithinway INST-SPACE orrespondingcay "
+"otay ethay\n"
 "  itbay-atternpay CHUNK, orway NIL ifway erethay isnway't oneway."
 
 #: src/compiler/disassem.lisp
@@ -21397,9 +24245,10 @@ msgid ""
 "only\n"
 "  bits it has set are used."
 msgstr ""
-"Eturnsray anway instructionway-acespay objectway orrespondingcay otay ethay istlay ofway\n"
-"  instructionsway INSTS.  Ifway ethay optionalway arameterpay INITIAL-MASK isway uppliedsay, "
-"onlyway\n"
+"Eturnsray anway instructionway-acespay objectway orrespondingcay otay ethay "
+"istlay ofway\n"
+"  instructionsway INSTS.  Ifway ethay optionalway arameterpay INITIAL-MASK "
+"isway uppliedsay, onlyway\n"
 "  itsbay itway ashay etsay areway usedway."
 
 #: src/compiler/disassem.lisp
@@ -21420,33 +24269,46 @@ msgstr "Onvertscay away ytebay-offsetway NUM otay away ordway-offsetway."
 
 #: src/compiler/disassem.lisp
 msgid "Get the value of the property called NAME in DSTATE.  Also setf'able."
-msgstr "Etgay ethay aluevay ofway ethay opertypray alledcay NAME inway DSTATE.  Alsoway etfsay'ableway."
+msgstr ""
+"Etgay ethay aluevay ofway ethay opertypray alledcay NAME inway DSTATE.  "
+"Alsoway etfsay'ableway."
 
 #: src/compiler/disassem.lisp
 msgid "Returns the absolute address of the current instruction in DSTATE."
-msgstr "Eturnsray ethay absoluteway addressway ofway ethay urrentcay instructionway inway DSTATE."
+msgstr ""
+"Eturnsray ethay absoluteway addressway ofway ethay urrentcay instructionway "
+"inway DSTATE."
 
 #: src/compiler/disassem.lisp
 msgid "Returns the absolute address of the next instruction in DSTATE."
-msgstr "Eturnsray ethay absoluteway addressway ofway ethay extnay instructionway inway DSTATE."
+msgstr ""
+"Eturnsray ethay absoluteway addressway ofway ethay extnay instructionway "
+"inway DSTATE."
 
 #: src/compiler/disassem.lisp
 msgid ""
 "Offset of FUNCTION from the start of its code-component's instruction area."
 msgstr ""
-"Offsetway ofway FUNCTION omfray ethay tartsay ofway itsway odecay-omponentcay's instructionway areaway."
+"Offsetway ofway FUNCTION omfray ethay tartsay ofway itsway odecay-"
+"omponentcay's instructionway areaway."
 
 #: src/compiler/disassem.lisp
 msgid "Offset of FUNCTION from the start of its code-component."
-msgstr "Offsetway ofway FUNCTION omfray ethay tartsay ofway itsway odecay-omponentcay."
+msgstr ""
+"Offsetway ofway FUNCTION omfray ethay tartsay ofway itsway odecay-"
+"omponentcay."
 
 #: src/compiler/disassem.lisp
 msgid "Returns the length of the instruction area in CODE-COMPONENT."
-msgstr "Eturnsray ethay engthlay ofway ethay instructionway areaway inway CODE-COMPONENT."
+msgstr ""
+"Eturnsray ethay engthlay ofway ethay instructionway areaway inway CODE-"
+"COMPONENT."
 
 #: src/compiler/disassem.lisp
 msgid "Returns the address of the instruction area in CODE-COMPONENT."
-msgstr "Eturnsray ethay addressway ofway ethay instructionway areaway inway CODE-COMPONENT."
+msgstr ""
+"Eturnsray ethay addressway ofway ethay instructionway areaway inway CODE-"
+"COMPONENT."
 
 #: src/compiler/disassem.lisp
 msgid "Returns the first function in CODE-COMPONENT."
@@ -21461,7 +24323,8 @@ msgid ""
 "Print the function-header (entry-point) pseudo-instruction at the current\n"
 "  location in DSTATE to STREAM."
 msgstr ""
-"Intpray ethay unctionfay-eaderhay (entryway-ointpay) seudopay-instructionway atway ethay urrentcay\n"
+"Intpray ethay unctionfay-eaderhay (entryway-ointpay) seudopay-instructionway "
+"atway ethay urrentcay\n"
 "  ocationlay inway DSTATE otay STREAM."
 
 #: src/compiler/disassem.lisp
@@ -21469,16 +24332,20 @@ msgid ""
 "Iterate through the instructions in SEGMENT, calling FUNCTION\n"
 "  for each instruction, with arguments of CHUNK, STREAM, and DSTATE."
 msgstr ""
-"Iterateway roughthay ethay instructionsway inway SEGMENT, allingcay FUNCTION\n"
-"  orfay eachway instructionway, ithway argumentsway ofway CHUNK, STREAM, andway DSTATE."
+"Iterateway roughthay ethay instructionsway inway SEGMENT, allingcay "
+"FUNCTION\n"
+"  orfay eachway instructionway, ithway argumentsway ofway CHUNK, STREAM, "
+"andway DSTATE."
 
 #: src/compiler/disassem.lisp
 msgid ""
 "Make an initial non-printing disassembly pass through DSTATE, noting any\n"
 "  addresses that are referenced by instructions in this segment."
 msgstr ""
-"Akemay anway initialway onnay-intingpray isassemblyday asspay roughthay DSTATE, otingnay anyway\n"
-"  addressesway atthay areway eferencedray ybay instructionsway inway isthay egmentsay."
+"Akemay anway initialway onnay-intingpray isassemblyday asspay roughthay "
+"DSTATE, otingnay anyway\n"
+"  addressesway atthay areway eferencedray ybay instructionsway inway isthay "
+"egmentsay."
 
 #: src/compiler/disassem.lisp
 msgid ""
@@ -21486,21 +24353,27 @@ msgid ""
 "  function, give them label-numbers, enter them in the hash-table, and make\n"
 "  sure the label list is in sorted order."
 msgstr ""
-"Ifway anyway abelslay inway DSTATE avehay eenbay addedway incesay ethay astlay allcay otay isthay\n"
-"  unctionfay, ivegay emthay abellay-umbersnay, enterway emthay inway ethay ashhay-abletay, andway akemay\n"
+"Ifway anyway abelslay inway DSTATE avehay eenbay addedway incesay ethay "
+"astlay allcay otay isthay\n"
+"  unctionfay, ivegay emthay abellay-umbersnay, enterway emthay inway ethay "
+"ashhay-abletay, andway akemay\n"
 "  uresay ethay abellay istlay isway inway ortedsay orderway."
 
 #: src/compiler/disassem.lisp
 msgid "Get the instruction-space from PARAMS, creating it if necessary."
-msgstr "Etgay ethay instructionway-acespay omfray PARAMS, eatingcray itway ifway ecessarynay."
+msgstr ""
+"Etgay ethay instructionway-acespay omfray PARAMS, eatingcray itway ifway "
+"ecessarynay."
 
 #: src/compiler/disassem.lisp
 msgid ""
 "Print the current address in DSTATE to STREAM, plus any labels that\n"
 "  correspond to it, and leave the cursor in the instruction column."
 msgstr ""
-"Intpray ethay urrentcay addressway inway DSTATE otay STREAM, usplay anyway abelslay atthay\n"
-"  orrespondcay otay itway, andway eavelay ethay ursorcay inway ethay instructionway olumncay."
+"Intpray ethay urrentcay addressway inway DSTATE otay STREAM, usplay anyway "
+"abelslay atthay\n"
+"  orrespondcay otay itway, andway eavelay ethay ursorcay inway ethay "
+"instructionway olumncay."
 
 #: src/compiler/disassem.lisp
 msgid ""
@@ -21508,17 +24381,22 @@ msgid ""
 "  end-of-line comments.  If there is more than one note, a separate line\n"
 "  will be used for each one."
 msgstr ""
-"Intpray away ewlinenay otay STREAM, insertingway anyway endingpay otesnay inway DSTATE asway\n"
-"  endway-ofway-inelay ommentscay.  Ifway erethay isway oremay anthay oneway otenay, away eparatesay inelay\n"
+"Intpray away ewlinenay otay STREAM, insertingway anyway endingpay otesnay "
+"inway DSTATE asway\n"
+"  endway-ofway-inelay ommentscay.  Ifway erethay isway oremay anthay oneway "
+"otenay, away eparatesay inelay\n"
 "  illway ebay usedway orfay eachway oneway."
 
 #: src/compiler/disassem.lisp
 msgid "Disassemble NUM bytes to STREAM as simple `BYTE' instructions"
-msgstr "Isassembleday NUM ytesbay otay STREAM asway implesay `BYTE' instructionsway"
+msgstr ""
+"Isassembleday NUM ytesbay otay STREAM asway implesay `BYTE' instructionsway"
 
 #: src/compiler/disassem.lisp
 msgid "Disassemble NUM machine-words to STREAM as simple `WORD' instructions"
-msgstr "Isassembleday NUM achinemay-ordsway otay STREAM asway implesay `WORD' instructionsway"
+msgstr ""
+"Isassembleday NUM achinemay-ordsway otay STREAM asway implesay `WORD' "
+"instructionsway"
 
 #: src/compiler/disassem.lisp
 msgid "Make a disassembler-state object."
@@ -21533,11 +24411,14 @@ msgid ""
 "  the address), :DEBUG-FUNCTION, :SOURCE-FORM-CACHE (a source-form-cache\n"
 "  object), and :HOOKS (a list of offs-hook objects)."
 msgstr ""
-"Eturnray away emorymay egmentsay ocatedlay atway ethay ystemsay-areaway-ointerpay eturnedray ybay\n"
-"  SAP-MAKER andway LENGTH ytesbay onglay inway ethay isassemday-tatesay objectway DSTATE.\n"
-"  Optionalway eywordkay argumentsway includeway :VIRTUAL-LOCATION (ybay efaultday ethay amesay "
-"asway\n"
-"  ethay addressway), :DEBUG-FUNCTION, :SOURCE-FORM-CACHE (away ourcesay-ormfay-achecay\n"
+"Eturnray away emorymay egmentsay ocatedlay atway ethay ystemsay-areaway-"
+"ointerpay eturnedray ybay\n"
+"  SAP-MAKER andway LENGTH ytesbay onglay inway ethay isassemday-tatesay "
+"objectway DSTATE.\n"
+"  Optionalway eywordkay argumentsway includeway :VIRTUAL-LOCATION (ybay "
+"efaultday ethay amesay asway\n"
+"  ethay addressway), :DEBUG-FUNCTION, :SOURCE-FORM-CACHE (away ourcesay-"
+"ormfay-achecay\n"
 "  objectway), andway :HOOKS (away istlay ofway offsway-ookhay objectsway)."
 
 #: src/compiler/disassem.lisp
@@ -21559,22 +24440,25 @@ msgstr "Onay tartsay ositionspay apmay"
 #: src/compiler/disassem.lisp
 msgid ""
 "Source file ~s has been modified; ~@\n"
-"					 Using form offset instead of file index"
+"\t\t\t\t\t Using form offset instead of file index"
 msgstr ""
 "Ourcesay ilefay ~s ashay eenbay odifiedmay; ~@\n"
-"					 Usingway ormfay offsetway insteadway ofway ilefay indexway"
+"\t\t\t\t\t Usingway ormfay offsetway insteadway ofway ilefay indexway"
 
 #: src/compiler/disassem.lisp
 msgid ""
 "Bogus form-number in form!  The source file has probably ~@\n"
-"		  been changed too much to cope with"
+"\t\t  been changed too much to cope with"
 msgstr ""
-"Ogusbay ormfay-umbernay inway ormfay!  Ethay ourcesay ilefay ashay obablypray ~@\n"
-"		  eenbay angedchay ootay uchmay otay opecay ithway"
+"Ogusbay ormfay-umbernay inway ormfay!  Ethay ourcesay ilefay ashay "
+"obablypray ~@\n"
+"\t\t  eenbay angedchay ootay uchmay otay opecay ithway"
 
 #: src/compiler/disassem.lisp
 msgid "Return the vector of debug-variables currently associated with DSTATE."
-msgstr "Eturnray ethay ectorvay ofway ebugday-ariablesvay urrentlycay associatedway ithway DSTATE."
+msgstr ""
+"Eturnray ethay ectorvay ofway ebugday-ariablesvay urrentlycay associatedway "
+"ithway DSTATE."
 
 #: src/compiler/disassem.lisp
 msgid ""
@@ -21583,10 +24467,12 @@ msgid ""
 "so,\n"
 "  return the offset of that variable in the current debug-variable vector."
 msgstr ""
-"Ivengay ethay OFFSET ofway away ocationlay ithinway ethay ocationlay-oupgray alledcay LG-NAME,\n"
-"  eesay ifway erethay's away urrentcay appingmay otay away ourcesay ariablevay inway DSTATE, andway ifway "
-"osay,\n"
-"  eturnray ethay offsetway ofway atthay ariablevay inway ethay urrentcay ebugday-ariablevay ectorvay."
+"Ivengay ethay OFFSET ofway away ocationlay ithinway ethay ocationlay-oupgray "
+"alledcay LG-NAME,\n"
+"  eesay ifway erethay's away urrentcay appingmay otay away ourcesay "
+"ariablevay inway DSTATE, andway ifway osay,\n"
+"  eturnray ethay offsetway ofway atthay ariablevay inway ethay urrentcay "
+"ebugday-ariablevay ectorvay."
 
 #: src/compiler/disassem.lisp
 msgid ""
@@ -21594,8 +24480,10 @@ msgid ""
 "  new cells (for a total size of NEW-LEN).  The additional elements are\n"
 "  initailized to INITIAL-ELEMENT."
 msgstr ""
-"Eturnray away ewnay ectorvay ichwhay ashay ethay amesay ontentscay asway ethay oldway oneway VEC, usplay\n"
-"  ewnay ellscay (orfay away otaltay izesay ofway NEW-LEN).  Ethay additionalway elementsway areway\n"
+"Eturnray away ewnay ectorvay ichwhay ashay ethay amesay ontentscay asway "
+"ethay oldway oneway VEC, usplay\n"
+"  ewnay ellscay (orfay away otaltay izesay ofway NEW-LEN).  Ethay "
+"additionalway elementsway areway\n"
 "  initailizedway otay INITIAL-ELEMENT."
 
 #: src/compiler/disassem.lisp
@@ -21603,7 +24491,8 @@ msgid ""
 "Returns a STORAGE-INFO struction describing the object-to-source\n"
 "  variable mappings from DEBUG-FUNCTION."
 msgstr ""
-"Eturnsray away STORAGE-INFO uctionstray escribingday ethay objectway-otay-ourcesay\n"
+"Eturnsray away STORAGE-INFO uctionstray escribingday ethay objectway-otay-"
+"ourcesay\n"
 "  ariablevay appingsmay omfray DEBUG-FUNCTION."
 
 #: src/compiler/disassem.lisp
@@ -21612,9 +24501,12 @@ msgid ""
 "  disassembly.  SFCACHE can be either NIL or it can be a SOURCE-FORM-CACHE\n"
 "  structure, in which case it is used to cache forms from files."
 msgstr ""
-"Addway ookshay otay acktray otay acktray ethay ourcesay odecay inway SEGMENT uringday\n"
-"  isassemblyday.  SFCACHE ancay ebay eitherway NIL orway itway ancay ebay away SOURCE-FORM-CACHE\n"
-"  ucturestray, inway ichwhay asecay itway isway usedway otay achecay ormsfay omfray ilesfay."
+"Addway ookshay otay acktray otay acktray ethay ourcesay odecay inway SEGMENT "
+"uringday\n"
+"  isassemblyday.  SFCACHE ancay ebay eitherway NIL orway itway ancay ebay "
+"away SOURCE-FORM-CACHE\n"
+"  ucturestray, inway ichwhay asecay itway isway usedway otay achecay ormsfay "
+"omfray ilesfay."
 
 #: src/compiler/disassem.lisp
 msgid "No-arg-parsing entry point"
@@ -21637,7 +24529,8 @@ msgid ""
 "Returns a list of the segments of memory containing machine code\n"
 "  instructions for FUNCTION."
 msgstr ""
-"Eturnsray away istlay ofway ethay egmentssay ofway emorymay ontainingcay achinemay odecay\n"
+"Eturnsray away istlay ofway ethay egmentssay ofway emorymay ontainingcay "
+"achinemay odecay\n"
 "  instructionsway orfay FUNCTION."
 
 #: src/compiler/disassem.lisp
@@ -21647,9 +24540,12 @@ msgid ""
 "  supplied, only that part of the code-segment is used (but these are\n"
 "  constrained to lie within the code-segment)."
 msgstr ""
-"Eturnsray away istlay ofway ethay egmentssay ofway emorymay ontainingcay achinemay odecay\n"
-"  instructionsway orfay ethay odecay-omponentcay CODE.  Ifway START-OFFS andway/orway LENGTH isway\n"
-"  uppliedsay, onlyway atthay artpay ofway ethay odecay-egmentsay isway usedway (utbay esethay areway\n"
+"Eturnsray away istlay ofway ethay egmentssay ofway emorymay ontainingcay "
+"achinemay odecay\n"
+"  instructionsway orfay ethay odecay-omponentcay CODE.  Ifway START-OFFS "
+"andway/orway LENGTH isway\n"
+"  uppliedsay, onlyway atthay artpay ofway ethay odecay-egmentsay isway "
+"usedway (utbay esethay areway\n"
 "  onstrainedcay otay ielay ithinway ethay odecay-egmentsay)."
 
 #: src/compiler/disassem.lisp
@@ -21657,8 +24553,10 @@ msgid ""
 "Return the address of the instructions for function and its length.\n"
 "  The length is computed using a heuristic, and so may not be accurate."
 msgstr ""
-"Eturnray ethay addressway ofway ethay instructionsway orfay unctionfay andway itsway engthlay.\n"
-"  Ethay engthlay isway omputedcay usingway away euristichay, andway osay aymay otnay ebay accurateway."
+"Eturnray ethay addressway ofway ethay instructionsway orfay unctionfay "
+"andway itsway engthlay.\n"
+"  Ethay engthlay isway omputedcay usingway away euristichay, andway osay "
+"aymay otnay ebay accurateway."
 
 #: src/compiler/disassem.lisp
 msgid ""
@@ -21668,10 +24566,12 @@ msgid ""
 "  segment from the beginning of that instruction.  If all instructions fit\n"
 "  perfectly, this will return 0 and 0."
 msgstr ""
-"Eturnsray wotay aluesvay:  ethay amountway ybay ichwhay ethay astlay instructionway inway ethay\n"
-"  egmentsay oesgay astpay ethay endway ofway ethay egmentsay, andway ethay offsetway ofway ethay endway ofway "
-"ethay\n"
-"  egmentsay omfray ethay eginningbay ofway atthay instructionway.  Ifway allway instructionsway itfay\n"
+"Eturnsray wotay aluesvay:  ethay amountway ybay ichwhay ethay astlay "
+"instructionway inway ethay\n"
+"  egmentsay oesgay astpay ethay endway ofway ethay egmentsay, andway ethay "
+"offsetway ofway ethay endway ofway ethay\n"
+"  egmentsay omfray ethay eginningbay ofway atthay instructionway.  Ifway "
+"allway instructionsway itfay\n"
 "  erfectlypay, isthay illway eturnray 0 andway 0."
 
 #: src/compiler/disassem.lisp
@@ -21681,21 +24581,26 @@ msgid ""
 "you're\n"
 "  interested in, so it can find references from one to another."
 msgstr ""
-"Omputescay abelslay orfay allway ethay emorymay egmentssay inway SEGLIST andway addsway emthay otay\n"
-"  DSTATE.  Itway's importantway otay allcay isthay unctionfay ithway allway ethay egmentssay "
-"ouyay'eray\n"
-"  interestedway inway, osay itway ancay indfay eferencesray omfray oneway otay anotherway."
+"Omputescay abelslay orfay allway ethay emorymay egmentssay inway SEGLIST "
+"andway addsway emthay otay\n"
+"  DSTATE.  Itway's importantway otay allcay isthay unctionfay ithway allway "
+"ethay egmentssay ouyay'eray\n"
+"  interestedway inway, osay itway ancay indfay eferencesray omfray oneway "
+"otay anotherway."
 
 #: src/compiler/disassem.lisp
 msgid "Disassemble the machine code instructions in SEGMENT to STREAM."
-msgstr "Isassembleday ethay achinemay odecay instructionsway inway SEGMENT otay STREAM."
+msgstr ""
+"Isassembleday ethay achinemay odecay instructionsway inway SEGMENT otay "
+"STREAM."
 
 #: src/compiler/disassem.lisp
 msgid ""
 "Disassemble the machine code instructions in each memory segment in\n"
 "  SEGMENTS in turn to STREAM."
 msgstr ""
-"Isassembleday ethay achinemay odecay instructionsway inway eachway emorymay egmentsay inway\n"
+"Isassembleday ethay achinemay odecay instructionsway inway eachway emorymay "
+"egmentsay inway\n"
 "  SEGMENTS inway urntay otay STREAM."
 
 #: src/compiler/disassem.lisp
@@ -21719,24 +24624,27 @@ msgid ""
 "to\n"
 "  disassemble."
 msgstr ""
-"Isassembleday ethay achinemay odecay associatedway ithway OBJECT, ichwhay ancay ebay away\n"
-"  unctionfay, away ambdalay expressionway, orway away ymbolsay ithway away unctionfay efinitionday.  "
-"Ifway\n"
-"  itway isway otnay alreadyway ompiledcay, ethay ompilercay isway alledcay otay oducepray omethingsay "
-"otay\n"
+"Isassembleday ethay achinemay odecay associatedway ithway OBJECT, ichwhay "
+"ancay ebay away\n"
+"  unctionfay, away ambdalay expressionway, orway away ymbolsay ithway away "
+"unctionfay efinitionday.  Ifway\n"
+"  itway isway otnay alreadyway ompiledcay, ethay ompilercay isway alledcay "
+"otay oducepray omethingsay otay\n"
 "  isassembleday."
 
 #: src/compiler/disassem.lisp
 msgid ""
 "Disassembles the given area of memory starting at ADDRESS and LENGTH long.\n"
-"  Note that if CODE-COMPONENT is NIL and this memory could move during a GC,"
-"\n"
+"  Note that if CODE-COMPONENT is NIL and this memory could move during a "
+"GC,\n"
 "  you'd better disable it around the call to this function."
 msgstr ""
-"Isassemblesday ethay ivengay areaway ofway emorymay tartingsay atway ADDRESS andway LENGTH onglay.\n"
-"  Otenay atthay ifway CODE-COMPONENT isway NIL andway isthay emorymay ouldcay ovemay uringday away GC,"
-"\n"
-"  ouyay'd etterbay isableday itway aroundway ethay allcay otay isthay unctionfay."
+"Isassemblesday ethay ivengay areaway ofway emorymay tartingsay atway ADDRESS "
+"andway LENGTH onglay.\n"
+"  Otenay atthay ifway CODE-COMPONENT isway NIL andway isthay emorymay "
+"ouldcay ovemay uringday away GC,\n"
+"  ouyay'd etterbay isableday itway aroundway ethay allcay otay isthay "
+"unctionfay."
 
 #: src/compiler/disassem.lisp
 msgid " Address ~x not in the code component ~s."
@@ -21763,7 +24671,8 @@ msgid ""
 "An alist of (SYMBOL-SLOT-OFFSET . ACCESS-FUNCTION-NAME) for slots in a\n"
 "symbol object that we know about."
 msgstr ""
-"Anway alistway ofway (SYMBOL-SLOT-OFFSET . ACCESS-FUNCTION-NAME) orfay otsslay inway away\n"
+"Anway alistway ofway (SYMBOL-SLOT-OFFSET . ACCESS-FUNCTION-NAME) orfay "
+"otsslay inway away\n"
 "ymbolsay objectway atthay eway nowkay aboutway."
 
 #: src/compiler/disassem.lisp
@@ -21773,9 +24682,12 @@ msgid ""
 "  Returns two values, the symbol and the name of the access function of the\n"
 "  slot."
 msgstr ""
-"Ivengay ADDRESS, ytray andway igurefay outway ifway ichwhay otslay ofway ichwhay ymbolsay isway eingbay\n"
-"  eferedray otay.  Ofway oursecay eway ancay ustjay ivegay upway, osay itway's otnay away igbay ealday...\n"
-"  Eturnsray wotay aluesvay, ethay ymbolsay andway ethay amenay ofway ethay accessway unctionfay ofway ethay\n"
+"Ivengay ADDRESS, ytray andway igurefay outway ifway ichwhay otslay ofway "
+"ichwhay ymbolsay isway eingbay\n"
+"  eferedray otay.  Ofway oursecay eway ancay ustjay ivegay upway, osay "
+"itway's otnay away igbay ealday...\n"
+"  Eturnsray wotay aluesvay, ethay ymbolsay andway ethay amenay ofway ethay "
+"accessway unctionfay ofway ethay\n"
 "  otslay."
 
 #: src/compiler/disassem.lisp
@@ -21785,10 +24697,12 @@ msgid ""
 "big\n"
 "  deal...  Returns two values, the symbol and the access function."
 msgstr ""
-"Ivengay away BYTE-OFFSET omfray NIL, ytray andway igurefay outway ifway ichwhay otslay ofway ichwhay\n"
-"  ymbolsay isway eingbay eferedray otay.  Ofway oursecay eway ancay ustjay ivegay upway, osay itway's otnay away "
-"igbay\n"
-"  ealday...  Eturnsray wotay aluesvay, ethay ymbolsay andway ethay accessway unctionfay."
+"Ivengay away BYTE-OFFSET omfray NIL, ytray andway igurefay outway ifway "
+"ichwhay otslay ofway ichwhay\n"
+"  ymbolsay isway eingbay eferedray otay.  Ofway oursecay eway ancay ustjay "
+"ivegay upway, osay itway's otnay away igbay\n"
+"  ealday...  Eturnsray wotay aluesvay, ethay ymbolsay andway ethay accessway "
+"unctionfay."
 
 #: src/compiler/disassem.lisp
 msgid "Returns the lisp object located BYTE-OFFSET from NIL."
@@ -21800,20 +24714,25 @@ msgid ""
 "  area of the code-object in the current segment and T, or NIL and NIL if\n"
 "  there is no code-object in the current segment."
 msgstr ""
-"Eturnsray wotay aluesvay; ethay isplay-objectway ocatedlay atway BYTE-OFFSET inway ethay onstantcay\n"
-"  areaway ofway ethay odecay-objectway inway ethay urrentcay egmentsay andway T, orway NIL andway NIL ifway\n"
+"Eturnsray wotay aluesvay; ethay isplay-objectway ocatedlay atway BYTE-OFFSET "
+"inway ethay onstantcay\n"
+"  areaway ofway ethay odecay-objectway inway ethay urrentcay egmentsay "
+"andway T, orway NIL andway NIL ifway\n"
 "  erethay isway onay odecay-objectway inway ethay urrentcay egmentsay."
 
 #: src/compiler/disassem.lisp
 msgid "Build an address-name hash-table from the name-address hash"
-msgstr "Uildbay anway addressway-amenay ashhay-abletay omfray ethay amenay-addressway ashhay"
+msgstr ""
+"Uildbay anway addressway-amenay ashhay-abletay omfray ethay amenay-"
+"addressway ashhay"
 
 #: src/compiler/disassem.lisp
 msgid ""
 "Returns the name of the primitive lisp assembler routine or foreign\n"
 "  symbol located at ADDRESS, or NIL if there isn't one."
 msgstr ""
-"Eturnsray ethay amenay ofway ethay imitivepray isplay assemblerway outineray orway oreignfay\n"
+"Eturnsray ethay amenay ofway ethay imitivepray isplay assemblerway outineray "
+"orway oreignfay\n"
 "  ymbolsay ocatedlay atway ADDRESS, orway NIL ifway erethay isnway't oneway."
 
 #: src/compiler/disassem.lisp
@@ -21823,9 +24742,10 @@ msgid ""
 "current\n"
 "  instruction is disassembled."
 msgstr ""
-"Toresay NOTE (ichwhay ancay ebay eitherway away ingstray orway away unctionfay ithway away inglesay\n"
-"  eamstray argumentway) otay ebay intedpray asway anway endway-ofway-inelay ommentcay afterway ethay "
-"urrentcay\n"
+"Toresay NOTE (ichwhay ancay ebay eitherway away ingstray orway away "
+"unctionfay ithway away inglesay\n"
+"  eamstray argumentway) otay ebay intedpray asway anway endway-ofway-inelay "
+"ommentcay afterway ethay urrentcay\n"
 "  instructionway isway isassembledday."
 
 #: src/compiler/disassem.lisp
@@ -21834,8 +24754,10 @@ msgid ""
 "  current code-component, to be printed as an end-of-line comment after the\n"
 "  current instruction is disassembled."
 msgstr ""
-"Toresay away otenay aboutway ethay isplay onstantcay ocatedlay BYTE-OFFSET ytesbay omfray ethay\n"
-"  urrentcay odecay-omponentcay, otay ebay intedpray asway anway endway-ofway-inelay ommentcay afterway ethay\n"
+"Toresay away otenay aboutway ethay isplay onstantcay ocatedlay BYTE-OFFSET "
+"ytesbay omfray ethay\n"
+"  urrentcay odecay-omponentcay, otay ebay intedpray asway anway endway-ofway-"
+"inelay ommentcay afterway ethay\n"
 "  urrentcay instructionway isway isassembledday."
 
 #: src/compiler/disassem.lisp
@@ -21844,8 +24766,10 @@ msgid ""
 "  current code-component, to be printed as an end-of-line comment after the\n"
 "  current instruction is disassembled."
 msgstr ""
-"Toresay away otenay aboutway ethay isplay onstantcay ocatedlay atway ADDR inway ethay\n"
-"  urrentcay odecay-omponentcay, otay ebay intedpray asway anway endway-ofway-inelay ommentcay afterway ethay\n"
+"Toresay away otenay aboutway ethay isplay onstantcay ocatedlay atway ADDR "
+"inway ethay\n"
+"  urrentcay odecay-omponentcay, otay ebay intedpray asway anway endway-ofway-"
+"inelay ommentcay afterway ethay\n"
 "  urrentcay instructionway isway isassembledday."
 
 #: src/compiler/disassem.lisp
@@ -21856,10 +24780,12 @@ msgid ""
 "  to be printed as an end-of-line comment after the current instruction is\n"
 "  disassembled.  Returns non-NIL iff a note was recorded."
 msgstr ""
-"Ifway ethay emorymay addressway ocatedlay NIL-BYTE-OFFSET ytesbay omfray ethay onstantcay NIL\n"
-"  isway away alidvay otslay inway away ymbolsay, toresay away otenay escribingday ichwhay ymbolsay andway "
-"otslay,\n"
-"  otay ebay intedpray asway anway endway-ofway-inelay ommentcay afterway ethay urrentcay instructionway isway\n"
+"Ifway ethay emorymay addressway ocatedlay NIL-BYTE-OFFSET ytesbay omfray "
+"ethay onstantcay NIL\n"
+"  isway away alidvay otslay inway away ymbolsay, toresay away otenay "
+"escribingday ichwhay ymbolsay andway otslay,\n"
+"  otay ebay intedpray asway anway endway-ofway-inelay ommentcay afterway "
+"ethay urrentcay instructionway isway\n"
 "  isassembledday.  Eturnsray onnay-NIL iffway away otenay asway ecordedray."
 
 #: src/compiler/disassem.lisp
@@ -21869,9 +24795,12 @@ msgid ""
 "  be printed as an end-of-line comment after the current instruction is\n"
 "  disassembled.  Returns non-NIL iff a note was recorded."
 msgstr ""
-"Ifway ethay emorymay addressway ocatedlay NIL-BYTE-OFFSET ytesbay omfray ethay onstantcay NIL\n"
-"  isway away alidvay isplay objectway, toresay away otenay escribingday ichwhay ymbolsay andway otslay, otay\n"
-"  ebay intedpray asway anway endway-ofway-inelay ommentcay afterway ethay urrentcay instructionway isway\n"
+"Ifway ethay emorymay addressway ocatedlay NIL-BYTE-OFFSET ytesbay omfray "
+"ethay onstantcay NIL\n"
+"  isway away alidvay isplay objectway, toresay away otenay escribingday "
+"ichwhay ymbolsay andway otslay, otay\n"
+"  ebay intedpray asway anway endway-ofway-inelay ommentcay afterway ethay "
+"urrentcay instructionway isway\n"
 "  isassembledday.  Eturnsray onnay-NIL iffway away otenay asway ecordedray."
 
 #: src/compiler/disassem.lisp
@@ -21882,10 +24811,14 @@ msgid ""
 "  Returns non-NIL iff a note was recorded.  If NOTE-ADDRESS-P is non-NIL, a\n"
 "  note of the address is also made."
 msgstr ""
-"Ifway ADDRESS isway ethay addressway ofway away imitivepray assemblerway outineray orway\n"
-"  oreignfay ymbolsay, toresay away otenay escribingday ichwhay oneway, otay ebay intedpray asway\n"
-"  anway endway-ofway-inelay ommentcay afterway ethay urrentcay instructionway isway isassembledday.\n"
-"  Eturnsray onnay-NIL iffway away otenay asway ecordedray.  Ifway NOTE-ADDRESS-P isway onnay-NIL, away\n"
+"Ifway ADDRESS isway ethay addressway ofway away imitivepray assemblerway "
+"outineray orway\n"
+"  oreignfay ymbolsay, toresay away otenay escribingday ichwhay oneway, otay "
+"ebay intedpray asway\n"
+"  anway endway-ofway-inelay ommentcay afterway ethay urrentcay "
+"instructionway isway isassembledday.\n"
+"  Eturnsray onnay-NIL iffway away otenay asway ecordedray.  Ifway NOTE-"
+"ADDRESS-P isway onnay-NIL, away\n"
 "  otenay ofway ethay addressway isway alsoway ademay."
 
 #: src/compiler/disassem.lisp
@@ -21895,9 +24828,12 @@ msgid ""
 "  the current instruction is disassembled.  Returns non-NIL iff a note\n"
 "  was recorded."
 msgstr ""
-"Ifway NIL-BYTE-OFFSET isway ethay offsetway ofway taticsay unctionfay, toresay away otenay\n"
-"  escribingday ichwhay oneway, otay ebay intedpray asway anway endway-ofway-inelay ommentcay afterway\n"
-"  ethay urrentcay instructionway isway isassembledday.  Eturnsray onnay-NIL iffway away otenay\n"
+"Ifway NIL-BYTE-OFFSET isway ethay offsetway ofway taticsay unctionfay, "
+"toresay away otenay\n"
+"  escribingday ichwhay oneway, otay ebay intedpray asway anway endway-ofway-"
+"inelay ommentcay afterway\n"
+"  ethay urrentcay instructionway isway isassembledday.  Eturnsray onnay-NIL "
+"iffway away otenay\n"
 "  asway ecordedray."
 
 #: src/compiler/disassem.lisp
@@ -21908,10 +24844,12 @@ msgid ""
 "  an end-of-line comment after the current instruction is disassembled.\n"
 "  Returns non-NIL iff a note was recorded."
 msgstr ""
-"Ifway erethay's away alidvay appingmay omfray OFFSET inway ethay toragesay assclay SC-NAME otay away\n"
-"  ourcesay ariablevay, akemay away otenay ofway ethay ourcesay-ariablevay amenay, otay ebay intedpray "
-"asway\n"
-"  anway endway-ofway-inelay ommentcay afterway ethay urrentcay instructionway isway isassembledday.\n"
+"Ifway erethay's away alidvay appingmay omfray OFFSET inway ethay toragesay "
+"assclay SC-NAME otay away\n"
+"  ourcesay ariablevay, akemay away otenay ofway ethay ourcesay-ariablevay "
+"amenay, otay ebay intedpray asway\n"
+"  anway endway-ofway-inelay ommentcay afterway ethay urrentcay "
+"instructionway isway isassembledday.\n"
 "  Eturnsray onnay-NIL iffway away otenay asway ecordedray."
 
 #: src/compiler/disassem.lisp
@@ -21922,10 +24860,14 @@ msgid ""
 "  current instruction is disassembled.  Returns non-NIL iff a note was\n"
 "  recorded."
 msgstr ""
-"Ifway erethay's away alidvay appingmay omfray OFFSET inway ethay toragesay-asebay alledcay SB-NAME\n"
-"  otay away ourcesay ariablevay, akemay away otenay equatingway ASSOC-WITH ithway ethay\n"
-"  ourcesay-ariablevay amenay, otay ebay intedpray asway anway endway-ofway-inelay ommentcay afterway ethay\n"
-"  urrentcay instructionway isway isassembledday.  Eturnsray onnay-NIL iffway away otenay asway\n"
+"Ifway erethay's away alidvay appingmay omfray OFFSET inway ethay toragesay-"
+"asebay alledcay SB-NAME\n"
+"  otay away ourcesay ariablevay, akemay away otenay equatingway ASSOC-WITH "
+"ithway ethay\n"
+"  ourcesay-ariablevay amenay, otay ebay intedpray asway anway endway-ofway-"
+"inelay ommentcay afterway ethay\n"
+"  urrentcay instructionway isway isassembledday.  Eturnsray onnay-NIL iffway "
+"away otenay asway\n"
 "  ecordedray."
 
 #: src/compiler/disassem.lisp
@@ -21949,23 +24891,28 @@ msgid ""
 "the\n"
 "       return-values."
 msgstr ""
-"Enwhay alledcay omfray anway errorway eakbray instructionway's :DISASSEM-CONTROL (orway\n"
-"  :DISASSEM-PRINTER) unctionfay, illway orrectlycay ealday ithway intingpray ethay\n"
+"Enwhay alledcay omfray anway errorway eakbray instructionway's :DISASSEM-"
+"CONTROL (orway\n"
+"  :DISASSEM-PRINTER) unctionfay, illway orrectlycay ealday ithway intingpray "
+"ethay\n"
 "  argumentsway otay ethay eakbray.\n"
 "\n"
 "  ERROR-PARSE-FUN ouldshay ebay away unctionfay atthay acceptsway:\n"
 "    1) away SYSTEM-AREA-POINTER\n"
 "    2) away BYTE-OFFSET omfray ethay SAP otay eginbay atway\n"
-"    3) optionallyway, LENGTH-ONLY, ichwhay ifway onnay-NIL, eansmay otay onlyway eturnray\n"
-"       ethay ytebay engthlay ofway ethay argumentsway (otay avoidway unnecessaryway onsingcay)\n"
-"  Itway ouldshay eadray informationway omfray ethay SAP tartingsay atway BYTE-OFFSET, andway "
-"eturnray\n"
+"    3) optionallyway, LENGTH-ONLY, ichwhay ifway onnay-NIL, eansmay otay "
+"onlyway eturnray\n"
+"       ethay ytebay engthlay ofway ethay argumentsway (otay avoidway "
+"unnecessaryway onsingcay)\n"
+"  Itway ouldshay eadray informationway omfray ethay SAP tartingsay atway "
+"BYTE-OFFSET, andway eturnray\n"
 "  ourfay aluesvay:\n"
 "    1) ethay errorway umbernay\n"
 "    2) ethay otaltay engthlay, inway ytesbay, ofway ethay informationway\n"
-"    3) away istlay ofway SC-Offsetsway ofway ethay ocationslay ofway ethay errorway arameterspay\n"
-"    4) away istlay ofway ethay engthlay (asway eadray omfray ethay SAP), inway ytesbay, ofway eachway ofway "
-"ethay\n"
+"    3) away istlay ofway SC-Offsetsway ofway ethay ocationslay ofway ethay "
+"errorway arameterspay\n"
+"    4) away istlay ofway ethay engthlay (asway eadray omfray ethay SAP), "
+"inway ytesbay, ofway eachway ofway ethay\n"
 "       eturnray-aluesvay."
 
 #: src/compiler/new-assem.lisp
@@ -21977,8 +24924,10 @@ msgid ""
 "Execute BODY (as a progn) without scheduling any of the instructions\n"
 "   generated inside it.  DO NOT throw or return-from out of it."
 msgstr ""
-"Executeway BODY (asway away ognpray) ithoutway edulingschay anyway ofway ethay instructionsway\n"
-"   eneratedgay insideway itway.  DO NOT rowthay orway eturnray-omfray outway ofway itway."
+"Executeway BODY (asway away ognpray) ithoutway edulingschay anyway ofway "
+"ethay instructionsway\n"
+"   eneratedgay insideway itway.  DO NOT rowthay orway eturnray-omfray outway "
+"ofway itway."
 
 #: src/compiler/new-assem.lisp
 msgid "Emit BYTE to SEGMENT."
@@ -21994,30 +24943,31 @@ msgstr "Attemptway otay emitway ~S orfay ethay econdsay imetay."
 
 #: src/compiler/new-assem.lisp
 msgid ""
-"Note that the instruction stream has to be back-patched when label positions"
-"\n"
+"Note that the instruction stream has to be back-patched when label "
+"positions\n"
 "   are finally known.  SIZE bytes are reserved in SEGMENT, and function "
 "will\n"
-"   be called with two arguments: the segment and the position.  The function"
-"\n"
+"   be called with two arguments: the segment and the position.  The "
+"function\n"
 "   should look at the position and the position of any labels it wants to\n"
-"   and emit the correct sequence.  (And it better be the same size as SIZE)"
-".\n"
+"   and emit the correct sequence.  (And it better be the same size as "
+"SIZE).\n"
 "   SIZE can be zero, which is useful if you just want to find out where "
 "things\n"
 "   ended up."
 msgstr ""
-"Otenay atthay ethay instructionway eamstray ashay otay ebay ackbay-atchedpay enwhay abellay ositionspay"
-"\n"
-"   areway inallyfay nownkay.  SIZE ytesbay areway eservedray inway SEGMENT, andway unctionfay "
-"illway\n"
-"   ebay alledcay ithway wotay argumentsway: ethay egmentsay andway ethay ositionpay.  Ethay unctionfay"
-"\n"
-"   ouldshay ooklay atway ethay ositionpay andway ethay ositionpay ofway anyway abelslay itway antsway otay\n"
-"   andway emitway ethay orrectcay equencesay.  (Andway itway etterbay ebay ethay amesay izesay asway SIZE)"
-".\n"
-"   SIZE ancay ebay erozay, ichwhay isway usefulway ifway ouyay ustjay antway otay indfay outway erewhay "
-"ingsthay\n"
+"Otenay atthay ethay instructionway eamstray ashay otay ebay ackbay-atchedpay "
+"enwhay abellay ositionspay\n"
+"   areway inallyfay nownkay.  SIZE ytesbay areway eservedray inway SEGMENT, "
+"andway unctionfay illway\n"
+"   ebay alledcay ithway wotay argumentsway: ethay egmentsay andway ethay "
+"ositionpay.  Ethay unctionfay\n"
+"   ouldshay ooklay atway ethay ositionpay andway ethay ositionpay ofway "
+"anyway abelslay itway antsway otay\n"
+"   andway emitway ethay orrectcay equencesay.  (Andway itway etterbay ebay "
+"ethay amesay izesay asway SIZE).\n"
+"   SIZE ancay ebay erozay, ichwhay isway usefulway ifway ouyay ustjay antway "
+"otay indfay outway erewhay ingsthay\n"
 "   endedway upway."
 
 #: src/compiler/new-assem.lisp
@@ -22041,23 +24991,28 @@ msgid ""
 "called,\n"
 "   just like a BACK-PATCH.  (See EMIT-BACK-PATCH.)"
 msgstr ""
-"Otenay atthay ethay instructionway eamstray erehay ependsday onway ethay actualway ositionspay ofway\n"
-"   ariousvay abelslay, osay ancay't ebay outputway untilway abellay ositionspay areway nownkay.  "
-"Acespay\n"
-"   isway ademay inway SEGMENT orfay atway eastlay SIZE ytesbay.  Enwhay allway outputway ashay eenbay\n"
-"   eneratedgay, ethay MAYBE-SHRINK unctionsfay orfay allway ooserschay areway alledcay ithway\n"
-"   reethay argumentsway: ethay egmentsay, ethay ositionpay, andway away agicmay aluevay.  Ethay "
-"MAYBE-\n"
-"   SHRINK ecidesday ifway itway ancay useway away ortershay equencesay, andway ifway osay, emitsway atthay\n"
-"   equencesay otay ethay egmentsay andway eturnsray T.  Ifway itway ancay't oday etterbay anthay ethay\n"
-"   orstway asecay, itway ouldshay eturnray NIL (ithoutway emittingway anythingway).  Enwhay "
-"allingcay\n"
-"   LABEL-POSITION, itway ouldshay asspay itway ethay ositionpay andway ethay agicmay-aluevay itway "
-"asway\n"
-"   assedpay osay atthay LABEL-POSITION ancay eturnray ethay orrectcay esultray.  Ifway ethay "
-"ooserchay\n"
-"   evernay ecidesday otay useway away ortershay equencesay, ethay WORST-CASE-FUN illway ebay "
-"alledcay,\n"
+"Otenay atthay ethay instructionway eamstray erehay ependsday onway ethay "
+"actualway ositionspay ofway\n"
+"   ariousvay abelslay, osay ancay't ebay outputway untilway abellay "
+"ositionspay areway nownkay.  Acespay\n"
+"   isway ademay inway SEGMENT orfay atway eastlay SIZE ytesbay.  Enwhay "
+"allway outputway ashay eenbay\n"
+"   eneratedgay, ethay MAYBE-SHRINK unctionsfay orfay allway ooserschay "
+"areway alledcay ithway\n"
+"   reethay argumentsway: ethay egmentsay, ethay ositionpay, andway away "
+"agicmay aluevay.  Ethay MAYBE-\n"
+"   SHRINK ecidesday ifway itway ancay useway away ortershay equencesay, "
+"andway ifway osay, emitsway atthay\n"
+"   equencesay otay ethay egmentsay andway eturnsray T.  Ifway itway ancay't "
+"oday etterbay anthay ethay\n"
+"   orstway asecay, itway ouldshay eturnray NIL (ithoutway emittingway "
+"anythingway).  Enwhay allingcay\n"
+"   LABEL-POSITION, itway ouldshay asspay itway ethay ositionpay andway ethay "
+"agicmay-aluevay itway asway\n"
+"   assedpay osay atthay LABEL-POSITION ancay eturnray ethay orrectcay "
+"esultray.  Ifway ethay ooserchay\n"
+"   evernay ecidesday otay useway away ortershay equencesay, ethay WORST-CASE-"
+"FUN illway ebay alledcay,\n"
 "   ustjay ikelay away BACK-PATCH.  (Eesay EMIT-BACK-PATCH.)"
 
 #: src/compiler/new-assem.lisp
@@ -22067,20 +25022,22 @@ msgstr "~S emittedway ~D ytesbay, utbay aimedclay itway's axmay asway ~D"
 #: src/compiler/new-assem.lisp
 msgid ""
 "~S shrunk by ~D bytes, but claimed that it ~\n"
-"			    preserve ~D bits of alignment."
+"\t\t\t    preserve ~D bits of alignment."
 msgstr ""
 "~S runkshay ybay ~D ytesbay, utbay aimedclay atthay itway ~\n"
-"			    eservepray ~D itsbay ofway alignmentway."
+"\t\t\t    eservepray ~D itsbay ofway alignmentway."
 
 #: src/compiler/new-assem.lisp
 msgid "Chooser ~S passed, but not before emitting ~D bytes."
 msgstr "Ooserchay ~S assedpay, utbay otnay eforebay emittingway ~D ytesbay."
 
 #: src/compiler/new-assem.lisp
-msgid "Alignment ~S needs more space now?  It was ~D, ~\n"
-"			    and is ~D now."
-msgstr "Alignmentway ~S eedsnay oremay acespay ownay?  Itway asway ~D, ~\n"
-"			    andway isway ~D ownay."
+msgid ""
+"Alignment ~S needs more space now?  It was ~D, ~\n"
+"\t\t\t    and is ~D now."
+msgstr ""
+"Alignmentway ~S eedsnay oremay acespay ownay?  Itway asway ~D, ~\n"
+"\t\t\t    andway isway ~D ownay."
 
 #: src/compiler/new-assem.lisp
 msgid "~S emitted ~D bytes, but claimed it's was ~D"
@@ -22088,7 +25045,9 @@ msgstr "~S emittedway ~D ytesbay, utbay aimedclay itway's asway ~D"
 
 #: src/compiler/new-assem.lisp
 msgid "Execute BODY (as a progn) with SEGMENT as the current segment."
-msgstr "Executeway BODY (asway away ognpray) ithway SEGMENT asway ethay urrentcay egmentsay."
+msgstr ""
+"Executeway BODY (asway away ognpray) ithway SEGMENT asway ethay urrentcay "
+"egmentsay."
 
 #: src/compiler/new-assem.lisp
 msgid "Duplicate nested labels: ~S"
@@ -22096,7 +25055,8 @@ msgstr "Uplicateday estednay abelslay: ~S"
 
 #: src/compiler/new-assem.lisp
 msgid "Emit the specified instruction to the current segment."
-msgstr "Emitway ethay ecifiedspay instructionway otay ethay urrentcay egmentsay."
+msgstr ""
+"Emitway ethay ecifiedspay instructionway otay ethay urrentcay egmentsay."
 
 #: src/compiler/new-assem.lisp
 msgid "Unknown instruction: ~S"
@@ -22108,22 +25068,26 @@ msgstr "Emitway LABEL atway isthay ocationlay inway ethay urrentcay egmentsay."
 
 #: src/compiler/new-assem.lisp
 msgid "Emit an alignment restriction to the current segment."
-msgstr "Emitway anway alignmentway estrictionray otay ethay urrentcay egmentsay."
+msgstr ""
+"Emitway anway alignmentway estrictionray otay ethay urrentcay egmentsay."
 
 #: src/compiler/new-assem.lisp
 msgid ""
 "Return the current position for LABEL.  Chooser maybe-shrink functions\n"
 "   should supply IF-AFTER and DELTA to assure correct results."
 msgstr ""
-"Eturnray ethay urrentcay ositionpay orfay LABEL.  Ooserchay aybemay-rinkshay unctionsfay\n"
-"   ouldshay upplysay IF-AFTER andway DELTA otay assureway orrectcay esultsray."
+"Eturnray ethay urrentcay ositionpay orfay LABEL.  Ooserchay aybemay-rinkshay "
+"unctionsfay\n"
+"   ouldshay upplysay IF-AFTER andway DELTA otay assureway orrectcay "
+"esultsray."
 
 #: src/compiler/new-assem.lisp
 msgid ""
 "Append OTHER-SEGMENT to the end of SEGMENT.  Don't use OTHER-SEGMENT\n"
 "   for anything after this."
 msgstr ""
-"Appendway OTHER-SEGMENT otay ethay endway ofway SEGMENT.  Onday't useway OTHER-SEGMENT\n"
+"Appendway OTHER-SEGMENT otay ethay endway ofway SEGMENT.  Onday't useway "
+"OTHER-SEGMENT\n"
 "   orfay anythingway afterway isthay."
 
 #: src/compiler/new-assem.lisp
@@ -22131,7 +25095,8 @@ msgid ""
 "Does any final processing of SEGMENT and returns the total number of bytes\n"
 "   covered by this segment."
 msgstr ""
-"Oesday anyway inalfay ocessingpray ofway SEGMENT andway eturnsray ethay otaltay umbernay ofway ytesbay\n"
+"Oesday anyway inalfay ocessingpray ofway SEGMENT andway eturnsray ethay "
+"otaltay umbernay ofway ytesbay\n"
 "   overedcay ybay isthay egmentsay."
 
 #: src/compiler/new-assem.lisp
@@ -22139,20 +25104,23 @@ msgid ""
 "Call FUNCTION on all the output accumulated in SEGMENT.  FUNCTION is called\n"
 "   zero or more times with two arguments: a SAP and a number of bytes."
 msgstr ""
-"Allcay FUNCTION onway allway ethay outputway accumulatedway inway SEGMENT.  FUNCTION isway alledcay\n"
-"   erozay orway oremay imestay ithway wotay argumentsway: away SAP andway away umbernay ofway ytesbay."
+"Allcay FUNCTION onway allway ethay outputway accumulatedway inway SEGMENT.  "
+"FUNCTION isway alledcay\n"
+"   erozay orway oremay imestay ithway wotay argumentsway: away SAP andway "
+"away umbernay ofway ytesbay."
 
 #: src/compiler/new-assem.lisp
 msgid "Releases any output buffers held on to by segment."
-msgstr "Eleasesray anyway outputway uffersbay eldhay onway otay ybay egmentsay."
+msgstr ""
+"Eleasesray anyway outputway uffersbay eldhay onway otay ybay egmentsay."
 
 #: src/compiler/new-assem.lisp
 msgid ""
 "Byte spec ~S either overlaps another byte spec, or ~\n"
-"		    extends past the end."
+"\t\t    extends past the end."
 msgstr ""
 "Ytebay ecspay ~S eitherway overlapsway anotherway ytebay ecspay, orway ~\n"
-"		    extendsway astpay ethay endway."
+"\t\t    extendsway astpay ethay endway."
 
 #: src/compiler/new-assem.lisp
 msgid "There are holes."
@@ -22178,11 +25146,12 @@ msgstr "Ancay onlyway ecifyspay :opvay-arvay onceway."
 msgid ""
 "defallocators {((name lambda-list [real-lambda-list]) thread-slot\n"
 "                   (deinit-form*)\n"
-"		   (reinit-form*))}*"
+"\t\t   (reinit-form*))}*"
 msgstr ""
-"efallocatorsday {((amenay ambdalay-istlay [ealray-ambdalay-istlay]) readthay-otslay\n"
+"efallocatorsday {((amenay ambdalay-istlay [ealray-ambdalay-istlay]) readthay-"
+"otslay\n"
 "                   (einitday-orm*fay)\n"
-"		   (einitray-orm*fay))}*"
+"\t\t   (einitray-orm*fay))}*"
 
 #: src/compiler/knownfun.lisp
 msgid "optimize"
@@ -22194,22 +25163,28 @@ msgstr "~S isway otnay away nownkay unctionfay."
 
 #: src/compiler/main.lisp
 msgid "The default value for the :Block-Compile argument to COMPILE-FILE."
-msgstr "Ethay efaultday aluevay orfay ethay :Ockblay-Ompilecay argumentway otay COMPILE-FILE."
+msgstr ""
+"Ethay efaultday aluevay orfay ethay :Ockblay-Ompilecay argumentway otay "
+"COMPILE-FILE."
 
 #: src/compiler/main.lisp
 msgid "The default value for the :Byte-Compile argument to COMPILE-FILE."
-msgstr "Ethay efaultday aluevay orfay ethay :Ytebay-Ompilecay argumentway otay COMPILE-FILE."
+msgstr ""
+"Ethay efaultday aluevay orfay ethay :Ytebay-Ompilecay argumentway otay "
+"COMPILE-FILE."
 
 #: src/compiler/main.lisp
+#, fuzzy
 msgid ""
-"Similar to *BYTE-COMPILE-DEFAULT*, but controls the compilation of top-level"
-"\n"
-"   forms (evaluated at load-time) when the :BYTE-COMPILE argument is :MAYBE\n"
-"   (the default.)  When true, we decide to byte-compile."
+"Similar to *BYTE-COMPILE-DEFAULT*, but controls the compilation of top-"
+"level\n"
+"  forms (evaluated at load-time) when the :BYTE-COMPILE argument is :MAYBE\n"
+"  (the default.)  When true, we decide to byte-compile."
 msgstr ""
-"Imilarsay otay *BYTE-COMPILE-DEFAULT*, utbay ontrolscay ethay ompilationcay ofway optay-evellay"
-"\n"
-"   ormsfay (evaluatedway atway oadlay-imetay) enwhay ethay :BYTE-COMPILE argumentway isway :MAYBE\n"
+"Imilarsay otay *BYTE-COMPILE-DEFAULT*, utbay ontrolscay ethay ompilationcay "
+"ofway optay-evellay\n"
+"   ormsfay (evaluatedway atway oadlay-imetay) enwhay ethay :BYTE-COMPILE "
+"argumentway isway :MAYBE\n"
 "   (ethay efaultday.)  Enwhay uetray, eway ecideday otay ytebay-ompilecay."
 
 #: src/compiler/main.lisp
@@ -22218,7 +25193,9 @@ msgstr "Etherwhay ooplay analysisway ouldshay ebay oneday orway otnay."
 
 #: src/compiler/main.lisp
 msgid "Whether the compiler should record cross-reference information."
-msgstr "Etherwhay ethay ompilercay ouldshay ecordray osscray-eferenceray informationway."
+msgstr ""
+"Etherwhay ethay ompilercay ouldshay ecordray osscray-eferenceray "
+"informationway."
 
 #: src/compiler/main.lisp
 msgid "The default for the :VERBOSE argument to COMPILE-FILE."
@@ -22237,7 +25214,8 @@ msgid ""
 "The defaulted pathname of the file currently being compiled, or NIL if not\n"
 "  compiling."
 msgstr ""
-"Ethay efaultedday athnamepay ofway ethay ilefay urrentlycay eingbay ompiledcay, orway NIL ifway otnay\n"
+"Ethay efaultedday athnamepay ofway ethay ilefay urrentlycay eingbay "
+"ompiledcay, orway NIL ifway otnay\n"
 "  ompilingcay."
 
 #: src/compiler/main.lisp
@@ -22245,19 +25223,24 @@ msgid ""
 "The TRUENAME of the file currently being compiled, or NIL if not\n"
 "  compiling."
 msgstr ""
-"Ethay TRUENAME ofway ethay ilefay urrentlycay eingbay ompiledcay, orway NIL ifway otnay\n"
+"Ethay TRUENAME ofway ethay ilefay urrentlycay eingbay ompiledcay, orway NIL "
+"ifway otnay\n"
 "  ompilingcay."
 
 #: src/compiler/main.lisp
+#, fuzzy
 msgid ""
 "The user supplied source-info for the current compilation.  \n"
-"This is the :source-info argument to COMPILE-FROM-STREAM and will be\n"
-"stored in the INFO slot of the DEBUG-SOURCE in code components and \n"
-"in the user USER-INFO slot of STREAM-SOURCE-LOCATIONs."
-msgstr ""
-"Ethay userway uppliedsay ourcesay-infoway orfay ethay urrentcay ompilationcay.  \n"
-"Isthay isway ethay :ourcesay-infoway argumentway otay COMPILE-FROM-STREAM andway illway ebay\n"
-"toredsay inway ethay INFO otslay ofway ethay DEBUG-SOURCE inway odecay omponentscay andway \n"
+"  This is the :source-info argument to COMPILE-FROM-STREAM and will be\n"
+"  stored in the INFO slot of the DEBUG-SOURCE in code components and \n"
+"  in the user USER-INFO slot of STREAM-SOURCE-LOCATIONs."
+msgstr ""
+"Ethay userway uppliedsay ourcesay-infoway orfay ethay urrentcay "
+"ompilationcay.  \n"
+"Isthay isway ethay :ourcesay-infoway argumentway otay COMPILE-FROM-STREAM "
+"andway illway ebay\n"
+"toredsay inway ethay INFO otslay ofway ethay DEBUG-SOURCE inway odecay "
+"omponentscay andway \n"
 "inway ethay userway USER-INFO otslay ofway STREAM-SOURCE-Ocationslay."
 
 #: src/compiler/main.lisp
@@ -22266,9 +25249,12 @@ msgid ""
 "  optimization that doesn't introduce any new code.  A finite limit is\n"
 "  necessary, since type inference may take arbitrarily long to converge."
 msgstr ""
-"Ethay upperway imitlay onway ethay umbernay ofway imestay atthay eway illway onsecutivelycay oday IR1\n"
-"  optimizationway atthay oesnday't introduceway anyway ewnay odecay.  Away initefay imitlay isway\n"
-"  ecessarynay, incesay ypetay inferenceway aymay aketay arbitrarilyway onglay otay onvergecay."
+"Ethay upperway imitlay onway ethay umbernay ofway imestay atthay eway illway "
+"onsecutivelycay oday IR1\n"
+"  optimizationway atthay oesnday't introduceway anyway ewnay odecay.  Away "
+"initefay imitlay isway\n"
+"  ecessarynay, incesay ypetay inferenceway aymay aketay arbitrarilyway "
+"onglay otay onvergecay."
 
 #: src/compiler/main.lisp
 msgid "~|~%Disassembly of code for ~S~2%"
@@ -22289,10 +25275,10 @@ msgstr "~D oremay useway~:P ofway undefinedway ~(~Away~) ~S."
 #: src/compiler/main.lisp
 msgid ""
 "~:[This ~(~A~) is~;These ~(~A~)s are~] undefined:~\n"
-"		~%  ~{~<~%  ~1:;~S~>~^ ~}"
+"\t\t~%  ~{~<~%  ~1:;~S~>~^ ~}"
 msgstr ""
 "~:[Isthay ~(~Away~) isway~;Esethay ~(~Away~)s areway~] undefinedway:~\n"
-"		~%  ~{~<~%  ~1:;~S~>~^ ~}"
+"\t\t~%  ~{~<~%  ~1:;~S~>~^ ~}"
 
 #: src/compiler/main.lisp
 msgid ""
@@ -22334,7 +25320,8 @@ msgstr "Unableway otay ecoverray omfray eadray errorway."
 
 #: src/compiler/main.lisp
 msgid "Read error in form starting at ~D:~%~@[ \"~A\"~%~]~A"
-msgstr "Eadray errorway inway ormfay tartingsay atway ~D:~%~@[ \"~Away\"~%~]~Away"
+msgstr ""
+"Eadray errorway inway ormfay tartingsay atway ~D:~%~@[ \"~Away\"~%~]~Away"
 
 #: src/compiler/ir1tran.lisp src/compiler/main.lisp
 msgid "(during macroexpansion)~%~A"
@@ -22397,8 +25384,8 @@ msgid ""
 "  are supported:\n"
 "\n"
 "  :Error-Stream\n"
-"      The stream to write compiler error output to (default *ERROR-OUTPUT*.)"
-"\n"
+"      The stream to write compiler error output to (default *ERROR-"
+"OUTPUT*.)\n"
 "  :Trace-Stream\n"
 "      The stream that we write compiler trace output to, or NIL (the "
 "default)\n"
@@ -22410,25 +25397,27 @@ msgid ""
 "  :Byte-Compile {T, NIL, :MAYBE}\n"
 "        If true, then may compile to interpreted byte code."
 msgstr ""
-"Imilarsay otay COMPILE-FILE, utbay ompilescay exttay omfray Eamstray intoway ethay urrentcay "
-"isplay\n"
-"  environmentway.  Eamstray isway osedclay enwhay ompilationcay isway ompletecay.  Esethay "
-"eywordskay\n"
+"Imilarsay otay COMPILE-FILE, utbay ompilescay exttay omfray Eamstray intoway "
+"ethay urrentcay isplay\n"
+"  environmentway.  Eamstray isway osedclay enwhay ompilationcay isway "
+"ompletecay.  Esethay eywordskay\n"
 "  areway upportedsay:\n"
 "\n"
 "  :Errorway-Eamstray\n"
-"      Ethay eamstray otay itewray ompilercay errorway outputway otay (efaultday *ERROR-OUTPUT*.)"
-"\n"
+"      Ethay eamstray otay itewray ompilercay errorway outputway otay "
+"(efaultday *ERROR-OUTPUT*.)\n"
 "  :Acetray-Eamstray\n"
-"      Ethay eamstray atthay eway itewray ompilercay acetray outputway otay, orway NIL (ethay "
-"efaultday)\n"
+"      Ethay eamstray atthay eway itewray ompilercay acetray outputway otay, "
+"orway NIL (ethay efaultday)\n"
 "      otay inhibitway acetray outputway.\n"
 "  :Ockblay-Ompilecay {T, NIL, :SPECIFIED}\n"
-"        Ifway uetray, enthay unctionfay amesnay aymay ebay esolvedray atway ompilecay imetay.\n"
+"        Ifway uetray, enthay unctionfay amesnay aymay ebay esolvedray atway "
+"ompilecay imetay.\n"
 "  :Ourcesay-Infoway\n"
 "        Omesay objectway otay ebay acedplay inway ethay DEBUG-SOURCE-INFO.\n"
 "  :Ytebay-Ompilecay {T, NIL, :MAYBE}\n"
-"        Ifway uetray, enthay aymay ompilecay otay interpretedway ytebay odecay."
+"        Ifway uetray, enthay aymay ompilecay otay interpretedway ytebay "
+"odecay."
 
 #: src/compiler/main.lisp
 msgid "~2&; Python version ~A, VM version ~A on ~A.~%"
@@ -22443,131 +25432,153 @@ msgid "~&; Compilation ~:[aborted after~;finished in~] ~A.~&"
 msgstr "~&; Ompilationcay ~:[abortedway afterway~;inishedfay inway~] ~Away.~&"
 
 #: src/compiler/main.lisp
+#, fuzzy
 msgid ""
-"Compiles Source, producing a corresponding .FASL file.  Source may be a "
-"list\n"
-"   of files, in which case the files are compiled as a unit, producing a "
+"Compiles Source, producing a corresponding FASL file.  Source may be a list\n"
+"  of files, in which case the files are compiled as a unit, producing a "
 "single\n"
-"   .FASL file.  The output file names are defaulted from the first (or only)"
-"\n"
-"   input file name.  Other options available via keywords:\n"
-"   :Output-File\n"
-"      The name of the fasl to output, NIL for none, T for the default.\n"
-"   :Error-File\n"
-"      The name of the error listing file, NIL for none (the default), T for\n"
-"      .err.\n"
-"   :Trace-File\n"
-"      If specified, internal data structures are dumped to this file.  T "
-"for\n"
-"      the .trace default.\n"
-"   :Error-Output\n"
-"      If a stream, then error output is sent there as well as to the "
-"listing\n"
-"      file.  NIL suppresses this additional error output.  The default is T,"
-"\n"
-"      which means use *ERROR-OUTPUT*.\n"
-"   :Block-Compile {NIL | :SPECIFIED | T}\n"
-"      Determines whether multiple functions are compiled together as a unit,"
-"\n"
-"      resolving function references at compile time.  NIL means that global\n"
-"      function names are never resolved at compilation time.  :SPECIFIED "
+"  FASL file.  The output file names are defaulted from the first (or only)\n"
+"  input file name.  (The use of a list for Source is a CMUCL extension, not\n"
+"  specified in CLHS.)\n"
+"\n"
+"  These keywords are supported:\n"
+"\n"
+"  :Output-File\n"
+"     The name of the FASL to output, NIL for none, T for the default.\n"
+"     (Note the difference between the treatment of NIL :Output-File\n"
+"     here and in COMPILE-FILE-PATHNAME.)  The returned pathname of the\n"
+"     output file may differ from the pathname of the :Output-File\n"
+"     parameter, e.g. when the latter is a designator for a directory.\n"
+"  :Load\n"
+"     Load the compiled file; T here requires :Output-File to be\n"
+"     non-NIL, as well.  The default for :Load is NIL.\n"
+"  :Error-File\n"
+"     The name of the error listing file, NIL for none (the default), T for ."
+"err.\n"
+"  :Trace-File\n"
+"     If specified, internal data structures are dumped to this file.  T for\n"
+"     the .trace default.\n"
+"  :Error-Output\n"
+"     If a stream, then error output is sent there as well as to the listing\n"
+"     file.  NIL suppresses this additional error output.  The default is T,\n"
+"     which means use *ERROR-OUTPUT*.\n"
+"  :Block-Compile {NIL | :SPECIFIED | T}\n"
+"     Determines whether multiple functions are compiled together as a unit,\n"
+"     resolving function references at compile time.  NIL means that global\n"
+"     function names are never resolved at compilation time.  :SPECIFIED "
 "means\n"
-"      that names are resolved at compile-time when convenient (as in a\n"
-"      self-recursive call), but the compiler doesn't combine top-level "
+"     that names are resolved at compile-time when convenient (as in a\n"
+"     self-recursive call), but the compiler doesn't combine top-level "
 "DEFUNs.\n"
-"      With :SPECIFIED, an explicit START-BLOCK declaration will enable "
-"block\n"
-"      compilation.  A value of T indicates that all forms in the file(s) "
+"     With :SPECIFIED, an explicit START-BLOCK declaration will enable block\n"
+"     compilation.  A value of T indicates that all forms in the file(s) "
 "should\n"
-"      be compiled as a unit.  The default is the value of\n"
-"      EXT:*BLOCK-COMPILE-DEFAULT*, which is initially :SPECIFIED.\n"
-"   :Entry-Points\n"
-"      This specifies a list of function names for functions in the file(s) "
+"     be compiled as a unit.  The default is the value of\n"
+"     EXT:*BLOCK-COMPILE-DEFAULT*, which is initially :SPECIFIED.\n"
+"  :Entry-Points\n"
+"     This specifies a list of function names for functions in the file(s) "
 "that\n"
-"      must be given global definitions.  This only applies to block\n"
-"      compilation, and is useful mainly when :BLOCK-COMPILE T is specified "
-"on a\n"
-"      file that lacks START-BLOCK declarations.  If the value is NIL (the\n"
-"      default) then all functions will be globally defined.\n"
-"   :Byte-Compile {T | NIL | :MAYBE}\n"
-"      Determines whether to compile into interpreted byte code instead of\n"
-"      machine instructions.  Byte code is several times smaller, but much\n"
-"      slower.  If :MAYBE, then only byte-compile when SPEED is 0 and\n"
-"      DEBUG <= 1.  The default is the value of EXT:*BYTE-COMPILE-DEFAULT*,\n"
-"      which is initially :MAYBE.\n"
-"   :Xref\n"
-"      If non-NIL, enable recording of cross-reference information.  The "
+"     must be given global definitions.  This only applies to block\n"
+"     compilation, and is useful mainly when :BLOCK-COMPILE T is specified on "
+"a\n"
+"     file that lacks START-BLOCK declarations.  If the value is NIL (the\n"
+"     default) then all functions will be globally defined.\n"
+"  :Byte-Compile {T | NIL | :MAYBE}\n"
+"     Determines whether to compile into interpreted byte code instead of\n"
+"     machine instructions.  Byte code is several times smaller, but much\n"
+"     slower.  If :MAYBE, then only byte-compile when SPEED is 0 and\n"
+"     DEBUG <= 1.  The default is the value of EXT:*BYTE-COMPILE-DEFAULT*,\n"
+"     which is initially :MAYBE.\n"
+"  :Xref\n"
+"     If non-NIL, enable recording of cross-reference information.  The "
 "default\n"
-"      is the value of C:*RECORD-XREF-INFO*\n"
-"   :External-Format\n"
-"      The external format to use when opening the source file\n"
-"   :Decoding-Error\n"
-"      How to handle decoding errors in the external format when reading the\n"
-"      source file.  Default (T) is to signal an error.  Nil means silently\n"
-"      continue, replacing the invalid sequence with a suitable replacment\n"
-"      character."
-msgstr ""
-"Ompilescay Ourcesay, oducingpray away orrespondingcay .FASL ilefay.  Ourcesay aymay ebay away "
-"istlay\n"
-"   ofway ilesfay, inway ichwhay asecay ethay ilesfay areway ompiledcay asway away unitway, oducingpray away "
-"inglesay\n"
-"   .FASL ilefay.  Ethay outputway ilefay amesnay areway efaultedday omfray ethay irstfay (orway onlyway)"
-"\n"
-"   inputway ilefay amenay.  Otherway optionsway availableway iavay eywordskay:\n"
+"     is the value of C:*RECORD-XREF-INFO*\n"
+"  :External-Format\n"
+"     The external format to use when opening the source file.\n"
+"  :Decoding-Error\n"
+"     How to handle decoding errors in the external format when reading the\n"
+"     source file.  Default (T) is to signal an error.  NIL means silently\n"
+"     continue, replacing the invalid sequence with a suitable replacment\n"
+"     character."
+msgstr ""
+"Ompilescay Ourcesay, oducingpray away orrespondingcay .FASL ilefay.  "
+"Ourcesay aymay ebay away istlay\n"
+"   ofway ilesfay, inway ichwhay asecay ethay ilesfay areway ompiledcay asway "
+"away unitway, oducingpray away inglesay\n"
+"   .FASL ilefay.  Ethay outputway ilefay amesnay areway efaultedday omfray "
+"ethay irstfay (orway onlyway)\n"
+"   inputway ilefay amenay.  Otherway optionsway availableway iavay "
+"eywordskay:\n"
 "   :Outputway-Ilefay\n"
-"      Ethay amenay ofway ethay aslfay otay outputway, NIL orfay onenay, T orfay ethay efaultday.\n"
+"      Ethay amenay ofway ethay aslfay otay outputway, NIL orfay onenay, T "
+"orfay ethay efaultday.\n"
 "   :Errorway-Ilefay\n"
-"      Ethay amenay ofway ethay errorway istinglay ilefay, NIL orfay onenay (ethay efaultday), T orfay\n"
+"      Ethay amenay ofway ethay errorway istinglay ilefay, NIL orfay onenay "
+"(ethay efaultday), T orfay\n"
 "      .errway.\n"
 "   :Acetray-Ilefay\n"
-"      Ifway ecifiedspay, internalway ataday ucturesstray areway umpedday otay isthay ilefay.  T "
-"orfay\n"
+"      Ifway ecifiedspay, internalway ataday ucturesstray areway umpedday "
+"otay isthay ilefay.  T orfay\n"
 "      ethay .acetray efaultday.\n"
 "   :Errorway-Outputway\n"
-"      Ifway away eamstray, enthay errorway outputway isway entsay erethay asway ellway asway otay ethay "
-"istinglay\n"
-"      ilefay.  NIL uppressessay isthay additionalway errorway outputway.  Ethay efaultday isway T,"
-"\n"
+"      Ifway away eamstray, enthay errorway outputway isway entsay erethay "
+"asway ellway asway otay ethay istinglay\n"
+"      ilefay.  NIL uppressessay isthay additionalway errorway outputway.  "
+"Ethay efaultday isway T,\n"
 "      ichwhay eansmay useway *ERROR-OUTPUT*.\n"
 "   :Ockblay-Ompilecay {NIL | :SPECIFIED | T}\n"
-"      Eterminesday etherwhay ultiplemay unctionsfay areway ompiledcay ogethertay asway away unitway,"
-"\n"
-"      esolvingray unctionfay eferencesray atway ompilecay imetay.  NIL eansmay atthay obalglay\n"
-"      unctionfay amesnay areway evernay esolvedray atway ompilationcay imetay.  :SPECIFIED "
-"eansmay\n"
-"      atthay amesnay areway esolvedray atway ompilecay-imetay enwhay onvenientcay (asway inway away\n"
-"      elfsay-ecursiveray allcay), utbay ethay ompilercay oesnday't ombinecay optay-evellay "
-"Efunsday.\n"
-"      Ithway :SPECIFIED, anway explicitway START-BLOCK eclarationday illway enableway "
-"ockblay\n"
-"      ompilationcay.  Away aluevay ofway T indicatesway atthay allway ormsfay inway ethay ilefay(s) "
-"ouldshay\n"
-"      ebay ompiledcay asway away unitway.  Ethay efaultday isway ethay aluevay ofway\n"
+"      Eterminesday etherwhay ultiplemay unctionsfay areway ompiledcay "
+"ogethertay asway away unitway,\n"
+"      esolvingray unctionfay eferencesray atway ompilecay imetay.  NIL "
+"eansmay atthay obalglay\n"
+"      unctionfay amesnay areway evernay esolvedray atway ompilationcay "
+"imetay.  :SPECIFIED eansmay\n"
+"      atthay amesnay areway esolvedray atway ompilecay-imetay enwhay "
+"onvenientcay (asway inway away\n"
+"      elfsay-ecursiveray allcay), utbay ethay ompilercay oesnday't ombinecay "
+"optay-evellay Efunsday.\n"
+"      Ithway :SPECIFIED, anway explicitway START-BLOCK eclarationday illway "
+"enableway ockblay\n"
+"      ompilationcay.  Away aluevay ofway T indicatesway atthay allway "
+"ormsfay inway ethay ilefay(s) ouldshay\n"
+"      ebay ompiledcay asway away unitway.  Ethay efaultday isway ethay "
+"aluevay ofway\n"
 "      EXT:*BLOCK-COMPILE-DEFAULT*, ichwhay isway initiallyway :SPECIFIED.\n"
 "   :Entryway-Ointspay\n"
-"      Isthay ecifiesspay away istlay ofway unctionfay amesnay orfay unctionsfay inway ethay ilefay(s) "
-"atthay\n"
-"      ustmay ebay ivengay obalglay efinitionsday.  Isthay onlyway appliesway otay ockblay\n"
-"      ompilationcay, andway isway usefulway ainlymay enwhay :BLOCK-COMPILE T isway ecifiedspay "
-"onway away\n"
-"      ilefay atthay ackslay START-BLOCK eclarationsday.  Ifway ethay aluevay isway NIL (ethay\n"
-"      efaultday) enthay allway unctionsfay illway ebay oballyglay efinedday.\n"
+"      Isthay ecifiesspay away istlay ofway unctionfay amesnay orfay "
+"unctionsfay inway ethay ilefay(s) atthay\n"
+"      ustmay ebay ivengay obalglay efinitionsday.  Isthay onlyway appliesway "
+"otay ockblay\n"
+"      ompilationcay, andway isway usefulway ainlymay enwhay :BLOCK-COMPILE T "
+"isway ecifiedspay onway away\n"
+"      ilefay atthay ackslay START-BLOCK eclarationsday.  Ifway ethay aluevay "
+"isway NIL (ethay\n"
+"      efaultday) enthay allway unctionsfay illway ebay oballyglay "
+"efinedday.\n"
 "   :Ytebay-Ompilecay {T | NIL | :MAYBE}\n"
-"      Eterminesday etherwhay otay ompilecay intoway interpretedway ytebay odecay insteadway ofway\n"
-"      achinemay instructionsway.  Ytebay odecay isway everalsay imestay mallersay, utbay uchmay\n"
-"      owerslay.  Ifway :MAYBE, enthay onlyway ytebay-ompilecay enwhay SPEED isway 0 andway\n"
-"      DEBUG <= 1.  Ethay efaultday isway ethay aluevay ofway EXT:*BYTE-COMPILE-DEFAULT*,\n"
+"      Eterminesday etherwhay otay ompilecay intoway interpretedway ytebay "
+"odecay insteadway ofway\n"
+"      achinemay instructionsway.  Ytebay odecay isway everalsay imestay "
+"mallersay, utbay uchmay\n"
+"      owerslay.  Ifway :MAYBE, enthay onlyway ytebay-ompilecay enwhay SPEED "
+"isway 0 andway\n"
+"      DEBUG <= 1.  Ethay efaultday isway ethay aluevay ofway EXT:*BYTE-"
+"COMPILE-DEFAULT*,\n"
 "      ichwhay isway initiallyway :MAYBE.\n"
 "   :Refxay\n"
-"      Ifway onnay-NIL, enableway ecordingray ofway osscray-eferenceray informationway.  Ethay "
-"efaultday\n"
+"      Ifway onnay-NIL, enableway ecordingray ofway osscray-eferenceray "
+"informationway.  Ethay efaultday\n"
 "      isway ethay aluevay ofway C:*RECORD-XREF-INFO*\n"
 "   :Externalway-Ormatfay\n"
-"      Ethay externalway ormatfay otay useway enwhay openingway ethay ourcesay ilefay\n"
+"      Ethay externalway ormatfay otay useway enwhay openingway ethay "
+"ourcesay ilefay\n"
 "   :Ecodingday-Errorway\n"
-"      Owhay otay andlehay ecodingday errorsway inway ethay externalway ormatfay enwhay eadingray ethay\n"
-"      ourcesay ilefay.  Efaultday (T) isway otay ignalsay anway errorway.  Ilnay eansmay ilentlysay\n"
-"      ontinuecay, eplacingray ethay invalidway equencesay ithway away uitablesay eplacmentray\n"
+"      Owhay otay andlehay ecodingday errorsway inway ethay externalway "
+"ormatfay enwhay eadingray ethay\n"
+"      ourcesay ilefay.  Efaultday (T) isway otay ignalsay anway errorway.  "
+"Ilnay eansmay ilentlysay\n"
+"      ontinuecay, eplacingray ethay invalidway equencesay ithway away "
+"uitablesay eplacmentray\n"
 "      aracterchay."
 
 #: src/compiler/main.lisp
@@ -22587,19 +25598,25 @@ msgid "Can't find a definition for ~S."
 msgstr "Ancay't indfay away efinitionday orfay ~S."
 
 #: src/compiler/main.lisp
+#, fuzzy
 msgid ""
 "Compiles the function (or macro-function) whose name is NAME.  If\n"
 "  DEFINITION is supplied, it should be a lambda expression which will\n"
 "  be compiled.  IF NAME names a macro, then the compiled expression\n"
 "  replaces the existing macro-function.  If NAME names a function, the\n"
 "  compiled expression is placed in the function cell of NAME.  If NAME\n"
-"  is Nil, the compiled code object is returned."
-msgstr ""
-"Ompilescay ethay unctionfay (orway acromay-unctionfay) osewhay amenay isway NAME.  Ifway\n"
-"  DEFINITION isway uppliedsay, itway ouldshay ebay away ambdalay expressionway ichwhay illway\n"
-"  ebay ompiledcay.  IF NAME amesnay away acromay, enthay ethay ompiledcay expressionway\n"
-"  eplacesray ethay existingway acromay-unctionfay.  Ifway NAME amesnay away unctionfay, ethay\n"
-"  ompiledcay expressionway isway acedplay inway ethay unctionfay ellcay ofway NAME.  Ifway NAME\n"
+"  is NIL, the compiled code object is returned."
+msgstr ""
+"Ompilescay ethay unctionfay (orway acromay-unctionfay) osewhay amenay isway "
+"NAME.  Ifway\n"
+"  DEFINITION isway uppliedsay, itway ouldshay ebay away ambdalay "
+"expressionway ichwhay illway\n"
+"  ebay ompiledcay.  IF NAME amesnay away acromay, enthay ethay ompiledcay "
+"expressionway\n"
+"  eplacesray ethay existingway acromay-unctionfay.  Ifway NAME amesnay away "
+"unctionfay, ethay\n"
+"  ompiledcay expressionway isway acedplay inway ethay unctionfay ellcay "
+"ofway NAME.  Ifway NAME\n"
 "  isway Ilnay, ethay ompiledcay odecay objectway isway eturnedray."
 
 #: src/compiler/main.lisp
@@ -22608,8 +25625,10 @@ msgid ""
 "  definition.  If no interpreted definition is to be found, then signal an\n"
 "  error."
 msgstr ""
-"Attemptway otay eplaceray Amenay's efinitionday ithway anway interpretedway ersionvay ofway atthay\n"
-"  efinitionday.  Ifway onay interpretedway efinitionday isway otay ebay oundfay, enthay ignalsay anway\n"
+"Attemptway otay eplaceray Amenay's efinitionday ithway anway interpretedway "
+"ersionvay ofway atthay\n"
+"  efinitionday.  Ifway onay interpretedway efinitionday isway otay ebay "
+"oundfay, enthay ignalsay anway\n"
 "  errorway."
 
 #: src/compiler/main.lisp
@@ -22618,18 +25637,21 @@ msgstr "~S isway alreadyway interpretedway."
 
 #: src/compiler/main.lisp
 msgid ""
-"Return a pathname describing what file COMPILE-FILE would write to given\n"
-"   these arguments."
+"Return a pathname describing what file COMPILE-FILE would write to\n"
+"  given these arguments.  The returned pathname of the output file may\n"
+"  differ from the pathname of the :Output-File parameter, e.g. when\n"
+"  the latter is a designator for a directory. The CMUCL caveat: NIL is\n"
+"  accepted for :Output-File there but not here, which is probably not\n"
+"  in line with CLHS."
 msgstr ""
-"Eturnray away athnamepay escribingday atwhay ilefay COMPILE-FILE ouldway itewray otay ivengay\n"
-"   esethay argumentsway."
 
 #: src/compiler/main.lisp
 msgid ""
 "The ~A parameter is a ~S, which is an invalid value ~@\n"
 "            to COMPILE-FILE-PATHNAME."
 msgstr ""
-"Ethay ~Away arameterpay isway away ~S, ichwhay isway anway invalidway aluevay ~@\n"
+"Ethay ~Away arameterpay isway away ~S, ichwhay isway anway invalidway "
+"aluevay ~@\n"
 "            otay COMPILE-FILE-PATHNAME."
 
 #: src/compiler/ir1tran.lisp
@@ -22638,8 +25660,10 @@ msgid ""
 "  DEFUNs is used when compiling calls to that function.  If false, only\n"
 "  information from FTYPE proclamations will be used."
 msgstr ""
-"Ifway uetray, argumentway andway esultray ypetay informationway erivedday omfray ompilationcay ofway\n"
-"  Efunsday isway usedway enwhay ompilingcay allscay otay atthay unctionfay.  Ifway alsefay, onlyway\n"
+"Ifway uetray, argumentway andway esultray ypetay informationway erivedday "
+"omfray ompilationcay ofway\n"
+"  Efunsday isway usedway enwhay ompilingcay allscay otay atthay unctionfay.  "
+"Ifway alsefay, onlyway\n"
 "  informationway omfray FTYPE oclamationspray illway ebay usedway."
 
 #: src/compiler/ir1tran.lisp
@@ -22657,14 +25681,18 @@ msgstr ""
 "\n"
 "   Ifway T, alwaysway usttray ynamicday-extentway eclarationsday.\n"
 "\n"
-"   Otherwiseway, ethay aluevay ofway isthay ariablevay ustmay ebay away unctionfay ofway ourfay\n"
-"   argumentsway SAFETY, SPACE, SPEED, andway DEBUG.  Ifway ethay unctionfay eturnsray\n"
-"   uetray enwhay alledcay, ynamicday-extentway eclarationsday areway ustedtray,\n"
+"   Otherwiseway, ethay aluevay ofway isthay ariablevay ustmay ebay away "
+"unctionfay ofway ourfay\n"
+"   argumentsway SAFETY, SPACE, SPEED, andway DEBUG.  Ifway ethay unctionfay "
+"eturnsray\n"
+"   uetray enwhay alledcay, ynamicday-extentway eclarationsday areway "
+"ustedtray,\n"
 "   otherwiseway eythay areway otnay ustedtray."
 
 #: src/compiler/ir1tran.lisp
 msgid "~@<Invalid name ~s in a dynamic-extent declaration.~@:>"
-msgstr "~@<Invalidway amenay ~s inway away ynamicday-extentway eclarationday.~@:>"
+msgstr ""
+"~@<Invalidway amenay ~s inway away ynamicday-extentway eclarationday.~@:>"
 
 #: src/compiler/ir1tran.lisp
 msgid "Can't find slot ~S."
@@ -22711,10 +25739,12 @@ msgid "~&dynamic-extent args ~:s in ~s~%"
 msgstr "~&ynamicday-extentway argsway ~:s inway ~s~%"
 
 #: src/compiler/ir1tran.lisp
-msgid "Conflicting type declarations ~\n"
-"				   ~S and ~S for ~S."
-msgstr "Onflictingcay ypetay eclarationsday ~\n"
-"				   ~S andway ~S orfay ~S."
+msgid ""
+"Conflicting type declarations ~\n"
+"\t\t\t\t   ~S and ~S for ~S."
+msgstr ""
+"Onflictingcay ypetay eclarationsday ~\n"
+"\t\t\t\t   ~S andway ~S orfay ~S."
 
 #: src/compiler/ir1tran.lisp
 msgid "Can't declare type of Alien variable: ~S."
@@ -22731,10 +25761,10 @@ msgstr "Ignoredway ariablevay ~S isway eingbay eclaredday ecialspay."
 #: src/compiler/ir1tran.lisp
 msgid ""
 "Ignoring ~A declaration not at ~\n"
-"				   definition of local function:~%  ~S"
+"\t\t\t\t   definition of local function:~%  ~S"
 msgstr ""
 "Ignoringway ~Away eclarationday otnay atway ~\n"
-"				   efinitionday ofway ocallay unctionfay:~%  ~S"
+"\t\t\t\t   efinitionday ofway ocallay unctionfay:~%  ~S"
 
 #: src/compiler/ir1tran.lisp
 msgid "Unrecognizable function or variable name: ~S"
@@ -22754,7 +25784,9 @@ msgstr "Eclaringday ecialspay ariablevay ~S otay ebay ignoredway."
 
 #: src/compiler/ir1tran.lisp
 msgid "If true, processing of the VALUES declaration is inhibited."
-msgstr "Ifway uetray, ocessingpray ofway ethay VALUES eclarationday isway inhibitedway."
+msgstr ""
+"Ifway uetray, ocessingpray ofway ethay VALUES eclarationday isway "
+"inhibitedway."
 
 #: src/compiler/ir1tran.lisp
 msgid "No type specified in FTYPE declaration: ~S."
@@ -22832,13 +25864,14 @@ msgid ""
 "  forms, returns NIL."
 msgstr ""
 "Ognpray Orm*Fay\n"
-"  Evaluatesway eachway Ormfay inway orderway, eturingray ethay aluesvay ofway ethay astlay ormfay.  Ithway "
-"onay\n"
+"  Evaluatesway eachway Ormfay inway orderway, eturingray ethay aluesvay "
+"ofway ethay astlay ormfay.  Ithway onay\n"
 "  ormsfay, eturnsray NIL."
 
 #: src/compiler/ir2tran.lisp src/compiler/ltv.lisp src/compiler/ir1tran.lisp
 msgid "Can't funcall the SYMBOL-FUNCTION of the special form ~A."
-msgstr "Ancay't uncallfay ethay SYMBOL-FUNCTION ofway ethay ecialspay ormfay ~Away."
+msgstr ""
+"Ancay't uncallfay ethay SYMBOL-FUNCTION ofway ethay ecialspay ormfay ~Away."
 
 #: src/compiler/ir1tran.lisp
 msgid ""
@@ -22847,8 +25880,10 @@ msgid ""
 "  otherwise evaluate Else and return its values.  Else defaults to NIL."
 msgstr ""
 "Ifway Edicatepray Enthay [Elseway]\n"
-"  Ifway Edicatepray evaluatesway otay onnay-ullnay, evaluateway Enthay andway eturnsray itsway aluesvay,\n"
-"  otherwiseway evaluateway Elseway andway eturnray itsway aluesvay.  Elseway efaultsday otay NIL."
+"  Ifway Edicatepray evaluatesway otay onnay-ullnay, evaluateway Enthay "
+"andway eturnsray itsway aluesvay,\n"
+"  otherwiseway evaluateway Elseway andway eturnray itsway aluesvay.  Elseway "
+"efaultsday otay NIL."
 
 #: src/compiler/ir1tran.lisp
 msgid "Block name is not a symbol: ~S."
@@ -22862,8 +25897,10 @@ msgid ""
 "  result of Value-Form."
 msgstr ""
 "Ockblay Amenay Orm*Fay\n"
-"  Evaluateway ethay Ormsfay asway away PROGN.  Ithinway ethay exicallay opescay ofway ethay odybay,\n"
-"  (RETURN-FROM Amenay Aluevay-Ormfay) ancay ebay usedway otay exitway ethay ormfay, eturningray ethay\n"
+"  Evaluateway ethay Ormsfay asway away PROGN.  Ithinway ethay exicallay "
+"opescay ofway ethay odybay,\n"
+"  (RETURN-FROM Amenay Aluevay-Ormfay) ancay ebay usedway otay exitway ethay "
+"ormfay, eturningray ethay\n"
 "  esultray ofway Aluevay-Ormfay."
 
 #: src/compiler/ir1tran.lisp
@@ -22873,15 +25910,16 @@ msgstr "Eturnray orfay unknownway ockblay: ~S."
 #: src/compiler/ir1tran.lisp
 msgid ""
 "Return-From Block-Name Value-Form\n"
-"  Evaluate the Value-Form, returning its values from the lexically enclosing"
-"\n"
+"  Evaluate the Value-Form, returning its values from the lexically "
+"enclosing\n"
 "  BLOCK Block-Name.  This is constrained to be used only within the dynamic\n"
 "  extent of the BLOCK."
 msgstr ""
 "Eturnray-Omfray Ockblay-Amenay Aluevay-Ormfay\n"
-"  Evaluateway ethay Aluevay-Ormfay, eturningray itsway aluesvay omfray ethay exicallylay enclosingway"
-"\n"
-"  BLOCK Ockblay-Amenay.  Isthay isway onstrainedcay otay ebay usedway onlyway ithinway ethay ynamicday\n"
+"  Evaluateway ethay Aluevay-Ormfay, eturningray itsway aluesvay omfray ethay "
+"exicallylay enclosingway\n"
+"  BLOCK Ockblay-Amenay.  Isthay isway onstrainedcay otay ebay usedway "
+"onlyway ithinway ethay ynamicday\n"
 "  extentway ofway ethay BLOCK."
 
 #: src/compiler/ir1tran.lisp
@@ -22897,21 +25935,24 @@ msgid ""
 "Tagbody {Tag | Statement}*\n"
 "  Define tags for used with GO.  The Statements are evaluated in order\n"
 "  (skipping Tags) and NIL is returned.  If a statement contains a GO to a\n"
-"  defined Tag within the lexical scope of the form, then control is transfer"
-"red\n"
+"  defined Tag within the lexical scope of the form, then control is "
+"transferred\n"
 "  to the next statement following that tag.  A Tag must an integer or a\n"
 "  symbol.  A statement must be a list.  Other objects are illegal within "
 "the\n"
 "  body."
 msgstr ""
 "Agbodytay {Agtay | Tatementsay}*\n"
-"  Efineday agstay orfay usedway ithway GO.  Ethay Tatementssay areway evaluatedway inway orderway\n"
-"  (kippingsay Agstay) andway NIL isway eturnedray.  Ifway away tatementsay ontainscay away GO otay away\n"
-"  efinedday Agtay ithinway ethay exicallay opescay ofway ethay ormfay, enthay ontrolcay isway ansfertray"
-"edray\n"
-"  otay ethay extnay tatementsay ollowingfay atthay agtay.  Away Agtay ustmay anway integerway orway away\n"
-"  ymbolsay.  Away tatementsay ustmay ebay away istlay.  Otherway objectsway areway illegalway ithinway "
-"ethay\n"
+"  Efineday agstay orfay usedway ithway GO.  Ethay Tatementssay areway "
+"evaluatedway inway orderway\n"
+"  (kippingsay Agstay) andway NIL isway eturnedray.  Ifway away tatementsay "
+"ontainscay away GO otay away\n"
+"  efinedday Agtay ithinway ethay exicallay opescay ofway ethay ormfay, "
+"enthay ontrolcay isway ansfertrayedray\n"
+"  otay ethay extnay tatementsay ollowingfay atthay agtay.  Away Agtay ustmay "
+"anway integerway orway away\n"
+"  ymbolsay.  Away tatementsay ustmay ebay away istlay.  Otherway objectsway "
+"areway illegalway ithinway ethay\n"
 "  odybay."
 
 #: src/compiler/ir1tran.lisp
@@ -22926,9 +25967,10 @@ msgid ""
 "  is constrained to be used only within the dynamic extent of the TAGBODY."
 msgstr ""
 "Ogay Agtay\n"
-"  Ansfertray ontrolcay otay ethay amednay Agtay inway ethay exicallylay enclosingway TAGBODY.  "
-"Isthay\n"
-"  isway onstrainedcay otay ebay usedway onlyway ithinway ethay ynamicday extentway ofway ethay TAGBODY."
+"  Ansfertray ontrolcay otay ethay amednay Agtay inway ethay exicallylay "
+"enclosingway TAGBODY.  Isthay\n"
+"  isway onstrainedcay otay ebay usedway onlyway ithinway ethay ynamicday "
+"extentway ofway ethay TAGBODY."
 
 #: src/compiler/ir1tran.lisp
 msgid "Bad compiler-let binding spec: ~S."
@@ -22941,7 +25983,8 @@ msgid ""
 "  :LOAD-TOPLEVEL, :EXECUTE."
 msgstr ""
 "EVAL-WHEN (Ituation*Say) Orm*Fay\n"
-"  Evaluateway ethay Ormsfay inway ethay ecifiedspay Ituationssay, anyway ofway :COMPILE-TOPLEVEL,\n"
+"  Evaluateway ethay Ormsfay inway ethay ecifiedspay Ituationssay, anyway "
+"ofway :COMPILE-TOPLEVEL,\n"
 "  :LOAD-TOPLEVEL, :EXECUTE."
 
 #: src/compiler/ir1tran.lisp
@@ -22950,11 +25993,14 @@ msgstr "Acromay amenay ~S isway otnay away ymbolsay."
 
 #: src/compiler/ir1tran.lisp
 msgid "Local macro ~S has argument list that is not a list: ~S."
-msgstr "Ocallay acromay ~S ashay argumentway istlay atthay isway otnay away istlay: ~S."
+msgstr ""
+"Ocallay acromay ~S ashay argumentway istlay atthay isway otnay away istlay: "
+"~S."
 
 #: src/compiler/ir1tran.lisp
 msgid "Local macro ~S is too short to be a legal definition."
-msgstr "Ocallay acromay ~S isway ootay ortshay otay ebay away egallay efinitionday."
+msgstr ""
+"Ocallay acromay ~S isway ootay ortshay otay ebay away egallay efinitionday."
 
 #: src/compiler/ir1tran.lisp
 msgid ""
@@ -22964,15 +26010,20 @@ msgid ""
 "  destructuring lambda list, and the Forms evaluate to the expansion."
 msgstr ""
 "MACROLET ({(Amenay Ambdalay-Istlay Orm*Fay)}*) Odybay-Orm*Fay\n"
-"  Evaluateway ethay Odybay-Ormsfay inway anway environmentway ithway ethay ecifiedspay ocallay acrosmay\n"
-"  efinedday.  Amenay isway ethay ocallay acromay amenay, Ambdalay-Istlay isway ethay DEFMACRO tylesay\n"
-"  estructuringday ambdalay istlay, andway ethay Ormsfay evaluateway otay ethay expansionway."
+"  Evaluateway ethay Odybay-Ormsfay inway anway environmentway ithway ethay "
+"ecifiedspay ocallay acrosmay\n"
+"  efinedday.  Amenay isway ethay ocallay acromay amenay, Ambdalay-Istlay "
+"isway ethay DEFMACRO tylesay\n"
+"  estructuringday ambdalay istlay, andway ethay Ormsfay evaluateway otay "
+"ethay expansionway."
 
 #: src/compiler/ir1tran.lisp
-msgid "Bogus binding for ~\n"
-"						     COMPILER-OPTION-BIND: ~S"
-msgstr "Ogusbay indingbay orfay ~\n"
-"						     COMPILER-OPTION-BIND: ~S"
+msgid ""
+"Bogus binding for ~\n"
+"\t\t\t\t\t\t     COMPILER-OPTION-BIND: ~S"
+msgstr ""
+"Ogusbay indingbay orfay ~\n"
+"\t\t\t\t\t\t     COMPILER-OPTION-BIND: ~S"
 
 #: src/compiler/ir1tran.lisp
 msgid ""
@@ -22981,8 +26032,10 @@ msgid ""
 "   the body.  The Value-Forms are evaluated at compile time."
 msgstr ""
 "Ompilercay-Optionway-Indbay ({(Amenay Aluevay-Ormfay)}*) Odybay-Orm*Fay\n"
-"   Establishway ethay ecifiedspay ompilercay optionsway orfay ethay (exicallay) urationday ofway\n"
-"   ethay odybay.  Ethay Aluevay-Ormsfay areway evaluatedway atway ompilecay imetay."
+"   Establishway ethay ecifiedspay ompilercay optionsway orfay ethay "
+"(exicallay) urationday ofway\n"
+"   ethay odybay.  Ethay Aluevay-Ormsfay areway evaluatedway atway ompilecay "
+"imetay."
 
 #: src/compiler/ir1tran.lisp
 msgid "Lisp error during evaluation of info args:~%~A"
@@ -22999,16 +26052,18 @@ msgstr "Undefinedway imitivepray amenay: ~Away."
 #: src/compiler/ir1tran.lisp
 msgid ""
 "Primitive called with ~R argument~:P, ~\n"
-"	    		         but wants at least ~R."
+"\t    \t\t         but wants at least ~R."
 msgstr ""
 "Imitivepray alledcay ithway ~R argumentway~:P, ~\n"
-"	    		         utbay antsway atway eastlay ~R."
+"\t    \t\t         utbay antsway atway eastlay ~R."
 
 #: src/compiler/ir1tran.lisp
-msgid "Primitive called with ~R argument~:P, ~\n"
-"				 but wants exactly ~R."
-msgstr "Imitivepray alledcay ithway ~R argumentway~:P, ~\n"
-"				 utbay antsway exactlyway ~R."
+msgid ""
+"Primitive called with ~R argument~:P, ~\n"
+"\t\t\t\t but wants exactly ~R."
+msgstr ""
+"Imitivepray alledcay ithway ~R argumentway~:P, ~\n"
+"\t\t\t\t utbay antsway exactlyway ~R."
 
 #: src/compiler/ir1tran.lisp
 msgid "%Primitive used with a conditional template."
@@ -23019,9 +26074,11 @@ msgid "%Primitive used with an unknown values template."
 msgstr "%Imitivepray usedway ithway anway unknownway aluesvay emplatetay."
 
 #: src/compiler/ir1tran.lisp
-msgid "QUOTE Value\n"
+msgid ""
+"QUOTE Value\n"
 "  Return Value without evaluating it."
-msgstr "QUOTE Aluevay\n"
+msgstr ""
+"QUOTE Aluevay\n"
 "  Eturnray Aluevay ithoutway evaluatingway itway."
 
 #: src/compiler/ir1tran.lisp
@@ -23036,13 +26093,14 @@ msgid ""
 "  be a lambda."
 msgstr ""
 "FUNCTION Amenay\n"
-"  Eturnray ethay exicallylay apparentway efinitionday ofway ethay unctionfay Amenay.  Amenay aymay "
-"alsoway\n"
+"  Eturnray ethay exicallylay apparentway efinitionday ofway ethay unctionfay "
+"Amenay.  Amenay aymay alsoway\n"
 "  ebay away ambdalay."
 
 #: src/compiler/ir1tran.lisp
 msgid "Might be a symbol, so must call FDEFINITION at runtime."
-msgstr "Ightmay ebay away ymbolsay, osay ustmay allcay FDEFINITION atway untimeray."
+msgstr ""
+"Ightmay ebay away ymbolsay, osay ustmay allcay FDEFINITION atway untimeray."
 
 #: src/compiler/ir1tran.lisp
 msgid "Malformed symbol macro binding: ~S."
@@ -23052,7 +26110,8 @@ msgstr "Alformedmay ymbolsay acromay indingbay: ~S."
 msgid ""
 "Attempt to bind a special or constant variable with SYMBOL-MACROLET: ~S."
 msgstr ""
-"Attemptway otay indbay away ecialspay orway onstantcay ariablevay ithway SYMBOL-MACROLET: ~S."
+"Attemptway otay indbay away ecialspay orway onstantcay ariablevay ithway "
+"SYMBOL-MACROLET: ~S."
 
 #: src/compiler/ir1tran.lisp
 msgid "Repeated name in SYMBOL-MACROLET: ~S."
@@ -23062,13 +26121,13 @@ msgstr "Epeatedray amenay inway SYMBOL-MACROLET: ~S."
 msgid ""
 "SYMBOL-MACROLET ({(Name Expansion)}*) Decl* Form*\n"
 "  Define the Names as symbol macros with the given Expansions.  Within the\n"
-"  body, references to a Name will effectively be replaced with the Expansion"
-"."
+"  body, references to a Name will effectively be replaced with the Expansion."
 msgstr ""
 "SYMBOL-MACROLET ({(Amenay Expansionway)}*) Ecl*Day Orm*Fay\n"
-"  Efineday ethay Amesnay asway ymbolsay acrosmay ithway ethay ivengay Expansionsway.  Ithinway ethay\n"
-"  odybay, eferencesray otay away Amenay illway effectivelyway ebay eplacedray ithway ethay Expansionway"
-"."
+"  Efineday ethay Amesnay asway ymbolsay acrosmay ithway ethay ivengay "
+"Expansionsway.  Ithinway ethay\n"
+"  odybay, eferencesray otay away Amenay illway effectivelyway ebay "
+"eplacedray ithway ethay Expansionway."
 
 #: src/compiler/ir1tran.lisp
 msgid "Name is not a symbol: ~S."
@@ -23076,7 +26135,8 @@ msgstr "Amenay isway otnay away ymbolsay: ~S."
 
 #: src/compiler/ir1tran.lisp
 msgid "New proclaimed type ~S for ~S conflicts with old type ~S."
-msgstr "Ewnay oclaimedpray ypetay ~S orfay ~S onflictscay ithway oldway ypetay ~S."
+msgstr ""
+"Ewnay oclaimedpray ypetay ~S orfay ~S onflictscay ithway oldway ypetay ~S."
 
 #: src/compiler/ir1tran.lisp
 msgid "Attempt to proclaim constant ~S to be special."
@@ -23108,10 +26168,10 @@ msgid ""
 "  evaluated."
 msgstr ""
 "LET ({(Arvay [Aluevay]) | Arvay}*) Eclaration*Day Orm*Fay\n"
-"  Uringday evaluationway ofway ethay Ormsfay, Indbay ethay Arsvay otay ethay esultray ofway evaluatingway "
-"ethay\n"
-"  Aluevay ormsfay.  Ethay ariablesvay areway oundbay inway arallelpay afterway allway ofway ethay Aluesvay "
-"areway\n"
+"  Uringday evaluationway ofway ethay Ormsfay, Indbay ethay Arsvay otay ethay "
+"esultray ofway evaluatingway ethay\n"
+"  Aluevay ormsfay.  Ethay ariablesvay areway oundbay inway arallelpay "
+"afterway allway ofway ethay Aluesvay areway\n"
 "  evaluatedway."
 
 #: src/compiler/ir1tran.lisp
@@ -23121,7 +26181,8 @@ msgid ""
 "   where the given Declaration's have effect."
 msgstr ""
 "LOCALLY Eclaration*Day Orm*Fay\n"
-"   Equentiallysay evaluatesway away odybay ofway Ormfay's inway away exicallay environmentway\n"
+"   Equentiallysay evaluatesway away odybay ofway Ormfay's inway away "
+"exicallay environmentway\n"
 "   erewhay ethay ivengay Eclarationday's avehay effectway."
 
 #: src/compiler/ir1tran.lisp
@@ -23132,8 +26193,8 @@ msgid ""
 "  form to reference any of the previous Vars."
 msgstr ""
 "Et*Lay ({(Arvay [Aluevay]) | Arvay}*) Eclaration*Day Orm*Fay\n"
-"  Imilarsay otay LET, utbay ethay ariablesvay areway oundbay equentiallysay, allowingway eachway "
-"Aluevay\n"
+"  Imilarsay otay LET, utbay ethay ariablesvay areway oundbay equentiallysay, "
+"allowingway eachway Aluevay\n"
 "  ormfay otay eferenceray anyway ofway ethay eviouspray Arsvay."
 
 #: src/compiler/ir1tran.lisp
@@ -23149,12 +26210,14 @@ msgid ""
 "to\n"
 "  the lexically apparent function definition in the enclosing environment."
 msgstr ""
-"FLET ({(Amenay Ambdalay-Istlay Eclaration*Day Orm*Fay)}*) Eclaration*Day Odybay-Orm*Fay\n"
-"  Evaluateway ethay Odybay-Ormsfay ithway omesay ocallay unctionfay efinitionsday.   Ethay "
-"indingsbay\n"
-"  oday otnay encloseway ethay efinitionsday; anyway useway ofway Amenay inway ethay Ormsfay illway eferray "
-"otay\n"
-"  ethay exicallylay apparentway unctionfay efinitionday inway ethay enclosingway environmentway."
+"FLET ({(Amenay Ambdalay-Istlay Eclaration*Day Orm*Fay)}*) Eclaration*Day "
+"Odybay-Orm*Fay\n"
+"  Evaluateway ethay Odybay-Ormsfay ithway omesay ocallay unctionfay "
+"efinitionsday.   Ethay indingsbay\n"
+"  oday otnay encloseway ethay efinitionsday; anyway useway ofway Amenay "
+"inway ethay Ormsfay illway eferray otay\n"
+"  ethay exicallylay apparentway unctionfay efinitionday inway ethay "
+"enclosingway environmentway."
 
 #: src/compiler/ir1tran.lisp
 msgid ""
@@ -23165,16 +26228,19 @@ msgid ""
 "or\n"
 "  each other."
 msgstr ""
-"LABELS ({(Amenay Ambdalay-Istlay Eclaration*Day Orm*Fay)}*) Eclaration*Day Odybay-Orm*Fay\n"
-"  Evaluateway ethay Odybay-Ormsfay ithway omesay ocallay unctionfay efinitionsday.  Ethay "
-"indingsbay\n"
-"  encloseway ethay ewnay efinitionsday, osay ethay efinedday unctionsfay ancay allcay emselvesthay "
-"orway\n"
+"LABELS ({(Amenay Ambdalay-Istlay Eclaration*Day Orm*Fay)}*) Eclaration*Day "
+"Odybay-Orm*Fay\n"
+"  Evaluateway ethay Odybay-Ormsfay ithway omesay ocallay unctionfay "
+"efinitionsday.  Ethay indingsbay\n"
+"  encloseway ethay ewnay efinitionsday, osay ethay efinedday unctionsfay "
+"ancay allcay emselvesthay orway\n"
 "  eachway otherway."
 
 #: src/compiler/ir1tran.lisp
 msgid "Type ~S in ~S declaration conflicts with enclosing assertion:~%   ~S"
-msgstr "Ypetay ~S inway ~S eclarationday onflictscay ithway enclosingway assertionway:~%   ~S"
+msgstr ""
+"Ypetay ~S inway ~S eclarationday onflictscay ithway enclosingway "
+"assertionway:~%   ~S"
 
 #: src/compiler/ir1tran.lisp
 msgid ""
@@ -23183,7 +26249,8 @@ msgid ""
 "  type.)"
 msgstr ""
 "THE Ypetay Ormfay\n"
-"  Assertway atthay Ormfay evaluatesway otay ethay ecifiedspay ypetay (ichwhay aymay ebay away VALUES\n"
+"  Assertway atthay Ormfay evaluatesway otay ethay ecifiedspay ypetay "
+"(ichwhay aymay ebay away VALUES\n"
 "  ypetay.)"
 
 #: src/compiler/ir1tran.lisp
@@ -23191,15 +26258,15 @@ msgid ""
 "Truly-The Type Value\n"
 "  Like the THE special form, except that it believes whatever you tell it.  "
 "It\n"
-"  will never generate a type check, but will cause a warning if the compiler"
-"\n"
+"  will never generate a type check, but will cause a warning if the "
+"compiler\n"
 "  can prove the assertion is wrong."
 msgstr ""
 "Ulytray-Ethay Ypetay Aluevay\n"
-"  Ikelay ethay THE ecialspay ormfay, exceptway atthay itway elievesbay ateverwhay ouyay elltay itway.  "
-"Itway\n"
-"  illway evernay enerategay away ypetay eckchay, utbay illway ausecay away arningway ifway ethay ompilercay"
-"\n"
+"  Ikelay ethay THE ecialspay ormfay, exceptway atthay itway elievesbay "
+"ateverwhay ouyay elltay itway.  Itway\n"
+"  illway evernay enerategay away ypetay eckchay, utbay illway ausecay away "
+"arningway ifway ethay ompilercay\n"
 "  ancay ovepray ethay assertionway isway ongwray."
 
 #: src/compiler/ir1tran.lisp
@@ -23222,8 +26289,10 @@ msgid ""
 "  expansion."
 msgstr ""
 "SETQ {Arvay Aluevay}*\n"
-"  Etsay ethay ariablesvay otay ethay aluesvay.  Ifway oremay anthay oneway airpay isway uppliedsay, ethay\n"
-"  assignmentsway areway oneday equentiallysay.  Ifway Arvay amesnay away ymbolsay acromay, SETF ethay\n"
+"  Etsay ethay ariablesvay otay ethay aluesvay.  Ifway oremay anthay oneway "
+"airpay isway uppliedsay, ethay\n"
+"  assignmentsway areway oneday equentiallysay.  Ifway Arvay amesnay away "
+"ymbolsay acromay, SETF ethay\n"
 "  expansionway."
 
 #: src/compiler/ir1tran.lisp
@@ -23233,7 +26302,8 @@ msgid ""
 "  evaluates to the same thing as Tag."
 msgstr ""
 "Rowthay Agtay Ormfay\n"
-"  Oday away onnay-ocallay exitway, eturnray ethay aluesvay ofway Ormfay omfray ethay CATCH osewhay agtay\n"
+"  Oday away onnay-ocallay exitway, eturnray ethay aluesvay ofway Ormfay "
+"omfray ethay CATCH osewhay agtay\n"
 "  evaluatesway otay ethay amesay ingthay asway Agtay."
 
 #: src/compiler/ir1tran.lisp
@@ -23247,11 +26317,12 @@ msgid ""
 "  and the thrown values will be returned."
 msgstr ""
 "Atchcay Agtay Orm*Fay\n"
-"  Evaluatesway Agtay andway instantiatesway itway asway away atchercay ilewhay ethay odybay ormsfay areway\n"
-"  evaluatedway inway anway implicitway PROGN.  Ifway away THROW isway oneday otay Agtay ithinway ethay "
-"ynamicday\n"
-"  opescay ofway ethay odybay, enthay ontrolcay illway ebay ansferredtray otay ethay endway ofway ethay "
-"odybay\n"
+"  Evaluatesway Agtay andway instantiatesway itway asway away atchercay "
+"ilewhay ethay odybay ormsfay areway\n"
+"  evaluatedway inway anway implicitway PROGN.  Ifway away THROW isway oneday "
+"otay Agtay ithinway ethay ynamicday\n"
+"  opescay ofway ethay odybay, enthay ontrolcay illway ebay ansferredtray "
+"otay ethay endway ofway ethay odybay\n"
 "  andway ethay rownthay aluesvay illway ebay eturnedray."
 
 #: src/compiler/ir1tran.lisp
@@ -23263,10 +26334,12 @@ msgid ""
 "  due to normal completion or a non-local exit such as THROW)."
 msgstr ""
 "Unwindway-Otectpray Otectedpray Eanup*Clay\n"
-"  Evaluateway ethay ormfay Otectedpray, eturningray itsway aluesvay.  Ethay eanupclay ormsfay areway\n"
-"  evaluatedway eneverwhay ethay ynamicday opescay ofway ethay Otectedpray ormfay isway exitedway "
-"(eitherway\n"
-"  ueday otay ormalnay ompletioncay orway away onnay-ocallay exitway uchsay asway THROW)."
+"  Evaluateway ethay ormfay Otectedpray, eturningray itsway aluesvay.  Ethay "
+"eanupclay ormsfay areway\n"
+"  evaluatedway eneverwhay ethay ynamicday opescay ofway ethay Otectedpray "
+"ormfay isway exitedway (eitherway\n"
+"  ueday otay ormalnay ompletioncay orway away onnay-ocallay exitway uchsay "
+"asway THROW)."
 
 #: src/compiler/ir1tran.lisp
 msgid ""
@@ -23275,8 +26348,10 @@ msgid ""
 "  values from the first Values-Form making up the first argument, etc."
 msgstr ""
 "MULTIPLE-VALUE-CALL Unctionfay Aluesvay-Orm*Fay\n"
-"  Allcay Unctionfay, assingpay allway ethay aluesvay ofway eachway Aluesvay-Ormfay asway argumentsway,\n"
-"  aluesvay omfray ethay irstfay Aluesvay-Ormfay akingmay upway ethay irstfay argumentway, etcway."
+"  Allcay Unctionfay, assingpay allway ethay aluesvay ofway eachway Aluesvay-"
+"Ormfay asway argumentsway,\n"
+"  aluesvay omfray ethay irstfay Aluesvay-Ormfay akingmay upway ethay irstfay "
+"argumentway, etcway."
 
 #: src/compiler/ir1tran.lisp
 msgid ""
@@ -23285,7 +26360,8 @@ msgid ""
 "  Values-Form."
 msgstr ""
 "MULTIPLE-VALUE-PROG1 Aluesvay-Ormfay Orm*Fay\n"
-"  Evaluateway Aluesvay-Ormfay andway enthay ethay Ormsfay, utbay eturnray allway ethay aluesvay ofway\n"
+"  Evaluateway Aluesvay-Ormfay andway enthay ethay Ormsfay, utbay eturnray "
+"allway ethay aluesvay ofway\n"
 "  Aluesvay-Ormfay."
 
 #: src/compiler/ir1tran.lisp
@@ -23294,7 +26370,9 @@ msgstr "Acromay amenay isway otnay away ymbolsay: ~S."
 
 #: src/compiler/ir1tran.lisp
 msgid "Defining ~S to be a macro when it was ~(~A~) to be a function."
-msgstr "Efiningday ~S otay ebay away acromay enwhay itway asway ~(~Away~) otay ebay away unctionfay."
+msgstr ""
+"Efiningday ~S otay ebay away acromay enwhay itway asway ~(~Away~) otay ebay "
+"away unctionfay."
 
 #: src/compiler/ir1tran.lisp
 msgid "Attempt to redefine special form ~S as a macro."
@@ -23306,7 +26384,8 @@ msgstr "~&; Onvertedcay ~S.~%"
 
 #: src/compiler/ir1tran.lisp
 msgid "Attempt to define a compiler-macro for special form ~S."
-msgstr "Attemptway otay efineday away ompilercay-acromay orfay ecialspay ormfay ~S."
+msgstr ""
+"Attemptway otay efineday away ompilercay-acromay orfay ecialspay ormfay ~S."
 
 #: src/compiler/ir1tran.lisp
 msgid "Constant name is not a symbol: ~S."
@@ -23334,11 +26413,14 @@ msgstr "Edefiningray ~(~Away~) ~S otay ebay away onstantcay."
 
 #: src/compiler/ir1util.lisp
 msgid "Return the TLF-NUMBER and FORM-NUMBER encoded as fixnum."
-msgstr "Eturnray ethay TLF-NUMBER andway FORM-NUMBER encodedway asway ixnumfay."
+msgstr ""
+"Eturnray ethay TLF-NUMBER andway FORM-NUMBER encodedway asway ixnumfay."
 
 #: src/compiler/ir1util.lisp
 msgid "Return the tlf-number and form-number from an encoded FIXNUM."
-msgstr "Eturnray ethay lftay-umbernay andway ormfay-umbernay omfray anway encodedway FIXNUM."
+msgstr ""
+"Eturnray ethay lftay-umbernay andway ormfay-umbernay omfray anway encodedway "
+"FIXNUM."
 
 #: src/compiler/ir1util.lisp
 msgid "Return a source-location for the call site."
@@ -23366,8 +26448,10 @@ msgid ""
 "   to feed directly to the continuation-dest of CONT, which must be\n"
 "   a combination."
 msgstr ""
-"Ifway CONT isway away allcay otay FUN ithway NUM-ARGS argsway, angechay osethay argumentsway\n"
-"   otay eedfay irectlyday otay ethay ontinuationcay-estday ofway CONT, ichwhay ustmay ebay\n"
+"Ifway CONT isway away allcay otay FUN ithway NUM-ARGS argsway, angechay "
+"osethay argumentsway\n"
+"   otay eedfay irectlyday otay ethay ontinuationcay-estday ofway CONT, "
+"ichwhay ustmay ebay\n"
 "   away ombinationcay."
 
 #: src/compiler/ir1util.lisp
@@ -23375,30 +26459,38 @@ msgid ""
 "An upper limit on the number of inline function calls that will be expanded\n"
 "   in any given code object (single function or block compilation.)"
 msgstr ""
-"Anway upperway imitlay onway ethay umbernay ofway inlineway unctionfay allscay atthay illway ebay expandedway\n"
-"   inway anyway ivengay odecay objectway (inglesay unctionfay orway ockblay ompilationcay.)"
+"Anway upperway imitlay onway ethay umbernay ofway inlineway unctionfay "
+"allscay atthay illway ebay expandedway\n"
+"   inway anyway ivengay odecay objectway (inglesay unctionfay orway ockblay "
+"ompilationcay.)"
 
 #: src/compiler/ir1util.lisp
 msgid ""
 "*Inline-Expansion-Limit* (~D) exceeded, ~\n"
-"			     probably trying to~%  ~\n"
-"			     inline a recursive function."
+"\t\t\t     probably trying to~%  ~\n"
+"\t\t\t     inline a recursive function."
 msgstr ""
 "*Inline-Expansion-Limit* (~D) exceededway, ~\n"
-"			     obablypray yingtray otay~%  ~\n"
-"			     inlineway away ecursiveray unctionfay."
+"\t\t\t     obablypray yingtray otay~%  ~\n"
+"\t\t\t     inlineway away ecursiveray unctionfay."
 
 #: src/compiler/ir1util.lisp
 msgid "The value for *Print-Level* when printing compiler error messages."
-msgstr "Ethay aluevay orfay *Print-Level* enwhay intingpray ompilercay errorway essagesmay."
+msgstr ""
+"Ethay aluevay orfay *Print-Level* enwhay intingpray ompilercay errorway "
+"essagesmay."
 
 #: src/compiler/ir1util.lisp
 msgid "The value for *Print-Length* when printing compiler error messages."
-msgstr "Ethay aluevay orfay *Print-Length* enwhay intingpray ompilercay errorway essagesmay."
+msgstr ""
+"Ethay aluevay orfay *Print-Length* enwhay intingpray ompilercay errorway "
+"essagesmay."
 
 #: src/compiler/ir1util.lisp
 msgid "The value for *Print-Lines* when printing compiler error messages."
-msgstr "Ethay aluevay orfay *Print-Lines* enwhay intingpray ompilercay errorway essagesmay."
+msgstr ""
+"Ethay aluevay orfay *Print-Lines* enwhay intingpray ompilercay errorway "
+"essagesmay."
 
 #: src/compiler/ir1util.lisp
 msgid ""
@@ -23407,9 +26499,10 @@ msgid ""
 "we\n"
 "  print only the CAR."
 msgstr ""
-"Ethay aximummay umbernay ofway enclosingway onnay-originalway ourcesay ormsfay (i.e. omfray\n"
-"  acroexpansionmay) atthay eway intpray inway ullfay.  Orfay additionalway enclosingway ormsfay, "
-"eway\n"
+"Ethay aximummay umbernay ofway enclosingway onnay-originalway ourcesay "
+"ormsfay (i.e. omfray\n"
+"  acroexpansionmay) atthay eway intpray inway ullfay.  Orfay additionalway "
+"enclosingway ormsfay, eway\n"
 "  intpray onlyway ethay CAR."
 
 #: src/compiler/ir1util.lisp
@@ -23422,11 +26515,14 @@ msgid ""
 "   list of subforms suitable for a \"~{~S ~}\" format string."
 msgstr ""
 "DEF-SOURCE-CONTEXT Amenay Ambdalay-Istlay Orm*Fay\n"
-"   Isthay acromay efinesday owhay otay extractway anway abbreviatedway ourcesay ontextcay omfray ethay\n"
-"   Amednay ormfay enwhay itway appearsway inway ethay ompilercay inputway.  Ambdalay-Istlay isway away "
-"DEFMACRO\n"
-"   tylesay ambdalay-istlay usedway otay arsepay ethay argumentsway.  Ethay Odybay ouldshay eturnray away\n"
-"   istlay ofway ubformssay uitablesay orfay away \"~{~S ~}\" ormatfay ingstray."
+"   Isthay acromay efinesday owhay otay extractway anway abbreviatedway "
+"ourcesay ontextcay omfray ethay\n"
+"   Amednay ormfay enwhay itway appearsway inway ethay ompilercay inputway.  "
+"Ambdalay-Istlay isway away DEFMACRO\n"
+"   tylesay ambdalay-istlay usedway otay arsepay ethay argumentsway.  Ethay "
+"Odybay ouldshay eturnray away\n"
+"   istlay ofway ubformssay uitablesay orfay away \"~{~S ~}\" ormatfay "
+"ingstray."
 
 #: src/compiler/ir1util.lisp
 msgid "Compiler-Error with no bailout."
@@ -23441,11 +26537,16 @@ msgid ""
 "is one of :note, :warning, or :error. Except for the severity, all of\n"
 "these can be NIL if unavailable or inapplicable."
 msgstr ""
-"Isthay isway ethay unctionfay alledcay ybay ethay ompilercay otay eciallyspay otenay away\n"
-"arningway, ommentcay, orway errorway. Ethay unctionfay ustmay aketay ivefay argumentsway: ethay\n"
-"everitysay, away ingstray escribingday ethay aturenay ofway ethay otificationnay, away ingstray\n"
-"orfay ontextcay, ethay ilefay amestringnay, andway ethay ilefay ositionpay. Ethay everitysay\n"
-"isway oneway ofway :otenay, :arningway, orway :errorway. Exceptway orfay ethay everitysay, allway ofway\n"
+"Isthay isway ethay unctionfay alledcay ybay ethay ompilercay otay "
+"eciallyspay otenay away\n"
+"arningway, ommentcay, orway errorway. Ethay unctionfay ustmay aketay ivefay "
+"argumentsway: ethay\n"
+"everitysay, away ingstray escribingday ethay aturenay ofway ethay "
+"otificationnay, away ingstray\n"
+"orfay ontextcay, ethay ilefay amestringnay, andway ethay ilefay ositionpay. "
+"Ethay everitysay\n"
+"isway oneway ofway :otenay, :arningway, orway :errorway. Exceptway orfay "
+"ethay everitysay, allway ofway\n"
 "esethay ancay ebay NIL ifway unavailableway orway inapplicableway."
 
 #: src/compiler/ir1util.lisp
@@ -23476,21 +26577,26 @@ msgid ""
 "is\n"
 "  a missing definition (as opposed to a typo in the use.)"
 msgstr ""
-"Ifway onnay-ullnay, enthay anway upperway imitlay onway ethay umbernay ofway unknownway unctionfay orway ypetay\n"
-"  arningsway atthay ethay ompilercay illway intpray orfay anyway ivengay amenay inway away inglesay\n"
-"  ompilationcay.  Isthay eventspray excessiveway amountsway ofway outputway enwhay erethay eallyray "
-"isway\n"
-"  away issingmay efinitionday (asway opposedway otay away ypotay inway ethay useway.)"
+"Ifway onnay-ullnay, enthay anway upperway imitlay onway ethay umbernay ofway "
+"unknownway unctionfay orway ypetay\n"
+"  arningsway atthay ethay ompilercay illway intpray orfay anyway ivengay "
+"amenay inway away inglesay\n"
+"  ompilationcay.  Isthay eventspray excessiveway amountsway ofway outputway "
+"enwhay erethay eallyray isway\n"
+"  away issingmay efinitionday (asway opposedway otay away ypotay inway ethay "
+"useway.)"
 
 #: src/compiler/ir1util.lisp
 msgid "Lisp error during ~A:~%~A"
 msgstr "Isplay errorway uringday ~Away:~%~Away"
 
 #: src/compiler/ir1opt.lisp
-msgid "New inferred type ~S conflicts with old type:~\n"
-"		~%  ~S~%*** Bug?"
-msgstr "Ewnay inferredway ypetay ~S onflictscay ithway oldway ypetay:~\n"
-"		~%  ~S~%*** Ugbay?"
+msgid ""
+"New inferred type ~S conflicts with old type:~\n"
+"\t\t~%  ~S~%*** Bug?"
+msgstr ""
+"Ewnay inferredway ypetay ~S onflictscay ithway oldway ypetay:~\n"
+"\t\t~%  ~S~%*** Ugbay?"
 
 #: src/compiler/ir1opt.lisp
 msgid "The return value of ~A should not be discarded."
@@ -23504,10 +26610,12 @@ msgid ""
 "are\n"
 "  format arguments for an efficiency note."
 msgstr ""
-"Isthay unctionfay isway usedway otay rowthay outway ofway anway IR1 ansformtray, abortingway isthay\n"
-"  attemptway otay ansformtray ethay allcay, utbay admittingway ethay ossibilitypay atthay isthay orway\n"
-"  omesay otherway ansformtray illway aterlay uceedsay.  Ifway argumentsway areway uppliedsay, eythay "
-"areway\n"
+"Isthay unctionfay isway usedway otay rowthay outway ofway anway IR1 "
+"ansformtray, abortingway isthay\n"
+"  attemptway otay ansformtray ethay allcay, utbay admittingway ethay "
+"ossibilitypay atthay isthay orway\n"
+"  omesay otherway ansformtray illway aterlay uceedsay.  Ifway argumentsway "
+"areway uppliedsay, eythay areway\n"
 "  ormatfay argumentsway orfay anway efficiencyway otenay."
 
 #: src/compiler/ir1opt.lisp
@@ -23516,43 +26624,49 @@ msgid ""
 "  call to the function at run time.  No further optimizations will be\n"
 "  attempted."
 msgstr ""
-"Isthay unctionfay isway usedway otay rowthay outway ofway anway IR1 ansformtray andway orcefay away ormalnay\n"
-"  allcay otay ethay unctionfay atway unray imetay.  Onay urtherfay optimizationsway illway ebay\n"
+"Isthay unctionfay isway usedway otay rowthay outway ofway anway IR1 "
+"ansformtray andway orcefay away ormalnay\n"
+"  allcay otay ethay unctionfay atway unray imetay.  Onay urtherfay "
+"optimizationsway illway ebay\n"
 "  attemptedway."
 
 #: src/compiler/ir1opt.lisp
 msgid ""
 "This function is used to throw out of an IR1 transform, and delay the\n"
-"  transform on the node until later. The reasons specifies when the transfor"
-"m\n"
+"  transform on the node until later. The reasons specifies when the "
+"transform\n"
 "  will be later retried. The :optimize reason causes the transform to be\n"
 "  delayed until after the current IR1 optimization pass. The :constraint\n"
 "  reason causes the transform to be delayed until after constraint\n"
 "  propagation."
 msgstr ""
-"Isthay unctionfay isway usedway otay rowthay outway ofway anway IR1 ansformtray, andway elayday ethay\n"
-"  ansformtray onway ethay odenay untilway aterlay. Ethay easonsray ecifiesspay enwhay ethay ansfortray"
-"m\n"
-"  illway ebay aterlay etriedray. Ethay :optimizeway easonray ausescay ethay ansformtray otay ebay\n"
-"  elayedday untilway afterway ethay urrentcay IR1 optimizationway asspay. Ethay :onstraintcay\n"
-"  easonray ausescay ethay ansformtray otay ebay elayedday untilway afterway onstraintcay\n"
+"Isthay unctionfay isway usedway otay rowthay outway ofway anway IR1 "
+"ansformtray, andway elayday ethay\n"
+"  ansformtray onway ethay odenay untilway aterlay. Ethay easonsray "
+"ecifiesspay enwhay ethay ansfortraym\n"
+"  illway ebay aterlay etriedray. Ethay :optimizeway easonray ausescay ethay "
+"ansformtray otay ebay\n"
+"  elayedday untilway afterway ethay urrentcay IR1 optimizationway asspay. "
+"Ethay :onstraintcay\n"
+"  easonray ausescay ethay ansformtray otay ebay elayedday untilway afterway "
+"onstraintcay\n"
 "  opagationpray."
 
 #: src/compiler/ir1opt.lisp
 msgid ""
 "MULTIPLE-VALUE-CALL with ~R values when the function expects ~\n"
-"	     at least ~R."
+"\t     at least ~R."
 msgstr ""
 "MULTIPLE-VALUE-CALL ithway ~R aluesvay enwhay ethay unctionfay expectsway ~\n"
-"	     atway eastlay ~R."
+"\t     atway eastlay ~R."
 
 #: src/compiler/ir1opt.lisp
 msgid ""
 "MULTIPLE-VALUE-CALL with ~R values when the function expects ~\n"
-"	     at most ~R."
+"\t     at most ~R."
 msgstr ""
 "MULTIPLE-VALUE-CALL ithway ~R aluesvay enwhay ethay unctionfay expectsway ~\n"
-"	     atway ostmay ~R."
+"\t     atway ostmay ~R."
 
 #: src/compiler/ir1final.lisp
 msgid "Unable to ~A because:~%~6T~?"
@@ -23561,18 +26675,18 @@ msgstr "Unableway otay ~Away ecausebay:~%~6T~?"
 #: src/compiler/ir1final.lisp
 msgid ""
 "Unable to ~A due to type uncertainty:~@\n"
-"	                      ~{~6T~?~^~&~}"
+"\t                      ~{~6T~?~^~&~}"
 msgstr ""
 "Unableway otay ~Away ueday otay ypetay uncertaintyway:~@\n"
-"	                      ~{~6T~?~^~&~}"
+"\t                      ~{~6T~?~^~&~}"
 
 #: src/compiler/ir1final.lisp
 msgid ""
 "The result type from previous declaration:~%  ~S~@\n"
-"				  conflicts with the result type:~%  ~S"
+"\t\t\t\t  conflicts with the result type:~%  ~S"
 msgstr ""
 "Ethay esultray ypetay omfray eviouspray eclarationday:~%  ~S~@\n"
-"				  onflictscay ithway ethay esultray ypetay:~%  ~S"
+"\t\t\t\t  onflictscay ithway ethay esultray ypetay:~%  ~S"
 
 #: src/compiler/array-tran.lisp
 msgid "Default initial element ~s is not a ~s."
@@ -23588,15 +26702,21 @@ msgstr "Elementway-Ypetay isway otnay onstantcay."
 
 #: src/compiler/array-tran.lisp
 msgid "Element-type not constant; cannot open code array creation"
-msgstr "Elementway-ypetay otnay onstantcay; annotcay openway odecay arrayway eationcray"
+msgstr ""
+"Elementway-ypetay otnay onstantcay; annotcay openway odecay arrayway "
+"eationcray"
 
 #: src/compiler/array-tran.lisp
 msgid "Dimension list not constant; cannot open code array creation"
-msgstr "Imensionday istlay otnay onstantcay; annotcay openway odecay arrayway eationcray"
+msgstr ""
+"Imensionday istlay otnay onstantcay; annotcay openway odecay arrayway "
+"eationcray"
 
 #: src/compiler/array-tran.lisp
 msgid "Dimension list contains something other than an integer: ~S"
-msgstr "Imensionday istlay ontainscay omethingsay otherway anthay anway integerway: ~S"
+msgstr ""
+"Imensionday istlay ontainscay omethingsay otherway anthay anway integerway: "
+"~S"
 
 #: src/compiler/array-tran.lisp
 msgid "Array rank not known at compile time: ~S"
@@ -23608,7 +26728,9 @@ msgstr "Axisway otnay onstantcay."
 
 #: src/compiler/array-tran.lisp
 msgid "Array dimensions unknown, must call array-dimension at runtime."
-msgstr "Arrayway imensionsday unknownway, ustmay allcay arrayway-imensionday atway untimeray."
+msgstr ""
+"Arrayway imensionsday unknownway, ustmay allcay arrayway-imensionday atway "
+"untimeray."
 
 #: src/compiler/array-tran.lisp
 msgid "Array has dimensions ~S, ~D is too large."
@@ -23629,10 +26751,10 @@ msgstr "Ancay't elltay ethay ankray atway ompilecay imetay."
 #: src/compiler/array-tran.lisp
 msgid ""
 "Array type ambiguous; must call ~\n"
-"	              array-has-fill-pointer-p at runtime."
+"\t              array-has-fill-pointer-p at runtime."
 msgstr ""
 "Arrayway ypetay ambiguousway; ustmay allcay ~\n"
-"	              arrayway-ashay-illfay-ointerpay-p atway untimeray."
+"\t              arrayway-ashay-illfay-ointerpay-p atway untimeray."
 
 #: src/compiler/seqtran.lisp
 msgid "Item might be a number"
@@ -23650,8 +26772,10 @@ msgid ""
 "  purposes of optimization."
 msgstr ""
 "Efineday-Ypetay-Edicatepray Amenay Ypetay\n"
-"  Establishway anway associationway etweenbay ethay ypetay edicatepray Amenay andway ethay\n"
-"  orrespondingcay Ypetay.  Isthay ausescay ethay ypetay edicatepray otay ebay ecognizedray orfay\n"
+"  Establishway anway associationway etweenbay ethay ypetay edicatepray "
+"Amenay andway ethay\n"
+"  orrespondingcay Ypetay.  Isthay ausescay ethay ypetay edicatepray otay "
+"ebay ecognizedray orfay\n"
 "  urposespay ofway optimizationway."
 
 #: src/compiler/typetran.lisp
@@ -23663,10 +26787,12 @@ msgid "Can't open-code test of unknown type ~S."
 msgstr "Ancay't openway-odecay esttay ofway unknownway ypetay ~S."
 
 #: src/compiler/typetran.lisp
-msgid "Can't compile TYPEP of anonymous or undefined ~\n"
-"			class:~%  ~S"
-msgstr "Ancay't ompilecay TYPEP ofway anonymousway orway undefinedway ~\n"
-"			assclay:~%  ~S"
+msgid ""
+"Can't compile TYPEP of anonymous or undefined ~\n"
+"\t\t\tclass:~%  ~S"
+msgstr ""
+"Ancay't ompilecay TYPEP ofway anonymousway orway undefinedway ~\n"
+"\t\t\tassclay:~%  ~S"
 
 #: src/compiler/typetran.lisp
 msgid "Illegal type specifier for Typep: ~S."
@@ -23698,7 +26824,8 @@ msgid ""
 "                      because the argument range (~s) was not within 2^~D"
 msgstr ""
 "Unableway otay avoidway inlineway argumentway angeray eckchay~@\n"
-"                      ecausebay ethay argumentway angeray (~s) asway otnay ithinway 2^~D"
+"                      ecausebay ethay argumentway angeray (~s) asway otnay "
+"ithinway 2^~D"
 
 #: src/compiler/float-tran.lisp
 msgid ""
@@ -23706,7 +26833,8 @@ msgid ""
 "                   because the argument range (~s) was not within 2^~D"
 msgstr ""
 "Unableway otay avoidway inlineway argumentway angeray eckchay~@\n"
-"                   ecausebay ethay argumentway angeray (~s) asway otnay ithinway 2^~D"
+"                   ecausebay ethay argumentway angeray (~s) asway otnay "
+"ithinway 2^~D"
 
 #: src/compiler/float-tran.lisp
 msgid "Float zero bound ~s not correctly canonicalised?"
@@ -23721,12 +26849,14 @@ msgid ""
 "Compute fl(a*a) and err(a*b).  This is a more efficient\n"
 "  implementation of two-prod"
 msgstr ""
-"Omputecay flay(a*away) andway errway(a*bway).  Isthay isway away oremay efficientway\n"
+"Omputecay flay(a*away) andway errway(a*bway).  Isthay isway away oremay "
+"efficientway\n"
 "  implementationway ofway wotay-odpray"
 
 #: src/compiler/float-tran.lisp
 msgid "Computes fl(a+b) and err(a+b), assuming |a| >= |b|"
-msgstr "Omputescay flay(away+b) andway errway(away+b), assumingway |away| >= |b|"
+msgstr ""
+"Omputescay flay(away+b) andway errway(away+b), assumingway |away| >= |b|"
 
 #: src/compiler/float-tran.lisp
 msgid "Computes fl(a+b) and err(a+b)"
@@ -23734,11 +26864,13 @@ msgstr "Omputescay flay(away+b) andway errway(away+b)"
 
 #: src/compiler/float-tran.lisp
 msgid "Add the double-double A0,A1 to the double-double B0,B1"
-msgstr "Addway ethay oubleday-oubleday Away0,Away1 otay ethay oubleday-oubleday B0,B1"
+msgstr ""
+"Addway ethay oubleday-oubleday Away0,Away1 otay ethay oubleday-oubleday B0,B1"
 
 #: src/compiler/float-tran.lisp
 msgid "Compute fl(a-b) and err(a-b), assuming |a| >= |b|"
-msgstr "Omputecay flay(away-b) andway errway(away-b), assumingway |away| >= |b|"
+msgstr ""
+"Omputecay flay(away-b) andway errway(away-b), assumingway |away| >= |b|"
 
 #: src/compiler/float-tran.lisp
 msgid "Compute fl(a-b) and err(a-b)"
@@ -23762,8 +26894,10 @@ msgid ""
 "  a-hi + a-lo and a-hi contains the upper 26 significant bits of a and\n"
 "  a-lo contains the lower 26 bits."
 msgstr ""
-"Litspay ethay oubleday-oatflay umbernay away intoway away-ihay andway away-olay uchsay atthay away =\n"
-"  away-ihay + away-olay andway away-ihay ontainscay ethay upperway 26 ignificantsay itsbay ofway away andway\n"
+"Litspay ethay oubleday-oatflay umbernay away intoway away-ihay andway away-"
+"olay uchsay atthay away =\n"
+"  away-ihay + away-olay andway away-ihay ontainscay ethay upperway 26 "
+"ignificantsay itsbay ofway away andway\n"
 "  away-olay ontainscay ethay owerlay 26 itsbay."
 
 #: src/compiler/float-tran.lisp
@@ -23832,31 +26966,36 @@ msgid ""
 "  arithmetic.  Set to NIL to disable this, if you don't want modular\n"
 "  arithmetic in some cases."
 msgstr ""
-"Enwhay onnay-NIL, ethay ompilercay illway enerategay odecay utilizingway odularmay\n"
-"  arithmeticway.  Etsay otay NIL otay isableday isthay, ifway ouyay onday't antway odularmay\n"
+"Enwhay onnay-NIL, ethay ompilercay illway enerategay odecay utilizingway "
+"odularmay\n"
+"  arithmeticway.  Etsay otay NIL otay isableday isthay, ifway ouyay onday't "
+"antway odularmay\n"
 "  arithmeticway inway omesay asescay."
 
 #: src/compiler/locall.lisp
 msgid ""
 "Couldn't inline expand because expansion ~\n"
-"				   calls this let-converted local function:~\n"
-"				   ~%  ~S"
+"\t\t\t\t   calls this let-converted local function:~\n"
+"\t\t\t\t   ~%  ~S"
 msgstr ""
 "Ouldncay't inlineway expandway ecausebay expansionway ~\n"
-"				   allscay isthay etlay-onvertedcay ocallay unctionfay:~\n"
-"				   ~%  ~S"
+"\t\t\t\t   allscay isthay etlay-onvertedcay ocallay unctionfay:~\n"
+"\t\t\t\t   ~%  ~S"
 
 #: src/compiler/locall.lisp
 msgid "Function called with ~R argument~:P, but wants exactly ~R."
-msgstr "Unctionfay alledcay ithway ~R argumentway~:P, utbay antsway exactlyway ~R."
+msgstr ""
+"Unctionfay alledcay ithway ~R argumentway~:P, utbay antsway exactlyway ~R."
 
 #: src/compiler/locall.lisp
 msgid "Function called with ~R argument~:P, but wants at least ~R."
-msgstr "Unctionfay alledcay ithway ~R argumentway~:P, utbay antsway atway eastlay ~R."
+msgstr ""
+"Unctionfay alledcay ithway ~R argumentway~:P, utbay antsway atway eastlay ~R."
 
 #: src/compiler/locall.lisp
 msgid "Function called with ~R argument~:P, but wants at most ~R."
-msgstr "Unctionfay alledcay ithway ~R argumentway~:P, utbay antsway atway ostmay ~R."
+msgstr ""
+"Unctionfay alledcay ithway ~R argumentway~:P, utbay antsway atway ostmay ~R."
 
 #: src/compiler/locall.lisp
 msgid "Can't local-call functions with &MORE args."
@@ -23865,10 +27004,10 @@ msgstr "Ancay't ocallay-allcay unctionsfay ithway &MORE argsway."
 #: src/compiler/locall.lisp
 msgid ""
 "Function called with odd number of ~\n"
-"	  		     arguments in keyword portion."
+"\t  \t\t     arguments in keyword portion."
 msgstr ""
 "Unctionfay alledcay ithway oddway umbernay ofway ~\n"
-"	  		     argumentsway inway eywordkay ortionpay."
+"\t  \t\t     argumentsway inway eywordkay ortionpay."
 
 #: src/compiler/locall.lisp
 msgid "Non-constant keyword in keyword call."
@@ -23903,17 +27042,20 @@ msgid "Type assertion too complex to check:~% ~S."
 msgstr "Ypetay assertionway ootay omplexcay otay eckchay:~% ~S."
 
 #: src/compiler/constraint.lisp
-msgid "*** Unreachable code in constraint ~\n"
-"			  propagation...  Bug?"
-msgstr "*** Unreachableway odecay inway onstraintcay ~\n"
-"			  opagationpray...  Ugbay?"
+msgid ""
+"*** Unreachable code in constraint ~\n"
+"\t\t\t  propagation...  Bug?"
+msgstr ""
+"*** Unreachableway odecay inway onstraintcay ~\n"
+"\t\t\t  opagationpray...  Ugbay?"
 
 #: src/compiler/tn.lisp
 msgid ""
 "Do-Packed-TNs (TN-Var Component [Result]) Declaration* Form*\n"
 "  Iterate over all packed TNs allocated in Component."
 msgstr ""
-"Oday-Ackedpay-Nstay (TN-Arvay Omponentcay [Esultray]) Eclaration*Day Orm*Fay\n"
+"Oday-Ackedpay-Nstay (TN-Arvay Omponentcay [Esultray]) Eclaration*Day "
+"Orm*Fay\n"
 "  Iterateway overway allway ackedpay Nstay allocatedway inway Omponentcay."
 
 #: src/compiler/tn.lisp
@@ -23931,12 +27073,15 @@ msgid ""
 "otherwise the truename."
 msgstr ""
 "Extractway ethay amestringnay omfray FILE-INFO orfay ethay DEBUG-SOURCE.  \n"
-"Eturnray FILE-INFO's untruenameway (e.g., argettay:oofay) ifway itway isway absoluteway;\n"
+"Eturnray FILE-INFO's untruenameway (e.g., argettay:oofay) ifway itway isway "
+"absoluteway;\n"
 "otherwiseway ethay uenametray."
 
 #: src/compiler/generic/utils.lisp
 msgid "Make a fixnum out of NUM.  (i.e. shift by two bits if it will fit.)"
-msgstr "Akemay away ixnumfay outway ofway NUM.  (i.e. iftshay ybay wotay itsbay ifway itway illway itfay.)"
+msgstr ""
+"Akemay away ixnumfay outway ofway NUM.  (i.e. iftshay ybay wotay itsbay "
+"ifway itway illway itfay.)"
 
 #: src/compiler/generic/utils.lisp
 msgid "~D is too big for a fixnum."
@@ -23944,7 +27089,8 @@ msgstr "~D isway ootay igbay orfay away ixnumfay."
 
 #: src/compiler/generic/utils.lisp
 msgid "Returns the byte offset of the static symbol Symbol."
-msgstr "Eturnsray ethay ytebay offsetway ofway ethay taticsay ymbolsay Ymbolsay."
+msgstr ""
+"Eturnsray ethay ytebay offsetway ofway ethay taticsay ymbolsay Ymbolsay."
 
 #: src/compiler/generic/utils.lisp
 msgid "~S is not a static symbol."
@@ -23952,7 +27098,9 @@ msgstr "~S isway otnay away taticsay ymbolsay."
 
 #: src/compiler/generic/utils.lisp
 msgid "Given a byte offset, Offset, returns the appropriate static symbol."
-msgstr "Ivengay away ytebay offsetway, Offsetway, eturnsray ethay appropriateway taticsay ymbolsay."
+msgstr ""
+"Ivengay away ytebay offsetway, Offsetway, eturnsray ethay appropriateway "
+"taticsay ymbolsay."
 
 #: src/compiler/generic/utils.lisp
 msgid "Byte offset, ~D, is not correct."
@@ -23963,7 +27111,8 @@ msgid ""
 "Return the (byte) offset from NIL to the start of the fdefn object\n"
 "   for the static function NAME."
 msgstr ""
-"Eturnray ethay (ytebay) offsetway omfray NIL otay ethay tartsay ofway ethay defnfay objectway\n"
+"Eturnray ethay (ytebay) offsetway omfray NIL otay ethay tartsay ofway ethay "
+"defnfay objectway\n"
 "   orfay ethay taticsay unctionfay NAME."
 
 #: src/compiler/generic/utils.lisp
@@ -23975,7 +27124,8 @@ msgid ""
 "Given a byte offset, Offset, returns the appropriate static function\n"
 "   symbol."
 msgstr ""
-"Ivengay away ytebay offsetway, Offsetway, eturnsray ethay appropriateway taticsay unctionfay\n"
+"Ivengay away ytebay offsetway, Offsetway, eturnsray ethay appropriateway "
+"taticsay unctionfay\n"
 "   ymbolsay."
 
 #: src/compiler/generic/primtype.lisp
@@ -23983,7 +27133,8 @@ msgid ""
 "An a-list for mapping simple array element types to their\n"
 "  corresponding primitive types."
 msgstr ""
-"Anway away-istlay orfay appingmay implesay arrayway elementway ypestay otay eirthay\n"
+"Anway away-istlay orfay appingmay implesay arrayway elementway ypestay otay "
+"eirthay\n"
 "  orrespondingcay imitivepray ypestay."
 
 #: src/compiler/aliencomp.lisp
@@ -24045,14 +27196,16 @@ msgstr "Alienway ypetay otnay onstantcay; annotcay openway odecay."
 #: src/compiler/aliencomp.lisp
 msgid ""
 "Could not optimize away %SAP-ALIEN: forced to do runtime ~@\n"
-"	    allocation of alien-value structure."
+"\t    allocation of alien-value structure."
 msgstr ""
-"Ouldcay otnay optimizeway awayway %SAP-ALIEN: orcedfay otay oday untimeray ~@\n"
-"	    allocationway ofway alienway-aluevay ucturestray."
+"Ouldcay otnay optimizeway awayway %SAP-ALIEN: orcedfay otay oday untimeray "
+"~@\n"
+"\t    allocationway ofway alienway-aluevay ucturestray."
 
 #: src/compiler/aliencomp.lisp
 msgid "Type not constant at compile time; can't open code."
-msgstr "Ypetay otnay onstantcay atway ompilecay imetay; ancay't openway odecay."
+msgstr ""
+"Ypetay otnay onstantcay atway ompilecay imetay; ancay't openway odecay."
 
 #: src/compiler/aliencomp.lisp
 msgid "Can't tell function type at compile time."
@@ -24081,36 +27234,40 @@ msgid ""
 "   object is guaranteed to never be modified, so it can be put in read-only\n"
 "   storage."
 msgstr ""
-"Arrangeway orfay FORM otay ebay evaluatedway atway oadlay-imetay andway useway ethay aluevay oducedpray\n"
-"   asway ifway itway ereway away onstantcay.  Ifway READ-ONLY-P isway onnay-NIL, enthay ethay esultantray\n"
-"   objectway isway uaranteedgay otay evernay ebay odifiedmay, osay itway ancay ebay utpay inway eadray-onlyway\n"
+"Arrangeway orfay FORM otay ebay evaluatedway atway oadlay-imetay andway "
+"useway ethay aluevay oducedpray\n"
+"   asway ifway itway ereway away onstantcay.  Ifway READ-ONLY-P isway onnay-"
+"NIL, enthay ethay esultantray\n"
+"   objectway isway uaranteedgay otay evernay ebay odifiedmay, osay itway "
+"ancay ebay utpay inway eadray-onlyway\n"
 "   toragesay."
 
 #: src/compiler/gtn.lisp
 msgid ""
 "Return value count mismatch prevents known return ~\n"
-"		       from these functions:~\n"
-"		       ~{~%  ~A~}"
+"\t\t       from these functions:~\n"
+"\t\t       ~{~%  ~A~}"
 msgstr ""
 "Eturnray aluevay ountcay ismatchmay eventspray nownkay eturnray ~\n"
-"		       omfray esethay unctionsfay:~\n"
-"		       ~{~%  ~Away~}"
+"\t\t       omfray esethay unctionsfay:~\n"
+"\t\t       ~{~%  ~Away~}"
 
 #: src/compiler/gtn.lisp
 msgid ""
 "Return type not fixed values, so can't use known return ~\n"
-"		      convention:~%  ~S"
+"\t\t      convention:~%  ~S"
 msgstr ""
-"Eturnray ypetay otnay ixedfay aluesvay, osay ancay't useway nownkay eturnray ~\n"
-"		      onventioncay:~%  ~S"
+"Eturnray ypetay otnay ixedfay aluesvay, osay ancay't useway nownkay eturnray "
+"~\n"
+"\t\t      onventioncay:~%  ~S"
 
 #: src/compiler/ltn.lisp
 msgid ""
 "Unable to check type assertion in unknown-values ~\n"
-"	                context:~% ~S"
+"\t                context:~% ~S"
 msgstr ""
 "Unableway otay eckchay ypetay assertionway inway unknownway-aluesvay ~\n"
-"	                ontextcay:~% ~S"
+"\t                ontextcay:~% ~S"
 
 #: src/compiler/represent.lisp src/compiler/ir2tran.lisp src/compiler/ltn.lisp
 msgid "Neither CONT nor TN supplied."
@@ -24125,15 +27282,18 @@ msgid ""
 "This is the maximum number of possible optimization alternatives will be\n"
 "  mentioned in a particular efficiency note.  NIL means no limit."
 msgstr ""
-"Isthay isway ethay aximummay umbernay ofway ossiblepay optimizationway alternativesway illway ebay\n"
-"  entionedmay inway away articularpay efficiencyway otenay.  NIL eansmay onay imitlay."
+"Isthay isway ethay aximummay umbernay ofway ossiblepay optimizationway "
+"alternativesway illway ebay\n"
+"  entionedmay inway away articularpay efficiencyway otenay.  NIL eansmay "
+"onay imitlay."
 
 #: src/compiler/ltn.lisp
 msgid ""
 "This is the minumum cost difference between the chosen implementation and\n"
 "  the next alternative that justifies an efficiency note."
 msgstr ""
-"Isthay isway ethay inumummay ostcay ifferenceday etweenbay ethay osenchay implementationway andway\n"
+"Isthay isway ethay inumummay ostcay ifferenceday etweenbay ethay osenchay "
+"implementationway andway\n"
 "  ethay extnay alternativeway atthay ustifiesjay anway efficiencyway otenay."
 
 #: src/compiler/ltn.lisp
@@ -24146,7 +27306,8 @@ msgstr "Emplatetay uardgay ailedfay."
 
 #: src/compiler/ltn.lisp
 msgid "Template is not safe, yet we were counting on it."
-msgstr "Emplatetay isway otnay afesay, etyay eway ereway ountingcay onway itway."
+msgstr ""
+"Emplatetay isway otnay afesay, etyay eway ereway ountingcay onway itway."
 
 #: src/compiler/ltn.lisp
 msgid "Argument types invalid."
@@ -24177,10 +27338,12 @@ msgid "Unable to do ~A (cost ~D) because:"
 msgstr "Unableway otay oday ~Away (ostcay ~D) ecausebay:"
 
 #: src/compiler/ltn.lisp
-msgid "Can't trust output type assertion under safe ~\n"
-"		       policy."
-msgstr "Ancay't usttray outputway ypetay assertionway underway afesay ~\n"
-"		       olicypay."
+msgid ""
+"Can't trust output type assertion under safe ~\n"
+"\t\t       policy."
+msgstr ""
+"Ancay't usttray outputway ypetay assertionway underway afesay ~\n"
+"\t\t       olicypay."
 
 #: src/compiler/ltn.lisp
 msgid "Forced to do ~A (cost ~D)."
@@ -24199,14 +27362,16 @@ msgid ""
 "Always perform stack clearing if non-NIL, independent of the\n"
 "compilation policy"
 msgstr ""
-"Alwaysway erformpay tacksay earingclay ifway onnay-NIL, independentway ofway ethay\n"
+"Alwaysway erformpay tacksay earingclay ifway onnay-NIL, independentway ofway "
+"ethay\n"
 "ompilationcay olicypay"
 
 #: src/compiler/ir2tran.lisp
 msgid ""
 "If non-NIL and the compilation policy allows, stack clearing is enabled."
 msgstr ""
-"Ifway onnay-NIL andway ethay ompilationcay olicypay allowsway, tacksay earingclay isway enabledway."
+"Ifway onnay-NIL andway ethay ompilationcay olicypay allowsway, tacksay "
+"earingclay isway enabledway."
 
 #: src/compiler/ir2tran.lisp
 msgid "~@<~2I~_~S ~_not found in ~_~S~:>"
@@ -24219,60 +27384,70 @@ msgstr "Ouldncay't indfay REF?"
 #: src/compiler/represent.lisp
 msgid ""
 "Representation selection flamed out for no obvious reason.~@\n"
-"	          Try again after recompiling the VM definition."
+"\t          Try again after recompiling the VM definition."
 msgstr ""
-"Epresentationray electionsay amedflay outway orfay onay obviousway easonray.~@\n"
-"	          Ytray againway afterway ecompilingray ethay VM efinitionday."
+"Epresentationray electionsay amedflay outway orfay onay obviousway easonray."
+"~@\n"
+"\t          Ytray againway afterway ecompilingray ethay VM efinitionday."
 
 #: src/compiler/represent.lisp
 msgid ""
 "~S is not valid as the ~:R ~:[result~;argument~] to the~@\n"
-"	        ~S VOP, since the TN's primitive type ~S allows SCs:~%  ~S~@\n"
-"		~:[which cannot be coerced or loaded into the allowed SCs:~\n"
-"		~%  ~S~;~*~]~:[~;~@\n"
-"		Current cost info inconsistent with that in effect at compile ~\n"
-"		time.  Recompile.~%Compilation order may be incorrect.~]"
-msgstr ""
-"~S isway otnay alidvay asway ethay ~:R ~:[esultray~;argumentway~] otay ethay~@\n"
-"	        ~S VOP, incesay ethay TN's imitivepray ypetay ~S allowsway Sscay:~%  ~S~@\n"
-"		~:[ichwhay annotcay ebay oercedcay orway oadedlay intoway ethay allowedway Sscay:~\n"
-"		~%  ~S~;~*~]~:[~;~@\n"
-"		Urrentcay ostcay infoway inconsistentway ithway atthay inway effectway atway ompilecay ~\n"
-"		imetay.  Ecompileray.~%Ompilationcay orderway aymay ebay incorrectway.~]"
+"\t        ~S VOP, since the TN's primitive type ~S allows SCs:~%  ~S~@\n"
+"\t\t~:[which cannot be coerced or loaded into the allowed SCs:~\n"
+"\t\t~%  ~S~;~*~]~:[~;~@\n"
+"\t\tCurrent cost info inconsistent with that in effect at compile ~\n"
+"\t\ttime.  Recompile.~%Compilation order may be incorrect.~]"
+msgstr ""
+"~S isway otnay alidvay asway ethay ~:R ~:[esultray~;argumentway~] otay "
+"ethay~@\n"
+"\t        ~S VOP, incesay ethay TN's imitivepray ypetay ~S allowsway Sscay:~"
+"%  ~S~@\n"
+"\t\t~:[ichwhay annotcay ebay oercedcay orway oadedlay intoway ethay "
+"allowedway Sscay:~\n"
+"\t\t~%  ~S~;~*~]~:[~;~@\n"
+"\t\tUrrentcay ostcay infoway inconsistentway ithway atthay inway effectway "
+"atway ompilecay ~\n"
+"\t\timetay.  Ecompileray.~%Ompilationcay orderway aymay ebay incorrectway.~]"
 
 #: src/compiler/represent.lisp
 msgid ""
 "Representation selection flamed out for no ~\n"
-"		             obvious reason."
+"\t\t             obvious reason."
 msgstr ""
 "Epresentationray electionsay amedflay outway orfay onay ~\n"
-"		             obviousway easonray."
+"\t\t             obviousway easonray."
 
 #: src/compiler/represent.lisp
 msgid ""
 "~S is not valid as the ~:R ~:[result~;argument~] to VOP:~\n"
-"	        ~%  ~S~%Primitive type: ~S~@\n"
-"		SC restrictions:~%  ~S~@\n"
-"		~@[The primitive type disallows these loadable SCs:~%  ~S~%~]~\n"
-"		~@[No move VOPs are defined to coerce to these allowed SCs:~\n"
-"		~%  ~S~%~]~\n"
-"		~@[These move VOPs couldn't be used due to operand type ~\n"
-"		restrictions:~%  ~S~%~]~\n"
-"		~:[~;~@\n"
-"		Current cost info inconsistent with that in effect at compile ~\n"
-"		time.  Recompile.~%Compilation order may be incorrect.~]"
-msgstr ""
-"~S isway otnay alidvay asway ethay ~:R ~:[esultray~;argumentway~] otay VOP:~\n"
-"	        ~%  ~S~%Imitivepray ypetay: ~S~@\n"
-"		SC estrictionsray:~%  ~S~@\n"
-"		~@[Ethay imitivepray ypetay isallowsday esethay oadablelay Sscay:~%  ~S~%~]~\n"
-"		~@[Onay ovemay Opsvay areway efinedday otay oercecay otay esethay allowedway Sscay:~\n"
-"		~%  ~S~%~]~\n"
-"		~@[Esethay ovemay Opsvay ouldncay't ebay usedway ueday otay operandway ypetay ~\n"
-"		estrictionsray:~%  ~S~%~]~\n"
-"		~:[~;~@\n"
-"		Urrentcay ostcay infoway inconsistentway ithway atthay inway effectway atway ompilecay ~\n"
-"		imetay.  Ecompileray.~%Ompilationcay orderway aymay ebay incorrectway.~]"
+"\t        ~%  ~S~%Primitive type: ~S~@\n"
+"\t\tSC restrictions:~%  ~S~@\n"
+"\t\t~@[The primitive type disallows these loadable SCs:~%  ~S~%~]~\n"
+"\t\t~@[No move VOPs are defined to coerce to these allowed SCs:~\n"
+"\t\t~%  ~S~%~]~\n"
+"\t\t~@[These move VOPs couldn't be used due to operand type ~\n"
+"\t\trestrictions:~%  ~S~%~]~\n"
+"\t\t~:[~;~@\n"
+"\t\tCurrent cost info inconsistent with that in effect at compile ~\n"
+"\t\ttime.  Recompile.~%Compilation order may be incorrect.~]"
+msgstr ""
+"~S isway otnay alidvay asway ethay ~:R ~:[esultray~;argumentway~] otay VOP:"
+"~\n"
+"\t        ~%  ~S~%Imitivepray ypetay: ~S~@\n"
+"\t\tSC estrictionsray:~%  ~S~@\n"
+"\t\t~@[Ethay imitivepray ypetay isallowsday esethay oadablelay Sscay:~%  ~S~"
+"%~]~\n"
+"\t\t~@[Onay ovemay Opsvay areway efinedday otay oercecay otay esethay "
+"allowedway Sscay:~\n"
+"\t\t~%  ~S~%~]~\n"
+"\t\t~@[Esethay ovemay Opsvay ouldncay't ebay usedway ueday otay operandway "
+"ypetay ~\n"
+"\t\testrictionsray:~%  ~S~%~]~\n"
+"\t\t~:[~;~@\n"
+"\t\tUrrentcay ostcay infoway inconsistentway ithway atthay inway effectway "
+"atway ompilecay ~\n"
+"\t\timetay.  Ecompileray.~%Ompilationcay orderway aymay ebay incorrectway.~]"
 
 #: src/compiler/represent.lisp
 msgid ""
@@ -24285,26 +27460,26 @@ msgstr ""
 #: src/compiler/represent.lisp
 msgid ""
 "No move function defined to load SC ~S from constant ~\n"
-"	             SC ~S."
+"\t             SC ~S."
 msgstr ""
 "Onay ovemay unctionfay efinedday otay oadlay SC ~S omfray onstantcay ~\n"
-"	             SC ~S."
+"\t             SC ~S."
 
 #: src/compiler/represent.lisp
 msgid ""
 "No move function defined to load SC ~S from alternate ~\n"
-"	             SC ~S."
+"\t             SC ~S."
 msgstr ""
 "Onay ovemay unctionfay efinedday otay oadlay SC ~S omfray alternateway ~\n"
-"	             SC ~S."
+"\t             SC ~S."
 
 #: src/compiler/represent.lisp
 msgid ""
 "No move function defined to save SC ~S to alternate ~\n"
-"	             SC ~S."
+"\t             SC ~S."
 msgstr ""
 "Onay ovemay unctionfay efinedday otay avesay SC ~S otay alternateway ~\n"
-"	             SC ~S."
+"\t             SC ~S."
 
 #: src/compiler/represent.lisp
 msgid "<return value>"
@@ -24313,10 +27488,10 @@ msgstr "<eturnray aluevay>"
 #: src/compiler/represent.lisp
 msgid ""
 "Doing ~A (cost ~D)~:[~2*~; ~:[to~;from~] ~S~], for:~%~6T~\n"
-"	       The ~:R ~:[result~;argument~] of ~A."
+"\t       The ~:R ~:[result~;argument~] of ~A."
 msgstr ""
 "Oingday ~Away (ostcay ~D)~:[~2*~; ~:[otay~;omfray~] ~S~], orfay:~%~6T~\n"
-"	       Ethay ~:R ~:[esultray~;argumentway~] ofway ~Away."
+"\t       Ethay ~:R ~:[esultray~;argumentway~] ofway ~Away."
 
 #: src/compiler/represent.lisp
 msgid "Doing ~A (cost ~D)~@[ from ~S~]~@[ to ~S~]."
@@ -24328,14 +27503,17 @@ msgstr "Ouldncay't inefay opway?  Ugbay!"
 
 #: src/compiler/codegen.lisp
 msgid "Returns the number of bytes used by the code object header."
-msgstr "Eturnsray ethay umbernay ofway ytesbay usedway ybay ethay odecay objectway eaderhay."
+msgstr ""
+"Eturnsray ethay umbernay ofway ytesbay usedway ybay ethay odecay objectway "
+"eaderhay."
 
 #: src/compiler/codegen.lisp
 msgid ""
 "The size of the Name'd SB in the currently compiled component.  Useful\n"
 "  mainly for finding the size for allocating stack frames."
 msgstr ""
-"Ethay izesay ofway ethay Amenay'd SB inway ethay urrentlycay ompiledcay omponentcay.  Usefulway\n"
+"Ethay izesay ofway ethay Amenay'd SB inway ethay urrentlycay ompiledcay "
+"omponentcay.  Usefulway\n"
 "  ainlymay orfay indingfay ethay izesay orfay allocatingway tacksay amesfray."
 
 #: src/compiler/codegen.lisp
@@ -24343,8 +27521,10 @@ msgid ""
 "Return the TN that is used to hold the number stack frame-pointer in VOP's\n"
 "  function.  Returns NIL if no number stack frame was allocated."
 msgstr ""
-"Eturnray ethay TN atthay isway usedway otay oldhay ethay umbernay tacksay amefray-ointerpay inway VOP's\n"
-"  unctionfay.  Eturnsray NIL ifway onay umbernay tacksay amefray asway allocatedway."
+"Eturnray ethay TN atthay isway usedway otay oldhay ethay umbernay tacksay "
+"amefray-ointerpay inway VOP's\n"
+"  unctionfay.  Eturnsray NIL ifway onay umbernay tacksay amefray asway "
+"allocatedway."
 
 #: src/compiler/codegen.lisp
 msgid ""
@@ -24352,18 +27532,20 @@ msgid ""
 "  function designated by 2env.  Returns NIL if no number stack frame was\n"
 "  allocated."
 msgstr ""
-"Eturnray ethay TN atthay isway usedway otay oldhay ethay umbernay tacksay amefray-ointerpay inway ethay\n"
-"  unctionfay esignatedday ybay 2envway.  Eturnsray NIL ifway onay umbernay tacksay amefray asway\n"
+"Eturnray ethay TN atthay isway usedway otay oldhay ethay umbernay tacksay "
+"amefray-ointerpay inway ethay\n"
+"  unctionfay esignatedday ybay 2envway.  Eturnsray NIL ifway onay umbernay "
+"tacksay amefray asway\n"
 "  allocatedway."
 
 #: src/compiler/codegen.lisp
 msgid ""
-"Return the TN used for passing the return PC in a local call to the function"
-"\n"
+"Return the TN used for passing the return PC in a local call to the "
+"function\n"
 "  designated by 2env."
 msgstr ""
-"Eturnray ethay TN usedway orfay assingpay ethay eturnray PC inway away ocallay allcay otay ethay unctionfay"
-"\n"
+"Eturnray ethay TN usedway orfay assingpay ethay eturnray PC inway away "
+"ocallay allcay otay ethay unctionfay\n"
 "  esignatedday ybay 2envway."
 
 #: src/compiler/codegen.lisp
@@ -24371,7 +27553,8 @@ msgid ""
 "Set to NIL to inhibit assembly-level optimization.  For compiler debugging,\n"
 "  rather than policy control."
 msgstr ""
-"Etsay otay NIL otay inhibitway assemblyway-evellay optimizationway.  Orfay ompilercay ebuggingday,\n"
+"Etsay otay NIL otay inhibitway assemblyway-evellay optimizationway.  Orfay "
+"ompilercay ebuggingday,\n"
 "  atherray anthay olicypay ontrolcay."
 
 #: src/compiler/codegen.lisp
@@ -24391,7 +27574,8 @@ msgid ""
 "This variable is bound to the format arguments when an error is signalled\n"
 "  by Barf or Burp."
 msgstr ""
-"Isthay ariablevay isway oundbay otay ethay ormatfay argumentsway enwhay anway errorway isway ignalledsay\n"
+"Isthay ariablevay isway oundbay otay ethay ormatfay argumentsway enwhay "
+"anway errorway isway ignalledsay\n"
 "  ybay Arfbay orway Urpbay."
 
 #: src/compiler/debug.lisp
@@ -24399,7 +27583,8 @@ msgid ""
 "Action taken by the Burp function when a possible compiler bug is detected.\n"
 "  One of :Warn, :Error or :None."
 msgstr ""
-"Actionway akentay ybay ethay Urpbay unctionfay enwhay away ossiblepay ompilercay ugbay isway etectedday.\n"
+"Actionway akentay ybay ethay Urpbay unctionfay enwhay away ossiblepay "
+"ompilercay ugbay isway etectedday.\n"
 "  Oneway ofway :Arnway, :Errorway orway :Onenay."
 
 #: src/compiler/debug.lisp
@@ -24407,12 +27592,15 @@ msgid ""
 "Return a list of a the TNs that conflict with TN.  Sort of, kind of.  For\n"
 "  debugging use only.  Probably doesn't work on :COMPONENT TNs."
 msgstr ""
-"Eturnray away istlay ofway away ethay Nstay atthay onflictcay ithway TN.  Ortsay ofway, indkay ofway.  Orfay\n"
-"  ebuggingday useway onlyway.  Obablypray oesnday't orkway onway :COMPONENT Nstay."
+"Eturnray away istlay ofway away ethay Nstay atthay onflictcay ithway TN.  "
+"Ortsay ofway, indkay ofway.  Orfay\n"
+"  ebuggingday useway onlyway.  Obablypray oesnday't orkway onway :COMPONENT "
+"Nstay."
 
 #: src/compiler/debug.lisp
 msgid "Return the Nth VOP in the IR2-Block pointed to by Thing."
-msgstr "Eturnray ethay Thnay VOP inway ethay IR2-Ockblay ointedpay otay ybay Ingthay."
+msgstr ""
+"Eturnray ethay Thnay VOP inway ethay IR2-Ockblay ointedpay otay ybay Ingthay."
 
 #: src/compiler/xref.lisp
 msgid "Reinitialize the cross-reference database."
@@ -24423,7 +27611,8 @@ msgid ""
 "Return a list of those program contexts where a globally-defined\n"
 "function may be called at runtime."
 msgstr ""
-"Eturnray away istlay ofway osethay ogrampray ontextscay erewhay away oballyglay-efinedday\n"
+"Eturnray away istlay ofway osethay ogrampray ontextscay erewhay away "
+"oballyglay-efinedday\n"
 "unctionfay aymay ebay alledcay atway untimeray."
 
 #: src/compiler/xref.lisp
@@ -24431,7 +27620,8 @@ msgid ""
 "Return a list of those program contexts where GLOBAL-VARIABLE\n"
 "may be referenced at runtime."
 msgstr ""
-"Eturnray away istlay ofway osethay ogrampray ontextscay erewhay GLOBAL-VARIABLE\n"
+"Eturnray away istlay ofway osethay ogrampray ontextscay erewhay GLOBAL-"
+"VARIABLE\n"
 "aymay ebay eferencedray atway untimeray."
 
 #: src/compiler/xref.lisp
@@ -24439,7 +27629,8 @@ msgid ""
 "Return a list of those program contexts where GLOBAL-VARIABLE may\n"
 "be bound at runtime."
 msgstr ""
-"Eturnray away istlay ofway osethay ogrampray ontextscay erewhay GLOBAL-VARIABLE aymay\n"
+"Eturnray away istlay ofway osethay ogrampray ontextscay erewhay GLOBAL-"
+"VARIABLE aymay\n"
 "ebay oundbay atway untimeray."
 
 #: src/compiler/xref.lisp
@@ -24447,14 +27638,15 @@ msgid ""
 "Return a list of those program contexts where GLOBAL-VARIABLE may\n"
 "be set at runtime."
 msgstr ""
-"Eturnray away istlay ofway osethay ogrampray ontextscay erewhay GLOBAL-VARIABLE aymay\n"
+"Eturnray away istlay ofway osethay ogrampray ontextscay erewhay GLOBAL-"
+"VARIABLE aymay\n"
 "ebay etsay atway untimeray."
 
 #: src/compiler/dyncount.lisp
-msgid ""
-"When T, emit extra code to collect dynamic statistics about vop usages."
+msgid "When T, emit extra code to collect dynamic statistics about vop usages."
 msgstr ""
-"Enwhay T, emitway extraway odecay otay ollectcay ynamicday tatisticssay aboutway opvay usagesway."
+"Enwhay T, emitway extraway odecay otay ollectcay ynamicday tatisticssay "
+"aboutway opvay usagesway."
 
 #: src/compiler/dyncount.lisp
 msgid "Holds the TN for the counts vector."
@@ -24470,7 +27662,8 @@ msgstr "Iedtray otay outputway ~D ytesbay, utbay onlyway ~D ademay itway."
 
 #: src/compiler/dump.lisp
 msgid "This object cannot be dumped into a fasl file:~% ~S"
-msgstr "Isthay objectway annotcay ebay umpedday intoway away aslfay ilefay:~% ~S"
+msgstr ""
+"Isthay objectway annotcay ebay umpedday intoway away aslfay ilefay:~% ~S"
 
 #: src/compiler/dump.lisp
 msgid "~S already dumped?"
@@ -24478,7 +27671,9 @@ msgstr "~S alreadyway umpedday?"
 
 #: src/compiler/dump.lisp
 msgid "Attempt to dump invalid structure:~%  ~S~%How did this happen?"
-msgstr "Attemptway otay umpday invalidway ucturestray:~%  ~S~%Owhay idday isthay appenhay?"
+msgstr ""
+"Attemptway otay umpday invalidway ucturestray:~%  ~S~%Owhay idday isthay "
+"appenhay?"
 
 #: src/compiler/dump.lisp
 msgid "Dumping reference to obsolete class: ~S"
@@ -24502,11 +27697,13 @@ msgstr "Itingwray ~D ytesbay otay ~S ouldway ausecay itway otay overflowway."
 
 #: src/compiler/generic/core.lisp
 msgid "Writing another byte to ~S would cause it to overflow."
-msgstr "Itingwray anotherway ytebay otay ~S ouldway ausecay itway otay overflowway."
+msgstr ""
+"Itingwray anotherway ytebay otay ~S ouldway ausecay itway otay overflowway."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Rounds number up to be an integral multiple of size."
-msgstr "Oundsray umbernay upway otay ebay anway integralway ultiplemay ofway izesay."
+msgstr ""
+"Oundsray umbernay upway otay ebay anway integralway ultiplemay ofway izesay."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Handle on Nil."
@@ -24514,7 +27711,8 @@ msgstr "Andlehay onway Ilnay."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Number of bits in the low half of the descriptor"
-msgstr "Umbernay ofway itsbay inway ethay owlay alfhay ofway ethay escriptorday"
+msgstr ""
+"Umbernay ofway itsbay inway ethay owlay alfhay ofway ethay escriptorday"
 
 #: src/compiler/generic/new-genesis.lisp
 msgid ""
@@ -24530,9 +27728,12 @@ msgid ""
 "  pointer is boosted as necessary.  If any additional memory is needed, we\n"
 "  vm_allocate it.  The descriptor returned is a pointer of type LOWTAG."
 msgstr ""
-"Eturnray away escriptorday orfay away ockblay ofway LENGTH ytesbay outway ofway SPACE.  Ethay eefray\n"
-"  ointerpay isway oostedbay asway ecessarynay.  Ifway anyway additionalway emorymay isway eedednay, eway\n"
-"  mvay_allocateway itway.  Ethay escriptorday eturnedray isway away ointerpay ofway ypetay LOWTAG."
+"Eturnray away escriptorday orfay away ockblay ofway LENGTH ytesbay outway "
+"ofway SPACE.  Ethay eefray\n"
+"  ointerpay isway oostedbay asway ecessarynay.  Ifway anyway additionalway "
+"emorymay isway eedednay, eway\n"
+"  mvay_allocateway itway.  Ethay escriptorday eturnedray isway away "
+"ointerpay ofway ypetay LOWTAG."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Return the lowtag bits for DES."
@@ -24547,7 +27748,8 @@ msgid ""
 "Return a SAP pointing to the piece of memory DES refers to.  The lowtag\n"
 "  bits of DES are ignored."
 msgstr ""
-"Eturnray away SAP ointingpay otay ethay iecepay ofway emorymay DES efersray otay.  Ethay owtaglay\n"
+"Eturnray away SAP ointingpay otay ethay iecepay ofway emorymay DES efersray "
+"otay.  Ethay owtaglay\n"
 "  itsbay ofway DES areway ignoredway."
 
 #: src/compiler/generic/new-genesis.lisp
@@ -24556,7 +27758,9 @@ msgstr "Andlehay onway ethay aptray objectway."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Head of list of functions to be called when the Lisp starts up."
-msgstr "Eadhay ofway istlay ofway unctionsfay otay ebay alledcay enwhay ethay Isplay tartssay upway."
+msgstr ""
+"Eadhay ofway istlay ofway unctionsfay otay ebay alledcay enwhay ethay Isplay "
+"tartssay upway."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Used by normal loader."
@@ -24566,17 +27770,20 @@ msgstr "Usedway ybay ormalnay oaderlay."
 msgid ""
 "Write VALUE (a descriptor) INDEX words from ADDRESS (also a descriptor)."
 msgstr ""
-"Itewray VALUE (away escriptorday) INDEX ordsway omfray ADDRESS (alsoway away escriptorday)."
+"Itewray VALUE (away escriptorday) INDEX ordsway omfray ADDRESS (alsoway away "
+"escriptorday)."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Write VALUE (a descriptor) at ADDRESS (also a descriptor)."
-msgstr "Itewray VALUE (away escriptorday) atway ADDRESS (alsoway away escriptorday)."
+msgstr ""
+"Itewray VALUE (away escriptorday) atway ADDRESS (alsoway away escriptorday)."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid ""
 "Return the value (as a descriptor) INDEX words from ADDRESS (a descriptor)."
 msgstr ""
-"Eturnray ethay aluevay (asway away escriptorday) INDEX ordsway omfray ADDRESS (away escriptorday)."
+"Eturnray ethay aluevay (asway away escriptorday) INDEX ordsway omfray "
+"ADDRESS (away escriptorday)."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Return the value at ADDRESS (a descriptor)."
@@ -24587,7 +27794,8 @@ msgid ""
 "Allocate LENGTH words in SPACE and return a new descriptor of type LOWTAG\n"
 "  pointing to them."
 msgstr ""
-"Allocateway LENGTH ordsway inway SPACE andway eturnray away ewnay escriptorday ofway ypetay LOWTAG\n"
+"Allocateway LENGTH ordsway inway SPACE andway eturnray away ewnay "
+"escriptorday ofway ypetay LOWTAG\n"
 "  ointingpay otay emthay."
 
 #: src/compiler/generic/new-genesis.lisp
@@ -24597,9 +27805,10 @@ msgid ""
 "word\n"
 "  with the resultant length and TYPE."
 msgstr ""
-"Allocateway LENGTH unitsway ofway ELEMENT-SIZE itsbay usplay away eaderhay ordway inway SPACE andway\n"
-"  eturnray anway ``otherway-ointerpay'' escriptorday otay emthay.  Initializeway ethay eaderhay "
-"ordway\n"
+"Allocateway LENGTH unitsway ofway ELEMENT-SIZE itsbay usplay away eaderhay "
+"ordway inway SPACE andway\n"
+"  eturnray anway ``otherway-ointerpay'' escriptorday otay emthay.  "
+"Initializeway ethay eaderhay ordway\n"
 "  ithway ethay esultantray engthlay andway TYPE."
 
 #: src/compiler/generic/new-genesis.lisp
@@ -24608,13 +27817,17 @@ msgid ""
 "  SPACE and return an ``other-pointer'' descriptor to them.  Initialize the\n"
 "  header word with TYPE and the length slot with LENGTH."
 msgstr ""
-"Allocateway LENGTH unitsway ofway ELEMENT-SIZE usplay away eaderhay usplay away engthlay otslay inway\n"
-"  SPACE andway eturnray anway ``otherway-ointerpay'' escriptorday otay emthay.  Initializeway ethay\n"
+"Allocateway LENGTH unitsway ofway ELEMENT-SIZE usplay away eaderhay usplay "
+"away engthlay otslay inway\n"
+"  SPACE andway eturnray anway ``otherway-ointerpay'' escriptorday otay "
+"emthay.  Initializeway ethay\n"
 "  eaderhay ordway ithway TYPE andway ethay engthlay otslay ithway LENGTH."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Copy string into the CORE and return a descriptor to it."
-msgstr "Opycay ingstray intoway ethay CORE andway eturnray away escriptorday otay itway."
+msgstr ""
+"Opycay ingstray intoway ethay CORE andway eturnray away escriptorday otay "
+"itway."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Copy the bignum to the core."
@@ -24622,25 +27835,33 @@ msgstr "Opycay ethay ignumbay otay ethay orecay."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Makes a number pair of TYPE (ratio or complex) and fills it in."
-msgstr "Akesmay away umbernay airpay ofway TYPE (atioray orway omplexcay) andway illsfay itway inway."
+msgstr ""
+"Akesmay away umbernay airpay ofway TYPE (atioray orway omplexcay) andway "
+"illsfay itway inway."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid ""
 "Copy the given number to the core, or flame out if we can't deal with it."
 msgstr ""
-"Opycay ethay ivengay umbernay otay ethay orecay, orway ameflay outway ifway eway ancay't ealday ithway itway."
+"Opycay ethay ivengay umbernay otay ethay orecay, orway ameflay outway ifway "
+"eway ancay't ealday ithway itway."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Allocate a cons cell in SPACE and fill it in with CAR and CDR."
-msgstr "Allocateway away onscay ellcay inway SPACE andway illfay itway inway ithway CAR andway CDR."
+msgstr ""
+"Allocateway away onscay ellcay inway SPACE andway illfay itway inway ithway "
+"CAR andway CDR."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Generates code to push the THING onto the given cold load LIST."
-msgstr "Eneratesgay odecay otay ushpay ethay THING ontoway ethay ivengay oldcay oadlay LIST."
+msgstr ""
+"Eneratesgay odecay otay ushpay ethay THING ontoway ethay ivengay oldcay "
+"oadlay LIST."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Initializes the cold load symbol-hacking data structures."
-msgstr "Initializesway ethay oldcay oadlay ymbolsay-ackinghay ataday ucturesstray."
+msgstr ""
+"Initializesway ethay oldcay oadlay ymbolsay-ackinghay ataday ucturesstray."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "FOP functions for cold loading."
@@ -24648,23 +27869,29 @@ msgstr "FOP unctionsfay orfay oldcay oadinglay."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid "Loads the file named by FileName into the cold load image being built."
-msgstr "Oadslay ethay ilefay amednay ybay Ilenamefay intoway ethay oldcay oadlay imageway eingbay uiltbay."
+msgstr ""
+"Oadslay ethay ilefay amednay ybay Ilenamefay intoway ethay oldcay oadlay "
+"imageway eingbay uiltbay."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid ""
 "Return the version number from the symbol table file Filename.\n"
 "  Value is 0 if Filename is null or the file doesn't exist."
 msgstr ""
-"Eturnray ethay ersionvay umbernay omfray ethay ymbolsay abletay ilefay Ilenamefay.\n"
-"  Aluevay isway 0 ifway Ilenamefay isway ullnay orway ethay ilefay oesnday't existway."
+"Eturnray ethay ersionvay umbernay omfray ethay ymbolsay abletay ilefay "
+"Ilenamefay.\n"
+"  Aluevay isway 0 ifway Ilenamefay isway ullnay orway ethay ilefay oesnday't "
+"existway."
 
 #: src/compiler/generic/new-genesis.lisp
 msgid ""
 "Builds a kernel Lisp image from the .FASL files specified in the given\n"
 "  File-List and writes it to a file named by Core-Name."
 msgstr ""
-"Uildsbay away ernelkay Isplay imageway omfray ethay .FASL ilesfay ecifiedspay inway ethay ivengay\n"
-"  Ilefay-Istlay andway iteswray itway otay away ilefay amednay ybay Orecay-Amenay."
+"Uildsbay away ernelkay Isplay imageway omfray ethay .FASL ilesfay "
+"ecifiedspay inway ethay ivengay\n"
+"  Ilefay-Istlay andway iteswray itway otay away ilefay amednay ybay Orecay-"
+"Amenay."
 
 #: src/compiler/eval-comp.lisp
 msgid "Fatal error, aborting evaluation."
@@ -24680,7 +27907,8 @@ msgstr "Ongwray umbernay ofway argumentsway assedpay -- ~S."
 
 #: src/compiler/eval-comp.lisp
 msgid "Function called with odd number of keyword arguments."
-msgstr "Unctionfay alledcay ithway oddway umbernay ofway eywordkay argumentsway."
+msgstr ""
+"Unctionfay alledcay ithway oddway umbernay ofway eywordkay argumentsway."
 
 #: src/compiler/eval-comp.lisp
 msgid "Unknown keyword argument -- ~S."
@@ -24720,13 +27948,13 @@ msgstr "ettingsay optay otay ~D.~%"
 
 #: src/compiler/eval.lisp
 msgid ""
-"If the interpreted function cache has more functions than this come GC time,"
-"\n"
+"If the interpreted function cache has more functions than this come GC "
+"time,\n"
 "  then attempt to prune it according to\n"
 "  *INTERPRETED-FUNCTION-CACHE-THRESHOLD*."
 msgstr ""
-"Ifway ethay interpretedway unctionfay achecay ashay oremay unctionsfay anthay isthay omecay GC imetay,"
-"\n"
+"Ifway ethay interpretedway unctionfay achecay ashay oremay unctionsfay "
+"anthay isthay omecay GC imetay,\n"
 "  enthay attemptway otay unepray itway accordingway otay\n"
 "  *INTERPRETED-FUNCTION-CACHE-THRESHOLD*."
 
@@ -24735,7 +27963,8 @@ msgid ""
 "If an interpreted function goes uncalled for more than this many GCs, then\n"
 "  it is eligible for flushing from the cache."
 msgstr ""
-"Ifway anway interpretedway unctionfay oesgay uncalledway orfay oremay anthay isthay anymay Csgay, enthay\n"
+"Ifway anway interpretedway unctionfay oesgay uncalledway orfay oremay anthay "
+"isthay anymay Csgay, enthay\n"
 "  itway isway eligibleway orfay ushingflay omfray ethay achecay."
 
 #: src/compiler/eval.lisp
@@ -24744,8 +27973,10 @@ msgid ""
 "  representation of the functions to be reclaimed, and also lazily forces\n"
 "  macroexpansions to be recomputed."
 msgstr ""
-"Earclay allway entriesway inway ethay evalway unctionfay achecay.  Isthay allowsway ethay internalway\n"
-"  epresentationray ofway ethay unctionsfay otay ebay eclaimedray, andway alsoway azilylay orcesfay\n"
+"Earclay allway entriesway inway ethay evalway unctionfay achecay.  Isthay "
+"allowsway ethay internalway\n"
+"  epresentationray ofway ethay unctionsfay otay ebay eclaimedray, andway "
+"alsoway azilylay orcesfay\n"
 "  acroexpansionsmay otay ebay ecomputedray."
 
 #: src/compiler/eval.lisp
@@ -24870,7 +28101,8 @@ msgstr "inlineway ~Away"
 
 #: src/pcl/init.lisp src/pcl/defclass.lisp src/pcl/macros.lisp
 msgid "Malformed plist in doplist, odd number of elements."
-msgstr "Alformedmay istplay inway oplistday, oddway umbernay ofway elementsway."
+msgstr ""
+"Alformedmay istplay inway oplistday, oddway umbernay ofway elementsway."
 
 #: src/pcl/macros.lisp
 msgid "~@<~S is not a legal class name.~@:>"
@@ -24890,20 +28122,26 @@ msgid ""
 "   SIMPLE-ERROR is signaled if the class does not exist unless ERRORP\n"
 "   is NIL in which case NIL is returned. SYMBOL cannot be a keyword."
 msgstr ""
-"Eturnsray ethay PCL assclay etaobjectmay amednay ybay SYMBOL. Anway errorway ofway ypetay\n"
-"   SIMPLE-ERROR isway ignaledsay ifway ethay assclay oesday otnay existway unlessway ERRORP\n"
-"   isway NIL inway ichwhay asecay NIL isway eturnedray. SYMBOL annotcay ebay away eywordkay."
+"Eturnsray ethay PCL assclay etaobjectmay amednay ybay SYMBOL. Anway errorway "
+"ofway ypetay\n"
+"   SIMPLE-ERROR isway ignaledsay ifway ethay assclay oesday otnay existway "
+"unlessway ERRORP\n"
+"   isway NIL inway ichwhay asecay NIL isway eturnedray. SYMBOL annotcay ebay "
+"away eywordkay."
 
 #: src/pcl/low.lisp
 msgid "Set the name of a compiled function object and return the function."
-msgstr "Etsay ethay amenay ofway away ompiledcay unctionfay objectway andway eturnray ethay unctionfay."
+msgstr ""
+"Etsay ethay amenay ofway away ompiledcay unctionfay objectway andway "
+"eturnray ethay unctionfay."
 
 #: src/pcl/low.lisp
 msgid ""
 "PCL debugging aid that breaks into the debugger each time\n"
 "`compile-lambda' is invoked."
 msgstr ""
-"PCL ebuggingday aidway atthay eaksbray intoway ethay ebuggerday eachway imetay\n"
+"PCL ebuggingday aidway atthay eaksbray intoway ethay ebuggerday eachway "
+"imetay\n"
 "`ompilecay-ambdalay' isway invokedway."
 
 #: src/pcl/low.lisp
@@ -24912,8 +28150,10 @@ msgid ""
 "the compiler as completely as possible.  Currently this means that\n"
 "`*compile-print*' will be bound to nil during compilation."
 msgstr ""
-"Ifway uetray (ethay efaultday), enthay `ompilecay-ambdalay' illway ytray otay ilencesay\n"
-"ethay ompilercay asway ompletelycay asway ossiblepay.  Urrentlycay isthay eansmay atthay\n"
+"Ifway uetray (ethay efaultday), enthay `ompilecay-ambdalay' illway ytray "
+"otay ilencesay\n"
+"ethay ompilercay asway ompletelycay asway ossiblepay.  Urrentlycay isthay "
+"eansmay atthay\n"
 "`*compile-print*' illway ebay oundbay otay ilnay uringday ompilationcay."
 
 #: src/pcl/info.lisp
@@ -24926,10 +28166,10 @@ msgid ""
 "                               argument).~@:>"
 msgstr ""
 "~@<Ethay eclarationday ~S isway otnay understoodway ybay ~S. ~\n"
-"                               Easeplay utpay ~S onway oneway ofway ethay istslay ~S, ~S, orway "
-"~S. ~\n"
-"                               (Assumingway itway isway away ariablevay eclarationsday "
-"ithoutway ~\n"
+"                               Easeplay utpay ~S onway oneway ofway ethay "
+"istslay ~S, ~S, orway ~S. ~\n"
+"                               (Assumingway itway isway away ariablevay "
+"eclarationsday ithoutway ~\n"
 "                               argumentway).~@:>"
 
 #: src/pcl/info.lisp
@@ -24953,7 +28193,8 @@ msgid ""
 "~@<Attempt to funcall a funcallable instance without first ~\n"
 "          setting its function.~@:>"
 msgstr ""
-"~@<Attemptway otay uncallfay away uncallablefay instanceway ithoutway irstfay ~\n"
+"~@<Attemptway otay uncallfay away uncallablefay instanceway ithoutway "
+"irstfay ~\n"
 "          ettingsay itsway unctionfay.~@:>"
 
 #: src/pcl/defclass.lisp
@@ -24967,10 +28208,10 @@ msgstr "~S isway otnay away egallay efclassday optionway."
 #: src/pcl/defclass.lisp
 msgid ""
 "~@<The value of the ~s option (~s) is not a legal ~\n"
-"	        class name.~@:>"
+"\t        class name.~@:>"
 msgstr ""
 "~@<Ethay aluevay ofway ethay ~s optionway (~s) isway otnay away egallay ~\n"
-"	        assclay amenay.~@:>"
+"\t        assclay amenay.~@:>"
 
 #: src/pcl/defclass.lisp
 msgid "~@<~S is not a legal slot specification.~@:>"
@@ -24981,7 +28222,8 @@ msgid ""
 "~@<In the class definintion of ~s, the slot specification ~s ~\n"
 "                 is obsolete.  Convert it to ~s.~@:>"
 msgstr ""
-"~@<Inway ethay assclay efinintionday ofway ~s, ethay otslay ecificationspay ~s ~\n"
+"~@<Inway ethay assclay efinintionday ofway ~s, ethay otslay ecificationspay "
+"~s ~\n"
 "                 isway obsoleteway.  Onvertcay itway otay ~s.~@:>"
 
 #: src/pcl/defclass.lisp
@@ -24995,9 +28237,12 @@ msgid ""
 "                    object system doesn't know how to compute effective ~\n"
 "                    slots.~@:>"
 msgstr ""
-"~@<Oremay anthay oneway earlyway assclay efinesday away otslay ithway ethay ~\n"
-"                    amenay ~S.  Isthay ancay't orkway ecausebay ethay ootstrapbay ~\n"
-"                    objectway ystemsay oesnday't nowkay owhay otay omputecay effectiveway ~\n"
+"~@<Oremay anthay oneway earlyway assclay efinesday away otslay ithway ethay "
+"~\n"
+"                    amenay ~S.  Isthay ancay't orkway ecausebay ethay "
+"ootstrapbay ~\n"
+"                    objectway ystemsay oesnday't nowkay owhay otay omputecay "
+"effectiveway ~\n"
 "                    otsslay.~@:>"
 
 #: src/pcl/defclass.lisp
@@ -25022,9 +28267,12 @@ msgid ""
 "            has already been loaded.  This doesn't work, you will have to ~\n"
 "            get a fresh lisp (reboot) and then load PCL.~@:>"
 msgstr ""
-"~@<Yingtray otay oadlay (orway ompilecay) PCL inway anway environmentway inway ichwhay itway ~\n"
-"            ashay alreadyway eenbay oadedlay.  Isthay oesnday't orkway, ouyay illway avehay otay ~\n"
-"            etgay away eshfray isplay (ebootray) andway enthay oadlay PCL.~@:>"
+"~@<Yingtray otay oadlay (orway ompilecay) PCL inway anway environmentway "
+"inway ichwhay itway ~\n"
+"            ashay alreadyway eenbay oadedlay.  Isthay oesnday't orkway, "
+"ouyay illway avehay otay ~\n"
+"            etgay away eshfray isplay (ebootray) andway enthay oadlay PCL.~@:"
+">"
 
 #: src/pcl/defs.lisp
 msgid "Try loading (or compiling) PCL anyways."
@@ -25057,7 +28305,8 @@ msgid ""
 "was inherited."
 msgstr ""
 "Orfay assclay otsslay, ethay assclay efininigday ethay otslay.\n"
-"Orfay inheritedway assclay otsslay, isthay isway ethay uperclasssay omfray ichwhay ethay otslay\n"
+"Orfay inheritedway assclay otsslay, isthay isway ethay uperclasssay omfray "
+"ichwhay ethay otslay\n"
 "asway inheritedway."
 
 #: src/pcl/fngen.lisp
@@ -25067,10 +28316,14 @@ msgid ""
 "   this function flushes all cached emfs for the given generic\n"
 "   function.  If GF is not supplied, all cached emfs are flushed."
 msgstr ""
-"Ushflay achedcay emfway unctionsfay.  Ifway GF isway uppliedsay, itway ouldshay ebay away\n"
-"   enericgay unctionfay etaobjectmay orway ethay amenay ofway away enericgay unctionfay, andway\n"
-"   isthay unctionfay ushesflay allway achedcay emfsway orfay ethay ivengay enericgay\n"
-"   unctionfay.  Ifway GF isway otnay uppliedsay, allway achedcay emfsway areway ushedflay."
+"Ushflay achedcay emfway unctionsfay.  Ifway GF isway uppliedsay, itway "
+"ouldshay ebay away\n"
+"   enericgay unctionfay etaobjectmay orway ethay amenay ofway away enericgay "
+"unctionfay, andway\n"
+"   isthay unctionfay ushesflay allway achedcay emfsway orfay ethay ivengay "
+"enericgay\n"
+"   unctionfay.  Ifway GF isway otnay uppliedsay, allway achedcay emfsway "
+"areway ushedflay."
 
 #: src/pcl/cache.lisp
 msgid "Wrapper ~S"
@@ -25098,7 +28351,8 @@ msgid ""
 "                               lines from its home, limit is ~D.~@:>"
 msgstr ""
 "~@<Adbay achecay ~S: Aluevay atway ocationlay ~D isway ~D ~\n"
-"                               ineslay omfray itsway omehay, imitlay isway ~D.~@:>"
+"                               ineslay omfray itsway omehay, imitlay isway "
+"~D.~@:>"
 
 #: src/pcl/cache.lisp
 msgid "Attempt to fill a reserved cache line."
@@ -25131,7 +28385,8 @@ msgid ""
 "                   parameters: ~<~s~>"
 msgstr ""
 "Optionalway andway eykay arameterspay ofway enericgay unctionsfay ~\n"
-"                   aymay otnay avehay efaultday aluesvay orway uppliedsay-p ~\n"
+"                   aymay otnay avehay efaultday aluesvay orway uppliedsay-p "
+"~\n"
 "                   arameterspay: ~<~s~>"
 
 #: src/pcl/boot.lisp
@@ -25176,7 +28431,9 @@ msgstr "Unsupportedway optionway ~s"
 
 #: src/pcl/boot.lisp
 msgid "If true, allow inlining of methods in effective methods."
-msgstr "Ifway uetray, allowway inliningway ofway ethodsmay inway effectiveway ethodsmay."
+msgstr ""
+"Ifway uetray, allowway inliningway ofway ethodsmay inway effectiveway "
+"ethodsmay."
 
 #: src/pcl/boot.lisp
 msgid ""
@@ -25184,8 +28441,10 @@ msgid ""
 "                   non-null lexical environment means that it cannot be ~\n"
 "                   automatically recompiled.~@:>"
 msgstr ""
-"~@<Efiningday ethodmay ~s ~s ~s usingway inlineway otslay accessway inway away ~\n"
-"                   onnay-ullnay exicallay environmentway eansmay atthay itway annotcay ebay ~\n"
+"~@<Efiningday ethodmay ~s ~s ~s usingway inlineway otslay accessway inway "
+"away ~\n"
+"                   onnay-ullnay exicallay environmentway eansmay atthay "
+"itway annotcay ebay ~\n"
 "                   automaticallyway ecompiledray.~@:>"
 
 #: src/pcl/boot.lisp
@@ -25198,7 +28457,8 @@ msgstr ""
 
 #: src/pcl/boot.lisp
 msgid "~@<The ~s argument to ~s, ~s, is not a lambda form.~@:>"
-msgstr "~@<Ethay ~s argumentway otay ~s, ~s, isway otnay away ambdalay ormfay.~@:>"
+msgstr ""
+"~@<Ethay ~s argumentway otay ~s, ~s, isway otnay away ambdalay ormfay.~@:>"
 
 #: src/pcl/boot.lisp
 msgid ""
@@ -25228,8 +28488,10 @@ msgid ""
 "                method argument~p ~{~s~^, ~}.~@:>"
 msgstr ""
 "~@<Ethay etsay ofway ethodsmay ~s applicableway otay argumentway~p ~\n"
-"                ~{~s~^, ~} otay allcay-extnay-ethodmay isway ifferentday omfray ~\n"
-"                ethay etsay ofway ethodsmay ~s applicableway otay ethay originalway ~\n"
+"                ~{~s~^, ~} otay allcay-extnay-ethodmay isway ifferentday "
+"omfray ~\n"
+"                ethay etsay ofway ethodsmay ~s applicableway otay ethay "
+"originalway ~\n"
 "                ethodmay argumentway~p ~{~s~^, ~}.~@:>"
 
 #: src/pcl/boot.lisp
@@ -25247,19 +28509,22 @@ msgid ""
 msgstr ""
 "~&~@<Atway ethay imetay ethay ethodmay ithway alifiersquay ~S andway ~\n"
 "               ecializersspay ~S onway ethay enericgay unctionfay ~S ~\n"
-"               asway ompiledcay, ethay ethodmay assclay orfay atthay enericgay unctionfay asway "
-"~\n"
+"               asway ompiledcay, ethay ethodmay assclay orfay atthay "
+"enericgay unctionfay asway ~\n"
 "               ~S.  Utbay, ethay ethodmay assclay isway ownay ~S, isthay ~\n"
-"               aymay eanmay atthay isthay ethodmay asway ompiledcay improperlyway.~@:>"
+"               aymay eanmay atthay isthay ethodmay asway ompiledcay "
+"improperlyway.~@:>"
 
 #: src/pcl/boot.lisp
 msgid ""
 "~@<~S already names an ordinary function or a macro.  ~\n"
-"	If you want to replace it with a generic function, you should remove ~\n"
+"\tIf you want to replace it with a generic function, you should remove ~\n"
 "        the existing definition beforehand.~@:>"
 msgstr ""
-"~@<~S alreadyway amesnay anway ordinaryway unctionfay orway away acromay.  ~\n"
-"	Ifway ouyay antway otay eplaceray itway ithway away enericgay unctionfay, ouyay ouldshay emoveray ~\n"
+"~@<~S alreadyway amesnay anway ordinaryway unctionfay orway away acromay.  "
+"~\n"
+"\tIfway ouyay antway otay eplaceray itway ithway away enericgay unctionfay, "
+"ouyay ouldshay emoveray ~\n"
 "        ethay existingway efinitionday eforehandbay.~@:>"
 
 #: src/pcl/boot.lisp
@@ -25333,10 +28598,10 @@ msgstr "~@<~S ouldshay ebay onway ethay istlay ~S.~@:>"
 #: src/pcl/boot.lisp
 msgid ""
 "~@<The function of the funcallable instance ~S ~\n"
-"			 has not been set.~@:>"
+"\t\t\t has not been set.~@:>"
 msgstr ""
 "~@<Ethay unctionfay ofway ethay uncallablefay instanceway ~S ~\n"
-"			 ashay otnay eenbay etsay.~@:>"
+"\t\t\t ashay otnay eenbay etsay.~@:>"
 
 #: src/pcl/boot.lisp
 msgid "~@<No way to determine the lambda list~@:>"
@@ -25356,7 +28621,8 @@ msgstr "~S isway otnay anway earlyway-ethodmay."
 
 #: src/pcl/boot.lisp
 msgid "Early add-method didn't get a funcallable instance."
-msgstr "Earlyway addway-ethodmay idnday't etgay away uncallablefay instanceway."
+msgstr ""
+"Earlyway addway-ethodmay idnday't etgay away uncallablefay instanceway."
 
 #: src/pcl/boot.lisp
 msgid "Early add-method didn't get an early method."
@@ -25364,7 +28630,8 @@ msgstr "Earlyway addway-ethodmay idnday't etgay anway earlyway ethodmay."
 
 #: src/pcl/boot.lisp
 msgid "Early remove-method didn't get a funcallable instance."
-msgstr "Earlyway emoveray-ethodmay idnday't etgay away uncallablefay instanceway."
+msgstr ""
+"Earlyway emoveray-ethodmay idnday't etgay away uncallablefay instanceway."
 
 #: src/pcl/boot.lisp
 msgid "Early remove-method didn't get an early method."
@@ -25384,7 +28651,8 @@ msgid ""
 "                             but is not the name of a class.~@:>"
 msgstr ""
 "~@<~S usedway asway away ecializerspay, ~\n"
-"                             utbay isway otnay ethay amenay ofway away assclay.~@:>"
+"                             utbay isway otnay ethay amenay ofway away "
+"assclay.~@:>"
 
 #: src/pcl/boot.lisp
 msgid "~S is not a legal specializer."
@@ -25392,15 +28660,20 @@ msgstr "~S isway otnay away egallay ecializerspay."
 
 #: src/pcl/method-slot-access-optimization.lisp
 msgid "Set to true to activate the inline slot access optimization."
-msgstr "Etsay otay uetray otay activateway ethay inlineway otslay accessway optimizationway."
+msgstr ""
+"Etsay otay uetray otay activateway ethay inlineway otslay accessway "
+"optimizationway."
 
 #: src/pcl/method-slot-access-optimization.lisp
 msgid "When true, check slot values against specified slot types."
-msgstr "Enwhay uetray, eckchay otslay aluesvay againstway ecifiedspay otslay ypestay."
+msgstr ""
+"Enwhay uetray, eckchay otslay aluesvay againstway ecifiedspay otslay ypestay."
 
 #: src/pcl/method-slot-access-optimization.lisp
 msgid "When true, optimize slot access through slot reader/writer functions."
-msgstr "Enwhay uetray, optimizeway otslay accessway roughthay otslay eaderray/iterwray unctionsfay."
+msgstr ""
+"Enwhay uetray, optimizeway otslay accessway roughthay otslay eaderray/"
+"iterwray unctionsfay."
 
 #: src/pcl/method-slot-access-optimization.lisp
 msgid "Cannot optimize slot access to"
@@ -25428,7 +28701,8 @@ msgid ""
 "                               in the class and all of its subclasses"
 msgstr ""
 "Otslay ~s isway otnay atway ethay amesay ocationlay ~\n"
-"                               inway ethay assclay andway allway ofway itsway ubclassessay"
+"                               inway ethay assclay andway allway ofway "
+"itsway ubclassessay"
 
 #: src/pcl/method-slot-access-optimization.lisp
 msgid "Auto-compiling method ~s."
@@ -25501,7 +28775,8 @@ msgid ""
 "            ~s or a method on the generic function ~s).~@:>"
 msgstr ""
 "~@<~s asway alledcay outsideway ethay ynamicday opescay ~\n"
-"            ofway away ethodmay ombinationcay unctionfay (insideway ethay odybay ofway ~\n"
+"            ofway away ethodmay ombinationcay unctionfay (insideway ethay "
+"odybay ofway ~\n"
 "            ~s orway away ethodmay onway ethay enericgay unctionfay ~s).~@:>"
 
 #: src/pcl/combin.lisp
@@ -25542,9 +28817,12 @@ msgid ""
 "   function has less than this number of methods.  If zero,\n"
 "   no effective methods are precomputed at method load time."
 msgstr ""
-"Ecomputepray effectiveway ethodsmay atway ethodmay oadlay imetay ifway ethay enericgay\n"
-"   unctionfay ashay esslay anthay isthay umbernay ofway ethodsmay.  Ifway erozay,\n"
-"   onay effectiveway ethodsmay areway ecomputedpray atway ethodmay oadlay imetay."
+"Ecomputepray effectiveway ethodsmay atway ethodmay oadlay imetay ifway ethay "
+"enericgay\n"
+"   unctionfay ashay esslay anthay isthay umbernay ofway ethodsmay.  Ifway "
+"erozay,\n"
+"   onay effectiveway ethodsmay areway ecomputedpray atway ethodmay oadlay "
+"imetay."
 
 #: src/pcl/dfun.lisp
 msgid "~@<The function ~S requires at least ~D arguments.~@:>"
@@ -25557,12 +28835,13 @@ msgstr "~<Ethay unctionfay ~S equiresray atway eastlay ~D argumentsway.~@:>"
 #: src/pcl/dfun.lisp
 msgid ""
 "~@<Vicious metacircle:  The computation of an ~\n"
-"	   effective method of ~s for arguments of types ~s uses ~\n"
-"	   the effective method being computed.~@:>"
+"\t   effective method of ~s for arguments of types ~s uses ~\n"
+"\t   the effective method being computed.~@:>"
 msgstr ""
 "~@<Iciousvay etacirclemay:  Ethay omputationcay ofway anway ~\n"
-"	   effectiveway ethodmay ofway ~s orfay argumentsway ofway ypestay ~s usesway ~\n"
-"	   ethay effectiveway ethodmay eingbay omputedcay.~@:>"
+"\t   effectiveway ethodmay ofway ~s orfay argumentsway ofway ypestay ~s "
+"usesway ~\n"
+"\t   ethay effectiveway ethodmay eingbay omputedcay.~@:>"
 
 #: src/pcl/dfun.lisp
 msgid "This can't happen."
@@ -25618,7 +28897,8 @@ msgid ""
 "                but ~S is not itself a class in *built-in-classes*."
 msgstr ""
 "Inway *built-in-classes*: ~S ashay ~S asway away uperclasssay,~%~\n"
-"                utbay ~S isway otnay itselfway away assclay inway *built-in-classes*."
+"                utbay ~S isway otnay itselfway away assclay inway *built-in-"
+"classes*."
 
 #: src/pcl/braid.lisp
 msgid "~@<~S is not the name of a class.~@:>"
@@ -25646,7 +28926,8 @@ msgid ""
 "                             No primary method given arguments ~S~@:>"
 msgstr ""
 "~@<Enericgay unctionfay ~S: ~\n"
-"                             Onay imarypray ethodmay ivengay argumentsway ~S~@:>"
+"                             Onay imarypray ethodmay ivengay argumentsway "
+"~S~@:>"
 
 #: src/pcl/braid.lisp
 msgid ""
@@ -25655,7 +28936,8 @@ msgid ""
 "              combination ~s.~@:>"
 msgstr ""
 "~@<Inway away allcay otay ~s ithway argumentsway ~:s: ~\n"
-"              Ethay ethodmay ~s ashay invalidway alifiersquay orfay ethodmay ~\n"
+"              Ethay ethodmay ~s ashay invalidway alifiersquay orfay ethodmay "
+"~\n"
 "              ombinationcay ~s.~@:>"
 
 #: src/pcl/braid.lisp
@@ -25665,7 +28947,8 @@ msgid ""
 "              method combination ~s.~@:>"
 msgstr ""
 "~@<Inway away allcay otay ~s ithway argumentsway ~:s: ~\n"
-"              Ethay ethodsmay ~{~s~^, ~} avehay invalidway alifiersquay orfay ~\n"
+"              Ethay ethodsmay ~{~s~^, ~} avehay invalidway alifiersquay "
+"orfay ~\n"
 "              ethodmay ombinationcay ~s.~@:>"
 
 #: src/pcl/slots.lisp
@@ -25691,13 +28974,13 @@ msgstr "isway away onstantcay andway osay annotcay ebay oundbay"
 #: src/pcl/slots.lisp
 msgid ""
 "~@<The slot ~s has neither ~s nor ~s ~\n"
-"                           allocation, so it can't be read by the default "
-"~s ~\n"
+"                           allocation, so it can't be read by the default ~s "
+"~\n"
 "                           method.~@:>"
 msgstr ""
 "~@<Ethay otslay ~s ashay eithernay ~s ornay ~s ~\n"
-"                           allocationway, osay itway ancay't ebay eadray ybay ethay efaultday "
-"~s ~\n"
+"                           allocationway, osay itway ancay't ebay eadray "
+"ybay ethay efaultday ~s ~\n"
 "                           ethodmay.~@:>"
 
 #: src/pcl/slots.lisp
@@ -25706,19 +28989,20 @@ msgid ""
 "               so it can't be written by the default ~s method.~@:>"
 msgstr ""
 "~@<Ethay otslay ~s ashay eithernay ~s ornay ~s allocationway, ~\n"
-"               osay itway ancay't ebay ittenwray ybay ethay efaultday ~s ethodmay.~@:>"
+"               osay itway ancay't ebay ittenwray ybay ethay efaultday ~s "
+"ethodmay.~@:>"
 
 #: src/pcl/slots.lisp
 msgid ""
 "~@<The slot ~s has neither ~s nor ~s ~\n"
-"                           allocation, so it can't be read by the default "
-"~s ~\n"
-"			   method.~@:>"
+"                           allocation, so it can't be read by the default ~s "
+"~\n"
+"\t\t\t   method.~@:>"
 msgstr ""
 "~@<Ethay otslay ~s ashay eithernay ~s ornay ~s ~\n"
-"                           allocationway, osay itway ancay't ebay eadray ybay ethay efaultday "
-"~s ~\n"
-"			   ethodmay.~@:>"
+"                           allocationway, osay itway ancay't ebay eadray "
+"ybay ethay efaultday ~s ~\n"
+"\t\t\t   ethodmay.~@:>"
 
 #: src/pcl/slots.lisp
 msgid "Structure slots cannot be unbound."
@@ -25762,7 +29046,8 @@ msgid ""
 "                         ~<~{~S~^, ~}~@:> ~I~_in call for class ~S.~:>"
 msgstr ""
 "~@<Invalidway initializationway argumentway~P ~2Iway~_~\n"
-"                         ~<~{~S~^, ~}~@:> ~Iway~_inway allcay orfay assclay ~S.~:>"
+"                         ~<~{~S~^, ~}~@:> ~Iway~_inway allcay orfay assclay "
+"~S.~:>"
 
 #: src/pcl/seal.lisp
 msgid "~@<Invalid sealing specifier ~s.~@:>"
@@ -25807,7 +29092,8 @@ msgid ""
 "                                  ~%  ending at the class ~A"
 msgstr ""
 "eachedray omfray ethay assclay ~Away ybay ollowingfay~@\n"
-"                                  ethay irectday uperclasssay ainchay roughthay: ~Away~\n"
+"                                  ethay irectday uperclasssay ainchay "
+"roughthay: ~Away~\n"
 "                                  ~%  endingway atway ethay assclay ~Away"
 
 #: src/pcl/cpl.lisp
@@ -25820,7 +29106,8 @@ msgid ""
 "       there ~A in the local precedence relations.  ~\n"
 "       ~A because:~{~%  ~A~}."
 msgstr ""
-"Itway isway otnay ossiblepay otay omputecay ethay assclay ecedencepray istlay ecausebay ~\n"
+"Itway isway otnay ossiblepay otay omputecay ethay assclay ecedencepray "
+"istlay ecausebay ~\n"
 "       erethay ~Away inway ethay ocallay ecedencepray elationsray.  ~\n"
 "       ~Away ecausebay:~{~%  ~Away~}."
 
@@ -25842,11 +29129,14 @@ msgstr "Isthay arisesway"
 
 #: src/pcl/cpl.lisp
 msgid "the class ~A appears in the supers of the class ~A"
-msgstr "ethay assclay ~Away appearsway inway ethay uperssay ofway ethay assclay ~Away"
+msgstr ""
+"ethay assclay ~Away appearsway inway ethay uperssay ofway ethay assclay ~Away"
 
 #: src/pcl/cpl.lisp
 msgid "the class ~A follows the class ~A in the supers of the class ~A"
-msgstr "ethay assclay ~Away ollowsfay ethay assclay ~Away inway ethay uperssay ofway ethay assclay ~Away"
+msgstr ""
+"ethay assclay ~Away ollowsfay ethay assclay ~Away inway ethay uperssay ofway "
+"ethay assclay ~Away"
 
 #: src/pcl/methods.lisp
 msgid "Instance"
@@ -25896,7 +29186,8 @@ msgstr "isway otnay away onnay-ullnay atomway"
 
 #: src/pcl/methods.lisp
 msgid "is neither a class object nor an eql specializer"
-msgstr "isway eithernay away assclay objectway ornay anway eqlway ecializerspay"
+msgstr ""
+"isway eithernay away assclay objectway ornay anway eqlway ecializerspay"
 
 #: src/pcl/methods.lisp
 msgid "The value of the ~s initarg, ~s, ~A."
@@ -25909,7 +29200,8 @@ msgid ""
 "                               It must be ~A.~~@:>"
 msgstr ""
 "~~@<Enwhay initializingway ethay enericgay-unctionfay ~S: ~\n"
-"                               Ethay ~S initializationway argumentway asway ~Away.  ~\n"
+"                               Ethay ~S initializationway argumentway asway "
+"~Away.  ~\n"
 "                               Itway ustmay ebay ~Away.~~@:>"
 
 #: src/pcl/methods.lisp
@@ -25942,7 +29234,8 @@ msgstr ""
 
 #: src/pcl/methods.lisp
 msgid "~@<The generic function ~s takes ~d required argument~p.~@:>"
-msgstr "~@<Ethay enericgay unctionfay ~s akestay ~d equiredray argumentway~p.~@:>"
+msgstr ""
+"~@<Ethay enericgay unctionfay ~s akestay ~d equiredray argumentway~p.~@:>"
 
 #: src/pcl/methods.lisp
 msgid ""
@@ -25951,8 +29244,10 @@ msgid ""
 "            function until it is removed from the first one.~@:>"
 msgstr ""
 "~@<Ethay ethodmay ~S isway alreadyway artpay ofway ethay enericgay ~\n"
-"            unctionfay ~S.  Itway ancay't ebay addedway otay anotherway enericgay ~\n"
-"            unctionfay untilway itway isway emovedray omfray ethay irstfay oneway.~@:>"
+"            unctionfay ~S.  Itway ancay't ebay addedway otay anotherway "
+"enericgay ~\n"
+"            unctionfay untilway itway isway emovedray omfray ethay irstfay "
+"oneway.~@:>"
 
 #: src/pcl/methods.lisp
 msgid ""
@@ -25972,7 +29267,8 @@ msgstr ""
 
 #: src/pcl/methods.lisp
 msgid "~@<Generic function ~S requires at least ~D arguments.~@:>"
-msgstr "~@<Enericgay unctionfay ~S equiresray atway eastlay ~D argumentsway.~@:>"
+msgstr ""
+"~@<Enericgay unctionfay ~S equiresray atway eastlay ~D argumentsway.~@:>"
 
 #: src/pcl/methods.lisp
 msgid "In get-accessor-method-function."
@@ -25980,7 +29276,8 @@ msgstr "Inway etgay-accessorway-ethodmay-unctionfay."
 
 #: src/pcl/methods.lisp
 msgid "The key for the last case arg to mcase was not T."
-msgstr "Ethay eykay orfay ethay astlay asecay argway otay casemay asway otnay T."
+msgstr ""
+"Ethay eykay orfay ethay astlay asecay argway otay casemay asway otnay T."
 
 #: src/pcl/defcombin.lisp
 msgid ""
@@ -25988,8 +29285,10 @@ msgid ""
 "            The method combination type ~S accepts one option which ~\n"
 "            must be either ~s or ~s.~@:>"
 msgstr ""
-"~@<Invalidway optionsway otay away ortshay ethodmay ombinationcay ypetay.  ~\n"
-"            Ethay ethodmay ombinationcay ypetay ~S acceptsway oneway optionway ichwhay ~\n"
+"~@<Invalidway optionsway otay away ortshay ethodmay ombinationcay ypetay.  "
+"~\n"
+"            Ethay ethodmay ombinationcay ypetay ~S acceptsway oneway "
+"optionway ichwhay ~\n"
 "            ustmay ebay eitherway ~s orway ~s.~@:>"
 
 #: src/pcl/defcombin.lisp
@@ -25997,14 +29296,17 @@ msgid ""
 "~@<The method ~S ~A.  ~\n"
 "                    The method combination type ~S was defined with the ~\n"
 "                    short form of ~s and so requires all methods have ~\n"
-"		    either the single qualifier ~S or the single qualifier ~\n"
-"		    ~s.~@:>"
+"\t\t    either the single qualifier ~S or the single qualifier ~\n"
+"\t\t    ~s.~@:>"
 msgstr ""
 "~@<Ethay ethodmay ~S ~Away.  ~\n"
-"                    Ethay ethodmay ombinationcay ypetay ~S asway efinedday ithway ethay ~\n"
-"                    ortshay ormfay ofway ~s andway osay equiresray allway ethodsmay avehay ~\n"
-"		    eitherway ethay inglesay alifierquay ~S orway ethay inglesay alifierquay ~\n"
-"		    ~s.~@:>"
+"                    Ethay ethodmay ombinationcay ypetay ~S asway efinedday "
+"ithway ethay ~\n"
+"                    ortshay ormfay ofway ~s andway osay equiresray allway "
+"ethodsmay avehay ~\n"
+"\t\t    eitherway ethay inglesay alifierquay ~S orway ethay inglesay "
+"alifierquay ~\n"
+"\t\t    ~s.~@:>"
 
 #: src/pcl/defcombin.lisp
 msgid "has no qualifiers"
@@ -26084,7 +29386,8 @@ msgstr "    Ethodmay ocumentationday: ~s~%"
 
 #: src/pcl/env.lisp
 msgid "~&~@<~S is a class, it is an instance of ~S.~@:>~%"
-msgstr "~&~@<~S isway away assclay, itway isway anway instanceway ofway ~S.~@:>~%"
+msgstr ""
+"~&~@<~S isway away assclay, itway isway anway instanceway ofway ~S.~@:>~%"
 
 #: src/pcl/env.lisp
 msgid "Its proper name is ~S.~%"
@@ -26092,7 +29395,8 @@ msgstr "Itsway operpray amenay isway ~S.~%"
 
 #: src/pcl/env.lisp
 msgid "Its name is ~S, but this is not a proper name.~%"
-msgstr "Itsway amenay isway ~S, utbay isthay isway otnay away operpray amenay.~%"
+msgstr ""
+"Itsway amenay isway ~S, utbay isthay isway otnay away operpray amenay.~%"
 
 #: src/pcl/env.lisp
 msgid "It has no name (the name is NIL).~%"
@@ -26106,7 +29410,8 @@ msgid ""
 "           There are ~D methods specialized for this class."
 msgstr ""
 "Ethay irectday uperclassessay areway: ~:S, andway ethay irectday~%~\n"
-"           ubclassessay areway: ~:S.  Ethay assclay isway ~:[otnay ~;~]inalizedfay.  ~\n"
+"           ubclassessay areway: ~:S.  Ethay assclay isway ~:[otnay ~;~]"
+"inalizedfay.  ~\n"
 "           Ethay assclay ecedencepray istlay isway:~%~S~%~\n"
 "           Erethay areway ~D ethodsmay ecializedspay orfay isthay assclay."
 
@@ -26128,7 +29433,8 @@ msgstr "Ouyay ancay alsoway allcay itway~@[ ~{~S~^, ~} orway~] ~S.~%"
 
 #: src/pcl/env.lisp
 msgid "It has ~D internal and ~D external symbols (~D total).~%"
-msgstr "Itway ashay ~D internalway andway ~D externalway ymbolssay (~D otaltay).~%"
+msgstr ""
+"Itway ashay ~D internalway andway ~D externalway ymbolssay (~D otaltay).~%"
 
 #: src/pcl/env.lisp
 msgid "It uses the packages ~{~S~^, ~}.~%"
@@ -26164,7 +29470,9 @@ msgstr "~@<Ancay't umpday apperwray orfay anonymousway assclay ~S.~@:>"
 
 #: src/pcl/env.lisp
 msgid "~@<Can't use anonymous or undefined class as constant: ~S~:@>"
-msgstr "~@<Ancay't useway anonymousway orway undefinedway assclay asway onstantcay: ~S~:@>"
+msgstr ""
+"~@<Ancay't useway anonymousway orway undefinedway assclay asway onstantcay: "
+"~S~:@>"
 
 #: src/pcl/gray-streams.lisp
 msgid ""
@@ -26172,8 +29480,10 @@ msgid ""
 "  Stream. Class FUNDAMENTAL-CHARACTER-STREAM provides a default method\n"
 "  which returns CHARACTER."
 msgstr ""
-"Eturnsray away ypetay ecifierspay orfay ethay indkay ofway objectway eturnedray ybay ethay\n"
-"  Eamstray. Assclay FUNDAMENTAL-CHARACTER-STREAM ovidespray away efaultday ethodmay\n"
+"Eturnsray away ypetay ecifierspay orfay ethay indkay ofway objectway "
+"eturnedray ybay ethay\n"
+"  Eamstray. Assclay FUNDAMENTAL-CHARACTER-STREAM ovidespray away efaultday "
+"ethodmay\n"
 "  ichwhay eturnsray CHARACTER."
 
 #: src/pcl/gray-streams.lisp
@@ -26182,8 +29492,10 @@ msgid ""
 "  by class FUNDAMENTAL-STREAM which returns true if CLOSE has not been\n"
 "  called on the stream."
 msgstr ""
-"Eturnray uetray ifway Eamstray isway otnay osedclay.  Away efaultday ethodmay isway ovidedpray\n"
-"  ybay assclay FUNDAMENTAL-STREAM ichwhay eturnsray uetray ifway CLOSE ashay otnay eenbay\n"
+"Eturnray uetray ifway Eamstray isway otnay osedclay.  Away efaultday "
+"ethodmay isway ovidedpray\n"
+"  ybay assclay FUNDAMENTAL-STREAM ichwhay eturnsray uetray ifway CLOSE ashay "
+"otnay eenbay\n"
 "  alledcay onway ethay eamstray."
 
 #: src/pcl/gray-streams.lisp
@@ -26192,9 +29504,12 @@ msgid ""
 "  inquiries may still be made.  If :Abort is non-nil, an attempt is made\n"
 "  to clean up the side effects of having created the stream."
 msgstr ""
-"Osesclay ethay ivengay Eamstray.  Onay oremay Iway/O aymay ebay erformedpay, utbay\n"
-"  inquiriesway aymay tillsay ebay ademay.  Ifway :Abortway isway onnay-ilnay, anway attemptway isway ademay\n"
-"  otay eanclay upway ethay idesay effectsway ofway avinghay eatedcray ethay eamstray."
+"Osesclay ethay ivengay Eamstray.  Onay oremay Iway/O aymay ebay erformedpay, "
+"utbay\n"
+"  inquiriesway aymay tillsay ebay ademay.  Ifway :Abortway isway onnay-"
+"ilnay, anway attemptway isway ademay\n"
+"  otay eanclay upway ethay idesay effectsway ofway avinghay eatedcray ethay "
+"eamstray."
 
 #: src/pcl/gray-streams.lisp
 msgid ""
@@ -26203,9 +29518,12 @@ msgid ""
 "  Every subclass of FUNDAMENTAL-CHARACTER-INPUT-STREAM must define a\n"
 "  method for this function."
 msgstr ""
-"Isthay eadsray oneway aracterchay omfray ethay eamstray.  Itway eturnsray eitherway away\n"
-"  aracterchay objectway, orway ethay ymbolsay :EOF ifway ethay eamstray isway atway endway-ofway-ilefay.\n"
-"  Everyway ubclasssay ofway FUNDAMENTAL-CHARACTER-INPUT-STREAM ustmay efineday away\n"
+"Isthay eadsray oneway aracterchay omfray ethay eamstray.  Itway eturnsray "
+"eitherway away\n"
+"  aracterchay objectway, orway ethay ymbolsay :EOF ifway ethay eamstray "
+"isway atway endway-ofway-ilefay.\n"
+"  Everyway ubclasssay ofway FUNDAMENTAL-CHARACTER-INPUT-STREAM ustmay "
+"efineday away\n"
 "  ethodmay orfay isthay unctionfay."
 
 #: src/pcl/gray-streams.lisp
@@ -26214,8 +29532,10 @@ msgid ""
 "  Returns NIL.  Every subclass of FUNDAMENTAL-CHARACTER-INPUT-STREAM\n"
 "  must define a method for this function."
 msgstr ""
-"Unway-oesday ethay astlay allcay otay STREAM-READ-CHAR, asway inway UNREAD-CHAR.\n"
-"  Eturnsray NIL.  Everyway ubclasssay ofway FUNDAMENTAL-CHARACTER-INPUT-STREAM\n"
+"Unway-oesday ethay astlay allcay otay STREAM-READ-CHAR, asway inway UNREAD-"
+"CHAR.\n"
+"  Eturnsray NIL.  Everyway ubclasssay ofway FUNDAMENTAL-CHARACTER-INPUT-"
+"STREAM\n"
 "  ustmay efineday away ethodmay orfay isthay unctionfay."
 
 #: src/pcl/gray-streams.lisp
@@ -26227,11 +29547,16 @@ msgid ""
 "  is sufficient for file streams, but interactive streams should define\n"
 "  their own method."
 msgstr ""
-"Isthay isway usedway otay implementway READ-CHAR-NO-HANG.  Itway eturnsray eitherway away\n"
-"  aracterchay, orway NIL ifway onay inputway isway urrentlycay availableway, orway :EOF ifway\n"
-"  endway-ofway-ilefay isway eachedray.  Ethay efaultday ethodmay ovidedpray ybay\n"
-"  FUNDAMENTAL-CHARACTER-INPUT-STREAM implysay allscay STREAM-READ-CHAR; isthay\n"
-"  isway ufficientsay orfay ilefay eamsstray, utbay interactiveway eamsstray ouldshay efineday\n"
+"Isthay isway usedway otay implementway READ-CHAR-NO-HANG.  Itway eturnsray "
+"eitherway away\n"
+"  aracterchay, orway NIL ifway onay inputway isway urrentlycay availableway, "
+"orway :EOF ifway\n"
+"  endway-ofway-ilefay isway eachedray.  Ethay efaultday ethodmay ovidedpray "
+"ybay\n"
+"  FUNDAMENTAL-CHARACTER-INPUT-STREAM implysay allscay STREAM-READ-CHAR; "
+"isthay\n"
+"  isway ufficientsay orfay ilefay eamsstray, utbay interactiveway eamsstray "
+"ouldshay efineday\n"
 "  eirthay ownway ethodmay."
 
 #: src/pcl/gray-streams.lisp
@@ -26240,8 +29565,10 @@ msgid ""
 "  It returns either a character or :EOF.  The default method calls\n"
 "  STREAM-READ-CHAR and STREAM-UNREAD-CHAR."
 msgstr ""
-"Usedway otay implementway PEEK-CHAR; isthay orrespondscay otay eekpay-ypetay ofway NIL.\n"
-"  Itway eturnsray eitherway away aracterchay orway :EOF.  Ethay efaultday ethodmay allscay\n"
+"Usedway otay implementway PEEK-CHAR; isthay orrespondscay otay eekpay-ypetay "
+"ofway NIL.\n"
+"  Itway eturnsray eitherway away aracterchay orway :EOF.  Ethay efaultday "
+"ethodmay allscay\n"
 "  STREAM-READ-CHAR andway STREAM-UNREAD-CHAR."
 
 #: src/pcl/gray-streams.lisp
@@ -26251,9 +29578,12 @@ msgid ""
 "  define their own method since it will usually be trivial and will\n"
 "  always be more efficient than the default method."
 msgstr ""
-"Usedway ybay LISTEN.  Eturnsray uetray orway alsefay.  Ethay efaultday ethodmay usesway\n"
-"  STREAM-READ-CHAR-NO-HANG andway STREAM-UNREAD-CHAR.  Ostmay eamsstray ouldshay \n"
-"  efineday eirthay ownway ethodmay incesay itway illway usuallyway ebay ivialtray andway illway\n"
+"Usedway ybay LISTEN.  Eturnsray uetray orway alsefay.  Ethay efaultday "
+"ethodmay usesway\n"
+"  STREAM-READ-CHAR-NO-HANG andway STREAM-UNREAD-CHAR.  Ostmay eamsstray "
+"ouldshay \n"
+"  efineday eirthay ownway ethodmay incesay itway illway usuallyway ebay "
+"ivialtray andway illway\n"
 "  alwaysway ebay oremay efficientway anthay ethay efaultday ethodmay."
 
 #: src/pcl/gray-streams.lisp
@@ -26263,9 +29593,12 @@ msgid ""
 "  instead of the end of a line.  The default method uses repeated\n"
 "  calls to STREAM-READ-CHAR."
 msgstr ""
-"Usedway ybay READ-LINE.  Away ingstray isway eturnedray asway ethay irstfay aluevay.  Ethay\n"
-"  econdsay aluevay isway uetray ifway ethay ingstray asway erminatedtay ybay endway-ofway-ilefay\n"
-"  insteadway ofway ethay endway ofway away inelay.  Ethay efaultday ethodmay usesway epeatedray\n"
+"Usedway ybay READ-LINE.  Away ingstray isway eturnedray asway ethay irstfay "
+"aluevay.  Ethay\n"
+"  econdsay aluevay isway uetray ifway ethay ingstray asway erminatedtay ybay "
+"endway-ofway-ilefay\n"
+"  insteadway ofway ethay endway ofway away inelay.  Ethay efaultday ethodmay "
+"usesway epeatedray\n"
 "  allscay otay STREAM-READ-CHAR."
 
 #: src/pcl/gray-streams.lisp
@@ -26273,7 +29606,8 @@ msgid ""
 "Implements CLEAR-INPUT for the stream, returning NIL.  The default\n"
 "  method does nothing."
 msgstr ""
-"Implementsway CLEAR-INPUT orfay ethay eamstray, eturningray NIL.  Ethay efaultday\n"
+"Implementsway CLEAR-INPUT orfay ethay eamstray, eturningray NIL.  Ethay "
+"efaultday\n"
 "  ethodmay oesday othingnay."
 
 #: src/pcl/gray-streams.lisp
@@ -26286,8 +29620,10 @@ msgid ""
 "  subclass of FUNDAMENTAL-CHARACTER-OUTPUT-STREAM must have a method\n"
 "  defined for this function."
 msgstr ""
-"Iteswray aracterchay otay ethay eamstray andway eturnsray ethay aracterchay.  Everyway\n"
-"  ubclasssay ofway FUNDAMENTAL-CHARACTER-OUTPUT-STREAM ustmay avehay away ethodmay\n"
+"Iteswray aracterchay otay ethay eamstray andway eturnsray ethay "
+"aracterchay.  Everyway\n"
+"  ubclasssay ofway FUNDAMENTAL-CHARACTER-OUTPUT-STREAM ustmay avehay away "
+"ethodmay\n"
 "  efinedday orfay isthay unctionfay."
 
 #: src/pcl/gray-streams.lisp
@@ -26300,12 +29636,18 @@ msgid ""
 "  defined for this function, although it is permissible for it to\n"
 "  always return NIL."
 msgstr ""
-"Isthay unctionfay eturnsray ethay olumncay umbernay erewhay ethay extnay aracterchay\n"
-"  illway ebay ittenwray, orway NIL ifway atthay isway otnay eaningfulmay orfay isthay eamstray.\n"
-"  Ethay irstfay olumncay onway away inelay isway umberednay 0.  Isthay unctionfay isway usedway inway\n"
-"  ethay implementationway ofway PPRINT andway ethay FORMAT ~T irectiveday.  Orfay everyway\n"
-"  aracterchay outputway eamstray assclay atthay isway efinedday, away ethodmay ustmay ebay\n"
-"  efinedday orfay isthay unctionfay, althoughway itway isway ermissiblepay orfay itway otay\n"
+"Isthay unctionfay eturnsray ethay olumncay umbernay erewhay ethay extnay "
+"aracterchay\n"
+"  illway ebay ittenwray, orway NIL ifway atthay isway otnay eaningfulmay "
+"orfay isthay eamstray.\n"
+"  Ethay irstfay olumncay onway away inelay isway umberednay 0.  Isthay "
+"unctionfay isway usedway inway\n"
+"  ethay implementationway ofway PPRINT andway ethay FORMAT ~T irectiveday.  "
+"Orfay everyway\n"
+"  aracterchay outputway eamstray assclay atthay isway efinedday, away "
+"ethodmay ustmay ebay\n"
+"  efinedday orfay isthay unctionfay, althoughway itway isway ermissiblepay "
+"orfay itway otay\n"
 "  alwaysway eturnray NIL."
 
 #: src/pcl/gray-streams.lisp
@@ -26327,17 +29669,28 @@ msgid ""
 "  that is defined to return NIL, then a method should be provided for\n"
 "  either STREAM-START-LINE-P or STREAM-FRESH-LINE."
 msgstr ""
-"Isthay isway away edicatepray ichwhay eturnsray T ifway ethay eamstray isway ositionedpay atway\n"
-"  ethay eginningbay ofway away inelay, elseway NIL.  Itway isway ermissiblepay otay alwaysway eturnray\n"
-"  NIL.  Isthay isway usedway inway ethay implementationway ofway FRESH-LINE.  Otenay atthay\n"
-"  ilewhay away aluevay ofway 0 omfray STREAM-LINE-COLUMN alsoway indicatesway ethay\n"
-"  eginningbay ofway away inelay, erethay areway asescay erewhay STREAM-START-LINE-P ancay ebay\n"
-"  eaningfullymay implementedway althoughway STREAM-LINE-COLUMN ancay't ebay.  Orfay\n"
-"  exampleway, orfay away indowway usingway ariablevay-idthway aracterschay, ethay olumncay\n"
-"  umbernay isnway't eryvay eaningfulmay, utbay ethay eginningbay ofway ethay inelay oesday avehay\n"
-"  away earclay eaningmay.  Ethay efaultday ethodmay orfay STREAM-START-LINE-P onway assclay\n"
-"  FUNDAMENTAL-CHARACTER-OUTPUT-STREAM usesway STREAM-LINE-COLUMN, osay ifway\n"
-"  atthay isway efinedday otay eturnray NIL, enthay away ethodmay ouldshay ebay ovidedpray orfay\n"
+"Isthay isway away edicatepray ichwhay eturnsray T ifway ethay eamstray isway "
+"ositionedpay atway\n"
+"  ethay eginningbay ofway away inelay, elseway NIL.  Itway isway "
+"ermissiblepay otay alwaysway eturnray\n"
+"  NIL.  Isthay isway usedway inway ethay implementationway ofway FRESH-"
+"LINE.  Otenay atthay\n"
+"  ilewhay away aluevay ofway 0 omfray STREAM-LINE-COLUMN alsoway "
+"indicatesway ethay\n"
+"  eginningbay ofway away inelay, erethay areway asescay erewhay STREAM-START-"
+"LINE-P ancay ebay\n"
+"  eaningfullymay implementedway althoughway STREAM-LINE-COLUMN ancay't "
+"ebay.  Orfay\n"
+"  exampleway, orfay away indowway usingway ariablevay-idthway aracterschay, "
+"ethay olumncay\n"
+"  umbernay isnway't eryvay eaningfulmay, utbay ethay eginningbay ofway ethay "
+"inelay oesday avehay\n"
+"  away earclay eaningmay.  Ethay efaultday ethodmay orfay STREAM-START-LINE-"
+"P onway assclay\n"
+"  FUNDAMENTAL-CHARACTER-OUTPUT-STREAM usesway STREAM-LINE-COLUMN, osay "
+"ifway\n"
+"  atthay isway efinedday otay eturnray NIL, enthay away ethodmay ouldshay "
+"ebay ovidedpray orfay\n"
 "  eitherway STREAM-START-LINE-P orway STREAM-FRESH-LINE."
 
 #: src/pcl/gray-streams.lisp
@@ -26348,9 +29701,12 @@ msgid ""
 "  FUNDAMENTAL-CHARACTER-OUTPUT-STREAM uses repeated calls to\n"
 "  STREAM-WRITE-CHAR."
 msgstr ""
-"Isthay isway usedway ybay WRITE-STRING.  Itway iteswray ethay ingstray otay ethay eamstray,\n"
-"  optionallyway elimitedday ybay tartsay andway endway, ichwhay efaultday otay 0 andway NIL.\n"
-"  Ethay ingstray argumentway isway eturnedray.  Ethay efaultday ethodmay ovidedpray ybay\n"
+"Isthay isway usedway ybay WRITE-STRING.  Itway iteswray ethay ingstray otay "
+"ethay eamstray,\n"
+"  optionallyway elimitedday ybay tartsay andway endway, ichwhay efaultday "
+"otay 0 andway NIL.\n"
+"  Ethay ingstray argumentway isway eturnedray.  Ethay efaultday ethodmay "
+"ovidedpray ybay\n"
 "  FUNDAMENTAL-CHARACTER-OUTPUT-STREAM usesway epeatedray allscay otay\n"
 "  STREAM-WRITE-CHAR."
 
@@ -26359,7 +29715,8 @@ msgid ""
 "Writes an end of line, as for TERPRI.  Returns NIL.  The default\n"
 "  method does (STREAM-WRITE-CHAR stream #NEWLINE)."
 msgstr ""
-"Iteswray anway endway ofway inelay, asway orfay TERPRI.  Eturnsray NIL.  Ethay efaultday\n"
+"Iteswray anway endway ofway inelay, asway orfay TERPRI.  Eturnsray NIL.  "
+"Ethay efaultday\n"
 "  ethodmay oesday (STREAM-WRITE-CHAR eamstray #NEWLINE)."
 
 #: src/pcl/gray-streams.lisp
@@ -26369,8 +29726,10 @@ msgid ""
 "  otherwise. Used by FRESH-LINE. The default method uses\n"
 "  STREAM-START-LINE-P and STREAM-TERPRI."
 msgstr ""
-"Outputsway away ewnay inelay otay ethay Eamstray ifway itway isway otnay ositionedpay atway ethay\n"
-"  eginingbay ofway away inelay.  Eturnsray T ifway itway outputway away ewnay inelay, ilnay\n"
+"Outputsway away ewnay inelay otay ethay Eamstray ifway itway isway otnay "
+"ositionedpay atway ethay\n"
+"  eginingbay ofway away inelay.  Eturnsray T ifway itway outputway away "
+"ewnay inelay, ilnay\n"
 "  otherwiseway. Usedway ybay FRESH-LINE. Ethay efaultday ethodmay usesway\n"
 "  STREAM-START-LINE-P andway STREAM-TERPRI."
 
@@ -26380,8 +29739,10 @@ msgid ""
 "  its destination, and only then returns false. Implements\n"
 "  FINISH-OUTPUT.  The default method does nothing."
 msgstr ""
-"Attemptsway otay ensureway atthay allway outputway entsay otay ethay Eamstray ashay eachedray\n"
-"  itsway estinationday, andway onlyway enthay eturnsray alsefay. Implementsway\n"
+"Attemptsway otay ensureway atthay allway outputway entsay otay ethay "
+"Eamstray ashay eachedray\n"
+"  itsway estinationday, andway onlyway enthay eturnsray alsefay. "
+"Implementsway\n"
 "  FINISH-OUTPUT.  Ethay efaultday ethodmay oesday othingnay."
 
 #: src/pcl/gray-streams.lisp
@@ -26389,7 +29750,8 @@ msgid ""
 "Attempts to force any buffered output to be sent. Implements\n"
 "  FORCE-OUTPUT.  The default method does nothing."
 msgstr ""
-"Attemptsway otay orcefay anyway ufferedbay outputway otay ebay entsay. Implementsway\n"
+"Attemptsway otay orcefay anyway ufferedbay outputway otay ebay entsay. "
+"Implementsway\n"
 "  FORCE-OUTPUT.  Ethay efaultday ethodmay oesday othingnay."
 
 #: src/pcl/gray-streams.lisp
@@ -26397,7 +29759,8 @@ msgid ""
 "Clears the given output Stream. Implements CLEAR-OUTPUT.  The\n"
 "  default method does nothing."
 msgstr ""
-"Earsclay ethay ivengay outputway Eamstray. Implementsway CLEAR-OUTPUT.  Ethay\n"
+"Earsclay ethay ivengay outputway Eamstray. Implementsway CLEAR-OUTPUT.  "
+"Ethay\n"
 "  efaultday ethodmay oesday othingnay."
 
 #: src/pcl/gray-streams.lisp
@@ -26409,12 +29772,18 @@ msgid ""
 "  STREAM-LINE-COLUMN and repeated calls to STREAM-WRITE-CHAR with a\n"
 "  #SPACE character; it returns NIL if STREAM-LINE-COLUMN returns NIL."
 msgstr ""
-"Iteswray enoughway ankblay acespay osay atthay ethay extnay aracterchay illway ebay\n"
-"  ittenwray atway ethay ecifiedspay olumncay.  Eturnsray uetray ifway ethay operationway isway\n"
-"  uccessfulsay, orway NIL ifway itway isway otnay upportedsay orfay isthay eamstray.  Isthay isway\n"
-"  intendedway orfay useway ybay ybay PPRINT andway FORMAT ~T.  Ethay efaultday ethodmay usesway\n"
-"  STREAM-LINE-COLUMN andway epeatedray allscay otay STREAM-WRITE-CHAR ithway away\n"
-"  #SPACE aracterchay; itway eturnsray NIL ifway STREAM-LINE-COLUMN eturnsray NIL."
+"Iteswray enoughway ankblay acespay osay atthay ethay extnay aracterchay "
+"illway ebay\n"
+"  ittenwray atway ethay ecifiedspay olumncay.  Eturnsray uetray ifway ethay "
+"operationway isway\n"
+"  uccessfulsay, orway NIL ifway itway isway otnay upportedsay orfay isthay "
+"eamstray.  Isthay isway\n"
+"  intendedway orfay useway ybay ybay PPRINT andway FORMAT ~T.  Ethay "
+"efaultday ethodmay usesway\n"
+"  STREAM-LINE-COLUMN andway epeatedray allscay otay STREAM-WRITE-CHAR ithway "
+"away\n"
+"  #SPACE aracterchay; itway eturnsray NIL ifway STREAM-LINE-COLUMN eturnsray "
+"NIL."
 
 #: src/pcl/gray-streams.lisp
 msgid "Implements WRITE-SEQUENCE for the stream."
@@ -26425,7 +29794,8 @@ msgid ""
 "Used by READ-BYTE; returns either an integer, or the symbol :EOF\n"
 "  if the stream is at end-of-file."
 msgstr ""
-"Usedway ybay READ-BYTE; eturnsray eitherway anway integerway, orway ethay ymbolsay :EOF\n"
+"Usedway ybay READ-BYTE; eturnsray eitherway anway integerway, orway ethay "
+"ymbolsay :EOF\n"
 "  ifway ethay eamstray isway atway endway-ofway-ilefay."
 
 #: src/pcl/gray-streams.lisp
@@ -26433,7 +29803,8 @@ msgid ""
 "Implements WRITE-BYTE; writes the integer to the stream and\n"
 "  returns the integer as the result."
 msgstr ""
-"Implementsway WRITE-BYTE; iteswray ethay integerway otay ethay eamstray andway\n"
+"Implementsway WRITE-BYTE; iteswray ethay integerway otay ethay eamstray "
+"andway\n"
 "  eturnsray ethay integerway asway ethay esultray."
 
 #: src/pcl/gray-streams.lisp
@@ -26445,8 +29816,10 @@ msgid ""
 "the Unicode replacment character.  Illegal output characters are\n"
 "replaced with a question mark."
 msgstr ""
-"US ASCII 7-itbay encodingway.  Illegalway inputway equencessay areway eplacedray ithway\n"
-"ethay Unicodeway eplacmentray aracterchay.  Illegalway outputway aracterschay areway\n"
+"US ASCII 7-itbay encodingway.  Illegalway inputway equencessay areway "
+"eplacedray ithway\n"
+"ethay Unicodeway eplacmentray aracterchay.  Illegalway outputway "
+"aracterschay areway\n"
 "eplacedray ithway away estionquay arkmay."
 
 msgid ""
@@ -26456,11 +29829,14 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"MAC-ROMAN isway anway 8-itbay aracterchay encodingway orfay Esternway Europeanway\n"
+"MAC-ROMAN isway anway 8-itbay aracterchay encodingway orfay Esternway "
+"Europeanway\n"
 "anguageslay includingway Englishway.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "CP1250 is a Windows code page to represent texts in Central and\n"
@@ -26470,12 +29846,17 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"CP1250 isway away Indowsway odecay agepay otay epresentray extstay inway Entralcay andway\n"
-"Easternway Europeanway anguageslay uchsay asway Olishpay, Zechcay, Ovakslay, Ungarianhay,\n"
-"Oveneslay, Osnianbay, Oationcray, Erbiansay, Omanianray, andway Albanianway.\n"
+"CP1250 isway away Indowsway odecay agepay otay epresentray extstay inway "
+"Entralcay andway\n"
+"Easternway Europeanway anguageslay uchsay asway Olishpay, Zechcay, Ovakslay, "
+"Ungarianhay,\n"
+"Oveneslay, Osnianbay, Oationcray, Erbiansay, Omanianray, andway "
+"Albanianway.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "CP1251 is a Windows code page to represent texts that use the\n"
@@ -26485,12 +29866,16 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"CP1251 isway away Indowsway odecay agepay otay epresentray extstay atthay useway ethay\n"
-"Yrilliccay alphabetway uchsay asway Ussianray, Ulgarianbay, Erbiansay Yrilliccay, andway\n"
+"CP1251 isway away Indowsway odecay agepay otay epresentray extstay atthay "
+"useway ethay\n"
+"Yrilliccay alphabetway uchsay asway Ussianray, Ulgarianbay, Erbiansay "
+"Yrilliccay, andway\n"
 "othersway.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "CP1252 is a Windows code page for the Latin alphabet.\n"
@@ -26500,8 +29885,10 @@ msgid ""
 msgstr ""
 "CP1252 isway away Indowsway odecay agepay orfay ethay Atinlay alphabetway.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "CP1253 is a Windows code page for Greek.\n"
@@ -26511,8 +29898,10 @@ msgid ""
 msgstr ""
 "CP1253 isway away Indowsway odecay agepay orfay Eekgray.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "CP1254 is a Windows code page for Turkish.\n"
@@ -26522,8 +29911,10 @@ msgid ""
 msgstr ""
 "CP1254 isway away Indowsway odecay agepay orfay Urkishtay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "CP1255 is a Windows code page for Hebrew.\n"
@@ -26533,8 +29924,10 @@ msgid ""
 msgstr ""
 "CP1255 isway away Indowsway odecay agepay orfay Ebrewhay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "CP1256 is a Windows code page for Arabic.\n"
@@ -26544,8 +29937,10 @@ msgid ""
 msgstr ""
 "CP1256 isway away Indowsway odecay agepay orfay Arabicway.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "CP1257 is a Windows code page for Estonian, Latvian, and Lithuanian.\n"
@@ -26553,10 +29948,13 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"CP1257 isway away Indowsway odecay agepay orfay Estonianway, Atvianlay, andway Ithuanianlay.\n"
+"CP1257 isway away Indowsway odecay agepay orfay Estonianway, Atvianlay, "
+"andway Ithuanianlay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "CP1258 is a Windows code page for Vietnamese.\n"
@@ -26566,8 +29964,10 @@ msgid ""
 msgstr ""
 "CP1258 isway away Indowsway odecay agepay orfay Ietnamesevay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "ISO8859-2 is an 8-bit character encoding generally intended for\n"
@@ -26578,13 +29978,18 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"ISO8859-2 isway anway 8-itbay aracterchay encodingway enerallygay intendedway orfay\n"
-"Easternway Europeanway anguageslay includingway Osnianbay, Oationcray, Zechcay, Ermangay,\n"
-"Ungarianhay, Olishpay, Omanianray, Erbiansay Atinlay, Ovakslay, Oveneslay, Upperway\n"
+"ISO8859-2 isway anway 8-itbay aracterchay encodingway enerallygay "
+"intendedway orfay\n"
+"Easternway Europeanway anguageslay includingway Osnianbay, Oationcray, "
+"Zechcay, Ermangay,\n"
+"Ungarianhay, Olishpay, Omanianray, Erbiansay Atinlay, Ovakslay, Oveneslay, "
+"Upperway\n"
 "Orbiansay, andway Owerlay Orbiansay.  \n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "ISO8859-10 is an 8-bit character encoding intended to cover Nordic\n"
@@ -26593,11 +29998,14 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"ISO8859-10 isway anway 8-itbay aracterchay encodingway intendedway otay overcay Ordicnay\n"
+"ISO8859-10 isway anway 8-itbay aracterchay encodingway intendedway otay "
+"overcay Ordicnay\n"
 "anguageslay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "ISO8859-13 is an 8-bit character encoding for the Baltic languages.\n"
@@ -26605,10 +30013,13 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"ISO8859-13 isway anway 8-itbay aracterchay encodingway orfay ethay Alticbay anguageslay.\n"
+"ISO8859-13 isway anway 8-itbay aracterchay encodingway orfay ethay Alticbay "
+"anguageslay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "ISO8859-14 is an 8-bit character encoding intended for the Celtic\n"
@@ -26617,11 +30028,15 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"ISO8859-14 isway anway 8-itbay aracterchay encodingway intendedway orfay ethay Elticcay\n"
-"anguageslay uchsay asway Irishway, Anxmay, Ottishscay Aelicgay, Elshway, andway Etonbray.\n"
+"ISO8859-14 isway anway 8-itbay aracterchay encodingway intendedway orfay "
+"ethay Elticcay\n"
+"anguageslay uchsay asway Irishway, Anxmay, Ottishscay Aelicgay, Elshway, "
+"andway Etonbray.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "ISO8859-15 is an 8-bit character encoding similar to ISO8859-1 but\n"
@@ -26631,12 +30046,16 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"ISO8859-15 isway anway 8-itbay aracterchay encodingway imilarsay otay ISO8859-1 utbay\n"
-"eplacesray omesay esslay ommoncay ymbolssay ithway othersway, includingway addingway ethay\n"
+"ISO8859-15 isway anway 8-itbay aracterchay encodingway imilarsay otay "
+"ISO8859-1 utbay\n"
+"eplacesray omesay esslay ommoncay ymbolssay ithway othersway, includingway "
+"addingway ethay\n"
 "Euroway ignsay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "ISO8859-3 is an 8-bit character encoding intended for South European\n"
@@ -26646,12 +30065,16 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"ISO8859-3 isway anway 8-itbay aracterchay encodingway intendedway orfay Outhsay Europeanway\n"
-"anguageslay includingway Urkishtay, Altesemay, andway Esperantoway.  Orfay Urkishtay,\n"
+"ISO8859-3 isway anway 8-itbay aracterchay encodingway intendedway orfay "
+"Outhsay Europeanway\n"
+"anguageslay includingway Urkishtay, Altesemay, andway Esperantoway.  Orfay "
+"Urkishtay,\n"
 "ISO8859-9 upersedessay ISO8859-3.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "ISO8859-4 is an 8-bit character encoding for North European languages\n"
@@ -26660,11 +30083,15 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"ISO8859-4 isway anway 8-itbay aracterchay encodingway orfay Orthnay Europeanway anguageslay\n"
-"includingway Estonianway, Atvianlay, Ithuanianlay, Eenlandicgray, andway Amisay.\n"
+"ISO8859-4 isway anway 8-itbay aracterchay encodingway orfay Orthnay "
+"Europeanway anguageslay\n"
+"includingway Estonianway, Atvianlay, Ithuanianlay, Eenlandicgray, andway "
+"Amisay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "ISO8859-5, informallly referred to as Latin/Cyrillic, is an 8-bit\n"
@@ -26674,12 +30101,17 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"ISO8859-5, informalllyway eferredray otay asway Atinlay/Yrilliccay, isway anway 8-itbay\n"
-"aracterchay encodingway intendedway orfay anguageslay usingway away Yrilliccay alphabetway\n"
-"uchsay asway Ulgarianbay, Elarusianbay, Ussianray, Erbiansay, andway Acedonianmay.\n"
+"ISO8859-5, informalllyway eferredray otay asway Atinlay/Yrilliccay, isway "
+"anway 8-itbay\n"
+"aracterchay encodingway intendedway orfay anguageslay usingway away "
+"Yrilliccay alphabetway\n"
+"uchsay asway Ulgarianbay, Elarusianbay, Ussianray, Erbiansay, andway "
+"Acedonianmay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "ISO8859-6 is an 8-bit character encoding generally intended languages\n"
@@ -26688,11 +30120,14 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"ISO8859-6 isway anway 8-itbay aracterchay encodingway enerallygay intendedway anguageslay\n"
+"ISO8859-6 isway anway 8-itbay aracterchay encodingway enerallygay "
+"intendedway anguageslay\n"
 "usingway ethay Arabicway alphabetway.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "ISO8859-7 is an 8-bit character encoding for the modern Greek\n"
@@ -26701,11 +30136,14 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"ISO8859-7 isway anway 8-itbay aracterchay encodingway orfay ethay odernmay Eekgray\n"
+"ISO8859-7 isway anway 8-itbay aracterchay encodingway orfay ethay odernmay "
+"Eekgray\n"
 "anguagelay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "ISO8859-8 is an 8-bit character encoding intended for Hebrew.\n"
@@ -26713,10 +30151,13 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"ISO8859-8 isway anway 8-itbay aracterchay encodingway intendedway orfay Ebrewhay.\n"
+"ISO8859-8 isway anway 8-itbay aracterchay encodingway intendedway orfay "
+"Ebrewhay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "ISO8859-9 is an 8-bit character encoding for the Turkish language.\n"
@@ -26724,10 +30165,13 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"ISO8859-9 isway anway 8-itbay aracterchay encodingway orfay ethay Urkishtay anguagelay.\n"
+"ISO8859-9 isway anway 8-itbay aracterchay encodingway orfay ethay Urkishtay "
+"anguagelay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "KOI8-R is an 8-bit character encoding designed to cover Russian.\n"
@@ -26735,10 +30179,13 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"KOI8-R isway anway 8-itbay aracterchay encodingway esignedday otay overcay Ussianray.\n"
+"KOI8-R isway anway 8-itbay aracterchay encodingway esignedday otay overcay "
+"Ussianray.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "MAC-CYRILLIC is an 8-bit character encoding for Cyrillic text on\n"
@@ -26747,11 +30194,14 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"MAC-CYRILLIC isway anway 8-itbay aracterchay encodingway orfay Yrilliccay exttay onway\n"
+"MAC-CYRILLIC isway anway 8-itbay aracterchay encodingway orfay Yrilliccay "
+"exttay onway\n"
 "Appleway Acintoshmay omputerscay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "MAC-GREEK is an 8-bit character encoding for Greek text on Apple\n"
@@ -26760,11 +30210,14 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"MAC-GREEK isway anway 8-itbay aracterchay encodingway orfay Eekgray exttay onway Appleway\n"
+"MAC-GREEK isway anway 8-itbay aracterchay encodingway orfay Eekgray exttay "
+"onway Appleway\n"
 "Acintoshmay omputerscay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "MAC-ICELANDIC is an 8-bit character encoding for Icelandic text on\n"
@@ -26773,11 +30226,14 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"MAC-ICELANDIC isway anway 8-itbay aracterchay encodingway orfay Icelandicway exttay onway\n"
+"MAC-ICELANDIC isway anway 8-itbay aracterchay encodingway orfay Icelandicway "
+"exttay onway\n"
 "Appleway Acintoshmay omputerscay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "MAC-LATIN2 is an 8-bit character encoding for Central European text\n"
@@ -26786,11 +30242,14 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"MAC-LATIN2 isway anway 8-itbay aracterchay encodingway orfay Entralcay Europeanway exttay\n"
+"MAC-LATIN2 isway anway 8-itbay aracterchay encodingway orfay Entralcay "
+"Europeanway exttay\n"
 "onway Appleway Acintoshmay omputerscay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "MAC-TURKISH is an 8-bit character encoding for Turkish text on\n"
@@ -26799,11 +30258,14 @@ msgid ""
 "By default, illegal inputs are replaced by the Unicode replacement\n"
 "character and illegal outputs are replaced by a question mark."
 msgstr ""
-"MAC-TURKISH isway anway 8-itbay aracterchay encodingway orfay Urkishtay exttay onway\n"
+"MAC-TURKISH isway anway 8-itbay aracterchay encodingway orfay Urkishtay "
+"exttay onway\n"
 "Appleway Acintoshmay omputerscay.\n"
 "\n"
-"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway eplacementray\n"
-"aracterchay andway illegalway outputsway areway eplacedray ybay away estionquay arkmay."
+"Ybay efaultday, illegalway inputsway areway eplacedray ybay ethay Unicodeway "
+"eplacementray\n"
+"aracterchay andway illegalway outputsway areway eplacedray ybay away "
+"estionquay arkmay."
 
 msgid ""
 "UTF-16 is a variable length character encoding for Unicode.  On\n"
@@ -26815,13 +30277,19 @@ msgid ""
 "By default, illegal inputs and illegal outputs are replaced by the\n"
 "Unicode replacement character."
 msgstr ""
-"UTF-16 isway away ariablevay engthlay aracterchay encodingway orfay Unicodeway.  Onway\n"
-"inputway, away ytebay-orderway arkmay isway ecognizedray.  Ifway onay ytebay-orderway arkmay isway\n"
-"ivengay onway inputway, enthay ethay encodingway isway assumedway otay ebay igbay-endianway.  Orfay\n"
-"outputway, ethay ytebay-orderway arkmay isway otnay ittenwray, andway ethay outputway isway\n"
-"igbay-endianway.  (Isthay isway ecifiedspay ybay ethay Unicodeway tandardsay.)\n"
-"\n"
-"Ybay efaultday, illegalway inputsway andway illegalway outputsway areway eplacedray ybay ethay\n"
+"UTF-16 isway away ariablevay engthlay aracterchay encodingway orfay "
+"Unicodeway.  Onway\n"
+"inputway, away ytebay-orderway arkmay isway ecognizedray.  Ifway onay ytebay-"
+"orderway arkmay isway\n"
+"ivengay onway inputway, enthay ethay encodingway isway assumedway otay ebay "
+"igbay-endianway.  Orfay\n"
+"outputway, ethay ytebay-orderway arkmay isway otnay ittenwray, andway ethay "
+"outputway isway\n"
+"igbay-endianway.  (Isthay isway ecifiedspay ybay ethay Unicodeway "
+"tandardsay.)\n"
+"\n"
+"Ybay efaultday, illegalway inputsway andway illegalway outputsway areway "
+"eplacedray ybay ethay\n"
 "Unicodeway eplacementray aracterchay."
 
 msgid ""
@@ -26833,12 +30301,17 @@ msgid ""
 "By default, illegal inputs and illegal outputs are replaced by the\n"
 "Unicode replacement character."
 msgstr ""
-"UTF-16-BE isway away ariablevay engthlay aracterchay encodingway orfay Unicodeway.  Orfay\n"
-"othbay inputway andway outputway, ethay ataday isway assumedway otay ebay inway igbay-endianway orderway.\n"
-"Onay ytebay-orderway arkmay isway allowedway onway inputway, andway onay ytebay-orderway arkmay isway\n"
-"oducedpray onway outputway.  (Isthay isway ecifiedspay ybay ethay Unicodeway tandardsay.)\n"
-"\n"
-"Ybay efaultday, illegalway inputsway andway illegalway outputsway areway eplacedray ybay ethay\n"
+"UTF-16-BE isway away ariablevay engthlay aracterchay encodingway orfay "
+"Unicodeway.  Orfay\n"
+"othbay inputway andway outputway, ethay ataday isway assumedway otay ebay "
+"inway igbay-endianway orderway.\n"
+"Onay ytebay-orderway arkmay isway allowedway onway inputway, andway onay "
+"ytebay-orderway arkmay isway\n"
+"oducedpray onway outputway.  (Isthay isway ecifiedspay ybay ethay Unicodeway "
+"tandardsay.)\n"
+"\n"
+"Ybay efaultday, illegalway inputsway andway illegalway outputsway areway "
+"eplacedray ybay ethay\n"
 "Unicodeway eplacementray aracterchay."
 
 msgid ""
@@ -26850,12 +30323,17 @@ msgid ""
 "By default, illegal inputs and illegal outputs are replaced by the\n"
 "Unicode replacement character."
 msgstr ""
-"UTF-16-LE isway away ariablevay engthlay aracterchay encodingway orfay Unicodeway.  Orfay\n"
-"othbay inputway andway outputway, ethay ataday isway assumedway otay ebay inway ittlelay-endianway\n"
-"orderway.  Onay ytebay-orderway arkmay isway allowedway onway inputway, andway onay ytebay-orderway arkmay\n"
-"isway oducedpray onway outputway.  (Isthay isway ecifiedspay ybay ethay Unicodeway tandardsay.)\n"
+"UTF-16-LE isway away ariablevay engthlay aracterchay encodingway orfay "
+"Unicodeway.  Orfay\n"
+"othbay inputway andway outputway, ethay ataday isway assumedway otay ebay "
+"inway ittlelay-endianway\n"
+"orderway.  Onay ytebay-orderway arkmay isway allowedway onway inputway, "
+"andway onay ytebay-orderway arkmay\n"
+"isway oducedpray onway outputway.  (Isthay isway ecifiedspay ybay ethay "
+"Unicodeway tandardsay.)\n"
 "\n"
-"Ybay efaultday, illegalway inputsway andway illegalway outputsway areway eplacedray ybay ethay\n"
+"Ybay efaultday, illegalway inputsway andway illegalway outputsway areway "
+"eplacedray ybay ethay\n"
 "Unicodeway eplacementray aracterchay."
 
 msgid ""
@@ -26868,13 +30346,19 @@ msgid ""
 "By default, illegal inputs and illegal outputs are replaced by the\n"
 "Unicode replacement character."
 msgstr ""
-"UTF-32 isway away ixedfay-engthlay aracterchay encodingway ofway 4 octetsway orfay Unicodeway.\n"
-"Onway inputway, away ytebay-orderway arkmay isway ecognizedray.  Ifway onay ytebay-orderway arkmay isway\n"
-"ivengay onway inputway, enthay ethay encodingway isway assumedway otay ebay igbay-endianway.  Orfay\n"
-"outputway, ethay ytebay-orderway arkmay isway otnay ittenwray, andway ethay outputway isway\n"
-"igbay-endianway.  (Isthay isway ecifiedspay ybay ethay Unicodeway tandardsay.)\n"
-"\n"
-"Ybay efaultday, illegalway inputsway andway illegalway outputsway areway eplacedray ybay ethay\n"
+"UTF-32 isway away ixedfay-engthlay aracterchay encodingway ofway 4 octetsway "
+"orfay Unicodeway.\n"
+"Onway inputway, away ytebay-orderway arkmay isway ecognizedray.  Ifway onay "
+"ytebay-orderway arkmay isway\n"
+"ivengay onway inputway, enthay ethay encodingway isway assumedway otay ebay "
+"igbay-endianway.  Orfay\n"
+"outputway, ethay ytebay-orderway arkmay isway otnay ittenwray, andway ethay "
+"outputway isway\n"
+"igbay-endianway.  (Isthay isway ecifiedspay ybay ethay Unicodeway "
+"tandardsay.)\n"
+"\n"
+"Ybay efaultday, illegalway inputsway andway illegalway outputsway areway "
+"eplacedray ybay ethay\n"
 "Unicodeway eplacementray aracterchay."
 
 msgid ""
@@ -26887,13 +30371,18 @@ msgid ""
 "By default, illegal inputs and illegal outputs are replaced by the\n"
 "Unicode replacement character."
 msgstr ""
-"UTF-32-BE isway away ixedfay-engthlay aracterchay encodingway ofway 4 octetsway orfay\n"
-"Unicodeway.  Orfay othbay inputway andway outputway, ethay ataday isway assumedway otay ebay inway\n"
-"igbay-endianway orderway.  Onay ytebay-orderway arkmay isway allowedway onway inputway, andway onay\n"
-"ytebay-orderway arkmay isway oducedpray onway outputway.  (Isthay isway ecifiedspay ybay ethay\n"
+"UTF-32-BE isway away ixedfay-engthlay aracterchay encodingway ofway 4 "
+"octetsway orfay\n"
+"Unicodeway.  Orfay othbay inputway andway outputway, ethay ataday isway "
+"assumedway otay ebay inway\n"
+"igbay-endianway orderway.  Onay ytebay-orderway arkmay isway allowedway "
+"onway inputway, andway onay\n"
+"ytebay-orderway arkmay isway oducedpray onway outputway.  (Isthay isway "
+"ecifiedspay ybay ethay\n"
 "Unicodeway tandardsay.)\n"
 "\n"
-"Ybay efaultday, illegalway inputsway andway illegalway outputsway areway eplacedray ybay ethay\n"
+"Ybay efaultday, illegalway inputsway andway illegalway outputsway areway "
+"eplacedray ybay ethay\n"
 "Unicodeway eplacementray aracterchay."
 
 msgid ""
@@ -26906,13 +30395,18 @@ msgid ""
 "By default, illegal inputs and illegal outputs are replaced by the\n"
 "Unicode replacement character."
 msgstr ""
-"UTF-32-LE isway away ixedfay-engthlay aracterchay encodingway ofway 4 octetsway orfay\n"
-"Unicodeway.  Orfay othbay inputway andway outputway, ethay ataday isway assumedway otay ebay inway\n"
-"ittlelay-endianway orderway.  Onay ytebay-orderway arkmay isway allowedway onway inputway, andway onay\n"
-"ytebay-orderway arkmay isway oducedpray onway outputway.  (Isthay isway ecifiedspay ybay ethay\n"
+"UTF-32-LE isway away ixedfay-engthlay aracterchay encodingway ofway 4 "
+"octetsway orfay\n"
+"Unicodeway.  Orfay othbay inputway andway outputway, ethay ataday isway "
+"assumedway otay ebay inway\n"
+"ittlelay-endianway orderway.  Onay ytebay-orderway arkmay isway allowedway "
+"onway inputway, andway onay\n"
+"ytebay-orderway arkmay isway oducedpray onway outputway.  (Isthay isway "
+"ecifiedspay ybay ethay\n"
 "Unicodeway tandardsay.)\n"
 "\n"
-"Ybay efaultday, illegalway inputsway andway illegalway outputsway areway eplacedray ybay ethay\n"
+"Ybay efaultday, illegalway inputsway andway illegalway outputsway areway "
+"eplacedray ybay ethay\n"
 "Unicodeway eplacementray aracterchay."
 
 msgid ""
@@ -26920,7 +30414,16 @@ msgid ""
 "default, illegal input sequences are replaced by the Unicode\n"
 "replacement character."
 msgstr ""
-"UTF-8 isway away ariablevay-engthlay aracterchay encodingway orfay Unicodeway.  Ybay\n"
-"efaultday, illegalway inputway equencessay areway eplacedray ybay ethay Unicodeway\n"
+"UTF-8 isway away ariablevay-engthlay aracterchay encodingway orfay "
+"Unicodeway.  Ybay\n"
+"efaultday, illegalway inputway equencessay areway eplacedray ybay ethay "
+"Unicodeway\n"
 "eplacementray aracterchay."
 
+#~ msgid ""
+#~ "Return a pathname describing what file COMPILE-FILE would write to given\n"
+#~ "   these arguments."
+#~ msgstr ""
+#~ "Eturnray away athnamepay escribingday atwhay ilefay COMPILE-FILE ouldway "
+#~ "itewray otay ivengay\n"
+#~ "   esethay argumentsway."
diff --git a/i18n/locale/ko/LC_MESSAGES/cmucl.po b/i18n/locale/ko/LC_MESSAGES/cmucl.po
index b55ae4084..a8dcf1de5 100644
--- a/i18n/locale/ko/LC_MESSAGES/cmucl.po
+++ b/i18n/locale/ko/LC_MESSAGES/cmucl.po
@@ -5316,6 +5316,14 @@ msgstr ""
 msgid "Build the dictionary for CJK Unified Ideographs"
 msgstr ""
 
+#: src/code/unidata.lisp
+msgid ""
+"Load all unicode data and set *UNIDATA-PATH* to NIL.\n"
+"Normally, the unicode data is loaded as needed.  This loads all of the\n"
+"data, which is useful for creating a core that no longer needs\n"
+"unidata.bin."
+msgstr ""
+
 #: src/code/char.lisp
 msgid "The upper exclusive bound on values produced by CHAR-CODE."
 msgstr ""
@@ -5974,7 +5982,7 @@ msgstr ""
 #: src/code/commandline.lisp
 msgid ""
 "Specifies the number of megabytes that should be allocated to the\n"
-"  heap.  If not specified, a platform- specific default is used.  The\n"
+"  heap.  If not specified, a platform-specific default is used.  The\n"
 "  actual maximum allowed heap size is platform-specific."
 msgstr ""
 
@@ -5982,6 +5990,38 @@ msgstr ""
 msgid "megabytes"
 msgstr ""
 
+#: src/code/commandline.lisp
+msgid ""
+"Specifies the number of megabytes that should be allocated for the\n"
+"  read-only space.  If not specified, a platform-specific default is\n"
+"  used.  The actual maximum allowed read-only size is\n"
+"  platform-specific."
+msgstr ""
+
+#: src/code/commandline.lisp
+msgid ""
+"Specifies the number of megabytes that should be allocated for the\n"
+"  static space.  If not specified, a platform-specific default is\n"
+"  used.  The actual maximum allowed static space size is\n"
+"  platform-specific."
+msgstr ""
+
+#: src/code/commandline.lisp
+msgid ""
+"Specifies the number of megabytes that should be allocated for the\n"
+"  control stack.  If not specified, a platform-specific default is\n"
+"  used.  The actual maximum allowed control stack size is\n"
+"  platform-specific."
+msgstr ""
+
+#: src/code/commandline.lisp
+msgid ""
+"Specifies the number of megabytes that should be allocated for the\n"
+"  binding stack.  If not specified, a platform-specific default is\n"
+"  used.  The actual maximum allowed binding stack size is\n"
+"  platform-specific."
+msgstr ""
+
 #: src/code/commandline.lisp
 msgid ""
 "A colon-separated list of directories to be used for the library:\n"
@@ -6005,6 +6045,10 @@ msgid ""
 "  its default core file."
 msgstr ""
 
+#: src/code/commandline.lisp
+msgid "Specify the unidata.bin file to be used."
+msgstr ""
+
 #: src/code/commandline.lisp
 msgid "~&Usage: ~A <options>~2%"
 msgstr ""
@@ -10737,9 +10781,10 @@ msgstr ""
 
 #: src/code/interr.lisp
 msgid ""
-"~2&~@<A control stack overflow has occurred: ~\n"
-"            the program has entered the yellow control stack guard zone.  ~\n"
-"            Please note that you will be returned to the Top-Level if you ~\n"
+"~2&~@<A control stack overflow has occurred:~%~\n"
+"            the program has entered the yellow control stack guard zone.~%~\n"
+"            Please note that you will be returned to the Top-Level if you~"
+"%~\n"
 "            enter the red control stack guard zone while debugging.~@:>~2%"
 msgstr ""
 
@@ -17392,8 +17437,8 @@ msgstr ""
 msgid ""
 "Similar to *BYTE-COMPILE-DEFAULT*, but controls the compilation of top-"
 "level\n"
-"   forms (evaluated at load-time) when the :BYTE-COMPILE argument is :MAYBE\n"
-"   (the default.)  When true, we decide to byte-compile."
+"  forms (evaluated at load-time) when the :BYTE-COMPILE argument is :MAYBE\n"
+"  (the default.)  When true, we decide to byte-compile."
 msgstr ""
 
 #: src/compiler/main.lisp
@@ -17431,9 +17476,9 @@ msgstr ""
 #: src/compiler/main.lisp
 msgid ""
 "The user supplied source-info for the current compilation.  \n"
-"This is the :source-info argument to COMPILE-FROM-STREAM and will be\n"
-"stored in the INFO slot of the DEBUG-SOURCE in code components and \n"
-"in the user USER-INFO slot of STREAM-SOURCE-LOCATIONs."
+"  This is the :source-info argument to COMPILE-FROM-STREAM and will be\n"
+"  stored in the INFO slot of the DEBUG-SOURCE in code components and \n"
+"  in the user USER-INFO slot of STREAM-SOURCE-LOCATIONs."
 msgstr ""
 
 #: src/compiler/main.lisp
@@ -17591,68 +17636,72 @@ msgstr ""
 
 #: src/compiler/main.lisp
 msgid ""
-"Compiles Source, producing a corresponding .FASL file.  Source may be a "
-"list\n"
-"   of files, in which case the files are compiled as a unit, producing a "
+"Compiles Source, producing a corresponding FASL file.  Source may be a list\n"
+"  of files, in which case the files are compiled as a unit, producing a "
 "single\n"
-"   .FASL file.  The output file names are defaulted from the first (or "
-"only)\n"
-"   input file name.  Other options available via keywords:\n"
-"   :Output-File\n"
-"      The name of the fasl to output, NIL for none, T for the default.\n"
-"   :Error-File\n"
-"      The name of the error listing file, NIL for none (the default), T for\n"
-"      .err.\n"
-"   :Trace-File\n"
-"      If specified, internal data structures are dumped to this file.  T "
-"for\n"
-"      the .trace default.\n"
-"   :Error-Output\n"
-"      If a stream, then error output is sent there as well as to the "
-"listing\n"
-"      file.  NIL suppresses this additional error output.  The default is "
-"T,\n"
-"      which means use *ERROR-OUTPUT*.\n"
-"   :Block-Compile {NIL | :SPECIFIED | T}\n"
-"      Determines whether multiple functions are compiled together as a "
-"unit,\n"
-"      resolving function references at compile time.  NIL means that global\n"
-"      function names are never resolved at compilation time.  :SPECIFIED "
+"  FASL file.  The output file names are defaulted from the first (or only)\n"
+"  input file name.  (The use of a list for Source is a CMUCL extension, not\n"
+"  specified in CLHS.)\n"
+"\n"
+"  These keywords are supported:\n"
+"\n"
+"  :Output-File\n"
+"     The name of the FASL to output, NIL for none, T for the default.\n"
+"     (Note the difference between the treatment of NIL :Output-File\n"
+"     here and in COMPILE-FILE-PATHNAME.)  The returned pathname of the\n"
+"     output file may differ from the pathname of the :Output-File\n"
+"     parameter, e.g. when the latter is a designator for a directory.\n"
+"  :Load\n"
+"     Load the compiled file; T here requires :Output-File to be\n"
+"     non-NIL, as well.  The default for :Load is NIL.\n"
+"  :Error-File\n"
+"     The name of the error listing file, NIL for none (the default), T for ."
+"err.\n"
+"  :Trace-File\n"
+"     If specified, internal data structures are dumped to this file.  T for\n"
+"     the .trace default.\n"
+"  :Error-Output\n"
+"     If a stream, then error output is sent there as well as to the listing\n"
+"     file.  NIL suppresses this additional error output.  The default is T,\n"
+"     which means use *ERROR-OUTPUT*.\n"
+"  :Block-Compile {NIL | :SPECIFIED | T}\n"
+"     Determines whether multiple functions are compiled together as a unit,\n"
+"     resolving function references at compile time.  NIL means that global\n"
+"     function names are never resolved at compilation time.  :SPECIFIED "
 "means\n"
-"      that names are resolved at compile-time when convenient (as in a\n"
-"      self-recursive call), but the compiler doesn't combine top-level "
+"     that names are resolved at compile-time when convenient (as in a\n"
+"     self-recursive call), but the compiler doesn't combine top-level "
 "DEFUNs.\n"
-"      With :SPECIFIED, an explicit START-BLOCK declaration will enable "
-"block\n"
-"      compilation.  A value of T indicates that all forms in the file(s) "
+"     With :SPECIFIED, an explicit START-BLOCK declaration will enable block\n"
+"     compilation.  A value of T indicates that all forms in the file(s) "
 "should\n"
-"      be compiled as a unit.  The default is the value of\n"
-"      EXT:*BLOCK-COMPILE-DEFAULT*, which is initially :SPECIFIED.\n"
-"   :Entry-Points\n"
-"      This specifies a list of function names for functions in the file(s) "
+"     be compiled as a unit.  The default is the value of\n"
+"     EXT:*BLOCK-COMPILE-DEFAULT*, which is initially :SPECIFIED.\n"
+"  :Entry-Points\n"
+"     This specifies a list of function names for functions in the file(s) "
 "that\n"
-"      must be given global definitions.  This only applies to block\n"
-"      compilation, and is useful mainly when :BLOCK-COMPILE T is specified "
-"on a\n"
-"      file that lacks START-BLOCK declarations.  If the value is NIL (the\n"
-"      default) then all functions will be globally defined.\n"
-"   :Byte-Compile {T | NIL | :MAYBE}\n"
-"      Determines whether to compile into interpreted byte code instead of\n"
-"      machine instructions.  Byte code is several times smaller, but much\n"
-"      slower.  If :MAYBE, then only byte-compile when SPEED is 0 and\n"
-"      DEBUG <= 1.  The default is the value of EXT:*BYTE-COMPILE-DEFAULT*,\n"
-"      which is initially :MAYBE.\n"
-"   :Xref\n"
-"      If non-NIL, enable recording of cross-reference information.  The "
+"     must be given global definitions.  This only applies to block\n"
+"     compilation, and is useful mainly when :BLOCK-COMPILE T is specified on "
+"a\n"
+"     file that lacks START-BLOCK declarations.  If the value is NIL (the\n"
+"     default) then all functions will be globally defined.\n"
+"  :Byte-Compile {T | NIL | :MAYBE}\n"
+"     Determines whether to compile into interpreted byte code instead of\n"
+"     machine instructions.  Byte code is several times smaller, but much\n"
+"     slower.  If :MAYBE, then only byte-compile when SPEED is 0 and\n"
+"     DEBUG <= 1.  The default is the value of EXT:*BYTE-COMPILE-DEFAULT*,\n"
+"     which is initially :MAYBE.\n"
+"  :Xref\n"
+"     If non-NIL, enable recording of cross-reference information.  The "
 "default\n"
-"      is the value of C:*RECORD-XREF-INFO*\n"
-"   :External-Format\n"
-"      The external format to use when opening the source file\n"
-"   :Decoding-Error\n"
-"      How to handle decoding errors in the external format when reading the\n"
-"      source file.  Default (T) is to signal an error.  Nil means silently\n"
-"      continue, replacing the invalid sequence with a suitable replacment\n"
-"      character."
+"     is the value of C:*RECORD-XREF-INFO*\n"
+"  :External-Format\n"
+"     The external format to use when opening the source file.\n"
+"  :Decoding-Error\n"
+"     How to handle decoding errors in the external format when reading the\n"
+"     source file.  Default (T) is to signal an error.  NIL means silently\n"
+"     continue, replacing the invalid sequence with a suitable replacment\n"
+"     character."
 msgstr ""
 
 #: src/compiler/main.lisp
@@ -17678,7 +17727,7 @@ msgid ""
 "  be compiled.  IF NAME names a macro, then the compiled expression\n"
 "  replaces the existing macro-function.  If NAME names a function, the\n"
 "  compiled expression is placed in the function cell of NAME.  If NAME\n"
-"  is Nil, the compiled code object is returned."
+"  is NIL, the compiled code object is returned."
 msgstr ""
 
 #: src/compiler/main.lisp
@@ -17694,8 +17743,12 @@ msgstr ""
 
 #: src/compiler/main.lisp
 msgid ""
-"Return a pathname describing what file COMPILE-FILE would write to given\n"
-"   these arguments."
+"Return a pathname describing what file COMPILE-FILE would write to\n"
+"  given these arguments.  The returned pathname of the output file may\n"
+"  differ from the pathname of the :Output-File parameter, e.g. when\n"
+"  the latter is a designator for a directory. The CMUCL caveat: NIL is\n"
+"  accepted for :Output-File there but not here, which is probably not\n"
+"  in line with CLHS."
 msgstr ""
 
 #: src/compiler/main.lisp
-- 
GitLab