diff --git a/src/i18n/locale/cmucl.pot b/src/i18n/locale/cmucl.pot index 2d3c5ad5ecc46ed3f207e0a84e961d9fff28399b..07711d1cd2e2360c19c62851310cd502d3458756 100644 --- a/src/i18n/locale/cmucl.pot +++ b/src/i18n/locale/cmucl.pot @@ -2004,62 +2004,6 @@ msgstr "" msgid "Can't use :out or :in-out on pointer-like type:~% ~S" msgstr "" -#: src/code/alien-callback.lisp -msgid "Vector of all callbacks." -msgstr "" - -#: src/compiler/tn.lisp src/compiler/main.lisp src/code/describe.lisp -#: src/code/debug-int.lisp src/code/debug-info.lisp -#: src/code/foreign-linkage.lisp src/code/reader.lisp src/code/stream.lisp -#: src/code/hash-new.lisp src/code/array.lisp src/code/alien-callback.lisp -msgid "~S is not an array with a fill-pointer." -msgstr "" - -#: src/code/alien-callback.lisp -msgid "Unable to mprotect ~S bytes (~S) at ~S (~S). Callbacks may not work." -msgstr "" - -#: src/code/alien-callback.lisp -msgid "Return the trampoline pointer for the callback NAME." -msgstr "" - -#: src/code/alien-callback.lisp -msgid "" -"~\n" -"Attempt to redefine callback with incompatible return type.\n" -" Old type was: ~A \n" -" New type is: ~A" -msgstr "" - -#: src/code/alien-callback.lisp -msgid "~\n" -"Create new trampoline (old trampoline calls old lisp function)." -msgstr "" - -#: src/code/alien-callback.lisp -msgid "Unsupported argument type: ~A" -msgstr "" - -#: src/code/alien-callback.lisp -msgid "Unsupported return type: ~A" -msgstr "" - -#: src/code/alien-callback.lisp -msgid "" -"(defcallback NAME (RETURN-TYPE {(ARG-NAME ARG-TYPE)}*)\n" -" {doc-string} {decls}* {FORM}*)\n" -"\n" -"Define a function which can be called by foreign code. The pointer\n" -"returned by (callback NAME), when called by foreign code, invokes the\n" -"lisp function. The lisp function expects alien arguments of the\n" -"specified ARG-TYPEs and returns an alien of type RETURN-TYPE.\n" -"\n" -"If (callback NAME) is already a callback function pointer, its value\n" -"is not changed (though it's arranged that an updated version of the\n" -"lisp callback function will be called). This feature allows for\n" -"incremental redefinition of callback functions." -msgstr "" - #: src/code/sap.lisp msgid "Return T iff the SAP X points to a smaller address then the SAP Y." msgstr "" @@ -2501,6 +2445,13 @@ msgstr "" msgid "Returns the Fill-Pointer of the given Vector." msgstr "" +#: src/compiler/tn.lisp src/compiler/main.lisp src/code/describe.lisp +#: src/code/debug-int.lisp src/code/debug-info.lisp +#: src/code/foreign-linkage.lisp src/code/reader.lisp src/code/stream.lisp +#: src/code/hash-new.lisp src/code/array.lisp +msgid "~S is not an array with a fill-pointer." +msgstr "" + #: src/code/array.lisp msgid "New fill pointer, ~S, is larger than the length of the vector." msgstr "" @@ -9907,8 +9858,13 @@ msgstr "" #: 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." +"Rename File to have the specified New-Name. If file is a stream\n" +" open to a file, then the associated file is renamed.\n" +"\n" +" Three values are returned if successful: the defaulted new name\n" +" composed of New-Name with missing components filled in from File;\n" +" the truename of File before it was renamed; the new truename of the\n" +" File after it was renamed." msgstr "" #: src/code/filesys.lisp