diff --git a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-x87.po b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-x87.po
index 731740ad7c6a75e3bc4b48511ca82e62109cf689..e38caa856f75a3f6f751a9245334f09e5f0ce453 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-x87.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-x87.po
@@ -16,7 +16,192 @@ msgstr ""
 "Language: Pig Latin\n"
 "Plural-Forms: nplurals=2; plural=(n != 1);\n"
 
+#: src/compiler/x86/float.lisp
+msgid "Ignoring bogus i387 Constant ~a"
+msgstr "Ignoringway ogusbay i387 Onstantcay ~away"
+
+#: src/compiler/x86/float.lisp
+msgid "float move"
+msgstr "oatflay ovemay"
+
 #: src/compiler/x86/x87-array.lisp src/compiler/x86/x87-c-call.lisp
-#: src/compiler/x86/x87-sap.lisp
+#: src/compiler/x86/x87-sap.lisp src/compiler/x86/float.lisp
 msgid "Unknown SC to SC-Case for ~S:~%  ~S"
 msgstr "Unknownway SC otay SC-Asecay orfay ~S:~%  ~S"
+
+#: src/compiler/x86/float.lisp
+msgid "complex float move"
+msgstr "omplexcay oatflay ovemay"
+
+#: src/compiler/x86/float.lisp
+msgid "float to pointer coercion"
+msgstr "oatflay otay ointerpay oercioncay"
+
+#: src/compiler/x86/float.lisp
+msgid ""
+"Load TN allocated, but no move function?~@\n"
+"\t           VM definition inconsistent, recompile and try again."
+msgstr ""
+"Oadlay TN allocatedway, utbay onay ovemay unctionfay?~@\n"
+"\t           VM efinitionday inconsistentway, ecompileray andway ytray "
+"againway."
+
+#: src/compiler/x86/float.lisp
+msgid "pointer to float coercion"
+msgstr "ointerpay otay oatflay oercioncay"
+
+#: src/compiler/x86/float.lisp
+msgid "complex float to pointer coercion"
+msgstr "omplexcay oatflay otay ointerpay oercioncay"
+
+#: src/compiler/x86/float.lisp
+msgid "complex double-double float to pointer coercion"
+msgstr "omplexcay oubleday-oubleday oatflay otay ointerpay oercioncay"
+
+#: src/compiler/x86/float.lisp
+msgid "pointer to complex float coercion"
+msgstr "ointerpay otay omplexcay oatflay oercioncay"
+
+#: src/compiler/x86/float.lisp
+msgid "float argument move"
+msgstr "oatflay argumentway ovemay"
+
+#: src/compiler/x86/float.lisp
+msgid "complex float argument move"
+msgstr "omplexcay oatflay argumentway ovemay"
+
+#: src/compiler/x86/float.lisp
+msgid "complex double-double-float argument move"
+msgstr "omplexcay oubleday-oubleday-oatflay argumentway ovemay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline float arithmetic"
+msgstr "inlineway oatflay arithmeticway"
+
+#: src/compiler/x86/float.lisp
+msgid "inline float comparison"
+msgstr "inlineway oatflay omparisoncay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline float coercion"
+msgstr "inlineway oatflay oercioncay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline float truncate"
+msgstr "inlineway oatflay uncatetray"
+
+#: src/compiler/x86/float.lisp
+msgid "inline NPX function"
+msgstr "inlineway NPX unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline tan function"
+msgstr "inlineway antay unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline sin/cos function"
+msgstr "inlineway insay/oscay unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline exp function"
+msgstr "inlineway expway unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline expm1 function"
+msgstr "inlineway expmway1 unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline log function"
+msgstr "inlineway oglay unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline log10 function"
+msgstr "inlineway oglay10 unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline pow function"
+msgstr "inlineway owpay unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline scalbn function"
+msgstr "inlineway albnscay unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline scalb function"
+msgstr "inlineway albscay unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline log1p function"
+msgstr "inlineway oglay1p unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline log1p with limited x range function"
+msgstr "inlineway oglay1p ithway imitedlay x angeray unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline logb function"
+msgstr "inlineway ogblay unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline atan function"
+msgstr "inlineway atanway unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline atan2 function"
+msgstr "inlineway atanway2 unctionfay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline complex single-float creation"
+msgstr "inlineway omplexcay inglesay-oatflay eationcray"
+
+#: src/compiler/x86/float.lisp
+msgid "inline complex double-float creation"
+msgstr "inlineway omplexcay oubleday-oatflay eationcray"
+
+#: src/compiler/x86/float.lisp
+msgid "inline complex long-float creation"
+msgstr "inlineway omplexcay onglay-oatflay eationcray"
+
+#: src/compiler/x86/float.lisp
+msgid "complex float realpart"
+msgstr "omplexcay oatflay ealpartray"
+
+#: src/compiler/x86/float.lisp
+msgid "complex float imagpart"
+msgstr "omplexcay oatflay imagpartway"
+
+#: src/compiler/x86/float.lisp
+msgid "inline dummy FP register bias"
+msgstr "inlineway ummyday FP egisterray iasbay"
+
+#: src/compiler/x86/float.lisp
+msgid "double-double float move"
+msgstr "oubleday-oubleday oatflay ovemay"
+
+#: src/compiler/x86/float.lisp
+msgid "double double float to pointer coercion"
+msgstr "oubleday oubleday oatflay otay ointerpay oercioncay"
+
+#: src/compiler/x86/float.lisp
+msgid "pointer to double-double-float coercion"
+msgstr "ointerpay otay oubleday-oubleday-oatflay oercioncay"
+
+#: src/compiler/x86/float.lisp
+msgid "double double-float argument move"
+msgstr "oubleday oubleday-oatflay argumentway ovemay"
+
+#: src/compiler/x86/float.lisp
+msgid "inline double-double-float creation"
+msgstr "inlineway oubleday-oubleday-oatflay eationcray"
+
+#: src/compiler/x86/float.lisp
+msgid "double-double high part"
+msgstr "oubleday-oubleday ighhay artpay"
+
+#: src/compiler/x86/float.lisp
+msgid "double-double low part"
+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 f5124836e3b3850341dcffeff23ebb9c83623339..bc6b3269d9bf016eb1d90e920d53b46919bbe62c 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl.po
@@ -5694,6 +5694,11 @@ 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"
+"  orrespondingcay urrogatesay airspay."
 
 #: src/code/string.lisp
 msgid ""
@@ -5701,6 +5706,11 @@ 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"
+"  odepointcay."
 
 #: src/code/mipsstrops.lisp
 msgid ""
@@ -7450,6 +7460,28 @@ msgstr "Eclarationday alreadyway amesnay away ypetay: ~S."
 msgid "Unrecognized proclamation: ~S."
 msgstr "Unrecognizedway oclamationpray: ~S."
 
+#: src/code/unidata.lisp
+msgid ""
+"Search the Unicode name dictionary for the longest entry that\n"
+"  matches STRING.  STRING must be in Unicode name format.  That is, it\n"
+"  must be upper case with spaces separating each word.\n"
+"\n"
+"  Two values are returned.  The first value is index into the codebook\n"
+"  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"
+"  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"
+"  ubstringsay ofway ingstray atthay atchesmay ethay odebookcay. "
+
 #: src/code/unidata.lisp
 msgid "The Unicode data file is broken."
 msgstr "Ethay Unicodeway ataday ilefay isway okenbray."
@@ -7462,6 +7494,49 @@ msgstr "Unicodeway ataday ilefay isway orfay Unicodeway ~D.~D.~D"
 msgid "No data in file."
 msgstr "Onay ataday inway ilefay."
 
+#: src/code/unidata.lisp
+msgid "Dictionary of Hangul syllables"
+msgstr "Ictionaryday ofway Angulhay yllablessay"
+
+#: src/code/unidata.lisp
+msgid "Dictionary of CJK Unified ideographs"
+msgstr "Ictionaryday ofway CJK Unifiedway ideographsway"
+
+#: src/code/unidata.lisp
+msgid ""
+"Try to complete the string Prefix using the dictionary in Dict.\n"
+"  Three values are returned: (1) The best match of prefix, (2) a list\n"
+"  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"
+"  atchmay isway away ompletecay unicodeway amenay. "
+
+#: src/code/unidata.lisp
+msgid ""
+"Search the dictionary in Dict and return a list of the possible\n"
+"  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"
+"  eturnedray."
+
+#: src/code/unidata.lisp
+msgid "Build the dictionary for Hangul syllables"
+msgstr "Uildbay ethay ictionaryday orfay Angulhay yllablessay"
+
+#: src/code/unidata.lisp
+msgid "Build the dictionary for CJK Unified Ideographs"
+msgstr "Uildbay ethay ictionaryday orfay CJK Unifiedway Ideographsway"
+
 #: src/code/char.lisp
 msgid "The upper exclusive bound on values produced by CHAR-CODE."
 msgstr ""
@@ -18401,7 +18476,10 @@ msgid ""
 "\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."
+"        process changes.  The function takes the process as an argument.\n"
+"     :external-format -\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"
@@ -18487,7 +18565,10 @@ msgstr ""
 "        Isthay isway away unctionfay ethay ystemsay allscay eneverwhay ethay "
 "tatussay ofway ethay\n"
 "        ocesspray angeschay.  Ethay unctionfay akestay ethay ocesspray asway "
-"anway argumentway."
+"anway argumentway.\n"
+"     :externalway-ormatfay -\n"
+"        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."
diff --git a/i18n/locale/ko/LC_MESSAGES/cmucl-x87.po b/i18n/locale/ko/LC_MESSAGES/cmucl-x87.po
index 238f5d7031fc9e481efaf0f056628265e531bea0..b934ac706f0e6a3f02c4d34ef4708517097292b1 100644
--- a/i18n/locale/ko/LC_MESSAGES/cmucl-x87.po
+++ b/i18n/locale/ko/LC_MESSAGES/cmucl-x87.po
@@ -15,7 +15,189 @@ msgstr ""
 "Content-Transfer-Encoding: 8bit\n"
 "Language: Korean\n"
 
+#: src/compiler/x86/float.lisp
+msgid "Ignoring bogus i387 Constant ~a"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "float move"
+msgstr ""
+
 #: src/compiler/x86/x87-array.lisp src/compiler/x86/x87-c-call.lisp
-#: src/compiler/x86/x87-sap.lisp
+#: src/compiler/x86/x87-sap.lisp src/compiler/x86/float.lisp
 msgid "Unknown SC to SC-Case for ~S:~%  ~S"
 msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "complex float move"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "float to pointer coercion"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid ""
+"Load TN allocated, but no move function?~@\n"
+"\t           VM definition inconsistent, recompile and try again."
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "pointer to float coercion"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "complex float to pointer coercion"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "complex double-double float to pointer coercion"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "pointer to complex float coercion"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "float argument move"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "complex float argument move"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "complex double-double-float argument move"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline float arithmetic"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline float comparison"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline float coercion"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline float truncate"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline NPX function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline tan function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline sin/cos function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline exp function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline expm1 function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline log function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline log10 function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline pow function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline scalbn function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline scalb function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline log1p function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline log1p with limited x range function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline logb function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline atan function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline atan2 function"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline complex single-float creation"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline complex double-float creation"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline complex long-float creation"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "complex float realpart"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "complex float imagpart"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline dummy FP register bias"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "double-double float move"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "double double float to pointer coercion"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "pointer to double-double-float coercion"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "double double-float argument move"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline double-double-float creation"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "double-double high part"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "double-double low part"
+msgstr ""
+
+#: src/compiler/x86/float.lisp
+msgid "inline complex double-double-float creation"
+msgstr ""
diff --git a/i18n/locale/ko/LC_MESSAGES/cmucl.po b/i18n/locale/ko/LC_MESSAGES/cmucl.po
index a4c163ea5a9dd8ab15c18e7f54377fa1732e5304..fded1b66fa3c5e552dafa6b4550d75cdee57ed66 100644
--- a/i18n/locale/ko/LC_MESSAGES/cmucl.po
+++ b/i18n/locale/ko/LC_MESSAGES/cmucl.po
@@ -5262,6 +5262,17 @@ msgstr ""
 msgid "Unrecognized proclamation: ~S."
 msgstr ""
 
+#: src/code/unidata.lisp
+msgid ""
+"Search the Unicode name dictionary for the longest entry that\n"
+"  matches STRING.  STRING must be in Unicode name format.  That is, it\n"
+"  must be upper case with spaces separating each word.\n"
+"\n"
+"  Two values are returned.  The first value is index into the codebook\n"
+"  that continues the string..  The second value is the length of the\n"
+"  substring of string that matches the codebook. "
+msgstr ""
+
 #: src/code/unidata.lisp
 msgid "The Unicode data file is broken."
 msgstr ""
@@ -5274,6 +5285,37 @@ msgstr ""
 msgid "No data in file."
 msgstr ""
 
+#: src/code/unidata.lisp
+msgid "Dictionary of Hangul syllables"
+msgstr ""
+
+#: src/code/unidata.lisp
+msgid "Dictionary of CJK Unified ideographs"
+msgstr ""
+
+#: src/code/unidata.lisp
+msgid ""
+"Try to complete the string Prefix using the dictionary in Dict.\n"
+"  Three values are returned: (1) The best match of prefix, (2) a list\n"
+"  of possible completions, (3) a boolean indicating whether the best\n"
+"  match is a complete unicode name. "
+msgstr ""
+
+#: src/code/unidata.lisp
+msgid ""
+"Search the dictionary in Dict and return a list of the possible\n"
+"  completions starting with Prefix.  If there is no match, NIL is\n"
+"  returned."
+msgstr ""
+
+#: src/code/unidata.lisp
+msgid "Build the dictionary for Hangul syllables"
+msgstr ""
+
+#: src/code/unidata.lisp
+msgid "Build the dictionary for CJK Unified Ideographs"
+msgstr ""
+
 #: src/code/char.lisp
 msgid "The upper exclusive bound on values produced by CHAR-CODE."
 msgstr ""
@@ -12982,7 +13024,10 @@ msgid ""
 "\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."
+"        process changes.  The function takes the process as an argument.\n"
+"     :external-format -\n"
+"        This is the external-format used for communication with the "
+"subprocess."
 msgstr ""
 
 #: src/code/run-program.lisp