Skip to content
cmucl.pot 572 KiB
Newer Older
#@ cmucl

# SOME DESCRIPTIVE TITLE
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR
#
#, fuzzy
msgid ""
msgstr ""
"Project-Id-Version: PACKAGE VERSION\n"
"Report-Msgid-Bugs-To: \n"
"PO-Revision-Date: YEAR-MO-DA HO:MI +ZONE\n"
"Last-Translator: FULL NAME <EMAIL@ADDRESS>\n"
"Language-Team: LANGUAGE <LL@li.org>\n"
"MIME-Version: 1.0\n"
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"

rtoy's avatar
rtoy committed
#: src/code/struct.lisp
msgid "The size of a stream in-buffer."
rtoy's avatar
rtoy committed
#: src/pcl/cpl.lisp src/pcl/dfun.lisp src/pcl/vector.lisp src/pcl/boot.lisp
#: src/pcl/cache.lisp src/pcl/fngen.lisp src/pcl/defs.lisp src/pcl/info.lisp
#: src/pcl/defsys.lisp src/compiler/byte-comp.lisp src/compiler/eval-comp.lisp
#: src/compiler/generic/new-genesis.lisp src/compiler/generic/core.lisp
#: src/compiler/dump.lisp src/compiler/dyncount.lisp src/compiler/xref.lisp
#: src/compiler/srctran.lisp src/compiler/ir1util.lisp src/compiler/main.lisp
#: src/compiler/knownfun.lisp src/compiler/new-assem.lisp
#: src/compiler/disassem.lisp src/compiler/meta-vmdef.lisp
#: src/compiler/vop.lisp src/compiler/ctype.lisp src/compiler/node.lisp
#: src/compiler/sset.lisp src/compiler/backend.lisp
#: src/compiler/generic/vm-macs.lisp src/compiler/macros.lisp
#: src/code/intl.lisp src/compiler/globaldb.lisp src/code/defstruct.lisp
#: src/code/remote.lisp src/code/wire.lisp src/code/internet.lisp
#: src/code/loop.lisp src/code/run-program.lisp src/code/parse-time.lisp
#: src/code/profile.lisp src/code/ntrace.lisp src/code/rand-mt19937.lisp
#: src/code/debug.lisp src/code/debug-int.lisp src/code/debug-info.lisp
#: src/code/eval.lisp src/code/filesys.lisp src/code/pathname.lisp
#: src/code/fd-stream.lisp src/code/extfmts.lisp src/code/serve-event.lisp
#: src/code/reader.lisp src/code/package.lisp src/code/format.lisp
#: src/code/pprint.lisp src/code/stream.lisp src/code/room.lisp
#: src/code/dfixnum.lisp src/code/commandline.lisp src/code/unidata.lisp
#: src/compiler/proclaim.lisp src/code/hash-new.lisp src/code/byte-interp.lisp
#: src/code/c-call.lisp src/code/alieneval.lisp src/code/type.lisp
#: src/code/class.lisp src/code/typedefs.lisp src/code/error.lisp
#: src/code/fwrappers.lisp src/code/struct.lisp
msgid "Class not yet defined: ~S"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/sysmacs.lisp
msgid "Register the feature as having influenced the CMUCL build process."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/sysmacs.lisp
msgid ""
"Register the feature as having influenced the CMUCL build process,\n"
"and also the CMUCL C runtime."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/sysmacs.lisp
msgid ""
"Given any Array, binds Data-Var to the array's data vector and Start-Var "
"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"
"  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 ""

rtoy's avatar
rtoy committed
#: src/code/sysmacs.lisp
msgid "Executes the forms in the body without doing a garbage collection."
msgstr ""

rtoy's avatar
rtoy committed
#: 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 ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid ""
"Sets the 24 bits of data in the header of object X (which must be an\n"
"  other-pointer object) to VAL."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid ""
"Returns the length of the closure X.  This is one more than the number\n"
"  of variables closed over."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid "Returns the three-bit lowtag for the object X."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid "Returns the 8-bit header type for the object X."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid ""
"Return a System-Area-Pointer pointing to the data for the vector X, which\n"
"  must be simple."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid "Return a System-Area-Pointer pointing to the end of the binding stack."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid ""
"Returns a System-Area-Pointer pointing to the next free work of the current\n"
"  dynamic space."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid "Return a System-Area-Pointer pointing to the end of the control stack."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid "Return the header typecode for FUNCTION.  Can be set with SETF."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid "Extracts the arglist from the function header FUNC."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid "Extracts the name from the function header FUNC."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid "Extracts the type from the function header FUNC."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid "Extracts the function from CLOSURE."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid ""
"Return the length of VECTOR.  There is no reason to use this, 'cause\n"
"  (length (the vector foo)) is the same."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid "Return the SXHASH for the simple-string STRING."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid ""
"Return the SXHASH for the first LENGTH characters of the simple-string\n"
"  STRING."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid "Extract the INDEXth slot from CLOSURE."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid ""
"Allocate a unboxed, simple vector with type code TYPE, length LENGTH, and\n"
"  WORDS words long.  Note: it is your responsibility to assure that the\n"
"  relation between LENGTH and WORDS is correct."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid "Allocate an array header with type code TYPE and rank RANK."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid "Return a SAP pointing to the instructions part of CODE-OBJ."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/kernel.lisp
msgid ""
"Extract the INDEXth element from the header of CODE-OBJ.  Can be set with\n"
"  setf."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/format.lisp src/code/print.lisp src/code/irrat-dd.lisp
#: src/code/irrat.lisp src/code/float.lisp src/code/numbers.lisp
#: src/code/kernel.lisp
msgid "Argument ~A is not a ~S: ~S."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"Holds a list of symbols that describe features provided by the\n"
"   implementation."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Features affecting the runtime"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "The fixnum closest in value to positive infinity."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "The fixnum closest in value to negative infinity."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"When (typep condition *break-on-signals*) is true, then calls to SIGNAL "
"will\n"
"   enter the debugger prior to signalling that condition."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"Invokes the signal facility on a condition formed from datum and arguments.\n"
"   If the condition is not handled, nil is returned.  If\n"
"   (TYPEP condition *BREAK-ON-SIGNALS*) is true, the debugger is invoked "
"before\n"
"   any signalling is done."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "~A~%Break entered because of *break-on-signals* (now NIL.)"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Ignore the additional arguments."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"You may not supply additional arguments ~\n"
"				     when giving ~S to ~S."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Bad argument to ~S: ~S"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
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 ""

rtoy's avatar
rtoy committed
#: src/pcl/dfun.lisp src/code/interr.lisp src/code/lispinit.lisp
rtoy's avatar
rtoy committed
#: src/pcl/dfun.lisp src/code/interr.lisp src/code/lispinit.lisp
msgid " nested errors.  "
msgstr ""

rtoy's avatar
rtoy committed
#: src/pcl/dfun.lisp src/code/interr.lisp src/code/lispinit.lisp
msgid "KERNEL:*MAXIMUM-ERROR-DEPTH* exceeded."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"Prints a message and invokes the debugger without allowing any possibility\n"
"   of condition handling occurring."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Return from BREAK."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"Warns about a situation by signalling a condition formed by datum and\n"
"   arguments.  While the condition is being signaled, a muffle-warning "
"restart\n"
"   exists that causes WARN to immediately return nil."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "a warning condition"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Skip warning."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "~&~@<Warning:  ~3i~:_~A~:>~%"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"Invokes the signal facility on a condition formed from datum and arguments.\n"
"   If the condition is not handled, the debugger is invoked.  This function\n"
"   is just like error, except that the condition type defaults to the type\n"
"   simple-program-error, instead of program-error."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Gives the world a shove and hopes it spins."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Functions to be invoked during cleanup at Lisp exit."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"Terminates the current Lisp.  Things are cleaned up unless Recklessly-P is\n"
"  non-Nil."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"This function causes execution to be suspended for N seconds.  N may\n"
"  be any non-negative, non-complex number."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"Zero the unused portion of the control stack so that old objects are not\n"
"   kept alive because of uninitialized stack variables."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"Holds a list of all the values returned by the most recent top-level EVAL."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Gets the previous value of / when a new value is computed."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Gets the previous value of // when a new value is computed."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Holds the value of the most recent top-level EVAL."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Gets the previous value of * when a new value is computed."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Gets the previous value of ** when a new value is computed."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Holds the value of the most recent top-level READ."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Gets the previous value of + when a new value is read."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Gets the previous value of ++ when a new value is read."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Holds the form curently being evaluated."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"The top-level prompt string.  This also may be a function of no arguments\n"
"   that returns a simple-string."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
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 ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"Evaluate FORM, returning whatever it returns but adjust ***, **, *, +++, ++,"
"\n"
"  +, ///, //, /, and -."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Go on with * set to NIL."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "EVAL returned an unbound marker."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"How many pages to reserve from the total heap space so we can handle\n"
"heap overflow."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Top-level READ-EVAL-PRINT loop.  Do not call this."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid ""
"~&Received EOF on *standard-input*, ~\n"
"					switching to *terminal-io*.~%"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "~&Received more than ~D EOFs; Aborting.~%"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "~&Received EOF.~%"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/lispinit.lisp
msgid "Return to Top-Level."
msgstr ""

#: src/pcl/walk.lisp
msgid ""
"~@<The evaluator was called to evaluate a form in a macroexpansion ~\n"
"          environment constructed by the PCL portable code walker.  These ~\n"
"          environments are only useful for macroexpansion, they cannot be ~\n"
"          used for evaluation.  ~\n"
"          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 ""

rtoy's avatar
rtoy committed
#: src/pcl/walk.lisp
msgid "~@<~S is not a recognized variable declaration.~@:>"
msgstr ""

rtoy's avatar
rtoy committed
#: src/pcl/walk.lisp
msgid "~@<Can't get template for ~S.~@:>"
msgstr ""

rtoy's avatar
rtoy committed
#: 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.~@:>"
msgstr ""

rtoy's avatar
rtoy committed
#: src/pcl/walk.lisp
msgid ""
"~@<While handling repeat: ~\n"
"                     Ran into stop while still in repeat template.~@:>"
msgstr ""

rtoy's avatar
rtoy committed
#: src/pcl/walk.lisp
msgid ""
"~@<Encountered declare ~S in a place where a ~\n"
"         declare was not expected.~@:>"
msgstr ""

rtoy's avatar
rtoy committed
#: src/pcl/walk.lisp
msgid "~@<Can't understand something in the arglist ~S.~@:>"
msgstr ""

rtoy's avatar
rtoy committed
#: src/pcl/walk.lisp
msgid ""
"~@<In the form ~S: ~\n"
"                       IF only accepts three arguments, you are using ~D. ~\n"
"                       It is true that some Common Lisps support this, but "
"~\n"
"                       it is not truly legal Common Lisp.  For now, this "
"code ~\n"
"                       walker is interpreting the extra arguments as extra "
"else clauses. ~\n"
"                       Even if this is what you intended, you should fix "
"your source code.~@:>"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid ""
"A funcallable instance used to implement fwrappers.\n"
"   The CONSTRUCTOR slot is a function defined with DEFINE-FWRAPPER.\n"
"   This function returns an instance closure closing over an \n"
"   fwrapper object, which is installed as the funcallable-instance\n"
"   function of the fwrapper object."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid "Print-function for struct FWRAPPER."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid "Return FUN if it is an fwrapper or nil if it isn't."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid ""
"Evaluate BODY with VAR bound to consecutive fwrappers of\n"
"   FDEFN.  Return RESULT at the end."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid "Return tha last encapsulation of FDEFN or NIL if none."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid ""
"Prepend encapsulation F to the definition of FUNCTION-NAME.\n"
"   Signal an error if FUNCTION-NAME is an undefined function."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid "Remove fwrapper F from the definition of FUNCTION-NAME."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid ""
"Return a list of all fwrappers of FUNCTION-NAME, ordered\n"
"   from outermost to innermost."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid ""
"Set FUNCTION-NAMES's fwrappers to elements of the list\n"
"   FWRAPPERS, which is assumed to be ordered from outermost to\n"
"   innermost.  FWRAPPERS null means remove all fwrappers."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid ""
"Wrap the function named FUNCTION-NAME in an fwrapper of type TYPE,\n"
"   created by calling CONSTRUCTOR.  CONSTRUCTOR is a function\n"
"   defined with DEFINE-FWRAPPER, or the name of such a function.\n"
"   Return the fwrapper created.  USER-DATA is arbitrary data to be\n"
"   associated with the fwrapper.  It is accessible in wrapper\n"
"   functions defined with DEFINE-FWRAPPER as (FWRAPPER-USER-DATA\n"
"   FWRAPPER)."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid ""
"Remove fwrappers from the function named FUNCTION-NAME.\n"
"   If TYPE is supplied, remove fwrappers whose type is equal to TYPE.\n"
"   If TEST is supplied, remove fwrappers satisfying TEST.\n"
"   If both are not specified, remove all fwrappers."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid ""
"Update the funcallable instance function of fwrapper F from its\n"
"   constructor."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid ""
"Update fwrapper function definitions of FUNCTION-NAME.\n"
"   If TYPE is supplied, update fwrappers whose type is equal to TYPE.\n"
"   If TEST is supplied, update fwrappers satisfying TEST."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid ""
"Find an fwrapper of FUNCTION-NAME.\n"
"   If TYPE is supplied, find an fwrapper whose type is equal to TYPE.\n"
"   If TEST is supplied, find an fwrapper satisfying TEST."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid ""
"Like DEFUN, but define a function wrapper.\n"
"   In BODY, the symbol FWRAPPERS:FWRAPPERS refers to the currently\n"
"   executing fwrapper.  FWRAPPERS:CALL-NEXT-FUNCTION can be used\n"
"   in BODY to call the next fwrapper or the primary function.  When\n"
"   called with no arguments, CALL-NEXT-FUNCTION invokes the next\n"
"   function with the original args to the fwrapper, otherwise it\n"
"   invokes the next function with the supplied args."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid "Return the expansion of a DEFINE-FWRAPPER."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid ""
"First value is true if BODY refers to any of the variables in\n"
"     OPTIONALS, KEYS or REST, which are what KERNEL:PARSE-LAMBDA-LIST\n"
"     returns.  Second value is true if BODY refers to REST."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid "&MORE not supported in fwrapper lambda lists"
msgstr ""

#: src/code/fwrappers.lisp
msgid "Fwrapper for old-style encapsulations."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fwrappers.lisp
msgid "This function is deprecated; use fwrappers instead."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fdefinition.lisp
msgid ""
"Define (NAME ...) to be a valid function name whose syntax is checked\n"
"  by BODY.  In BODY, VAR is bound to an actual function name of the\n"
"  form (NAME ...) to check.  BODY should return two values.\n"
"  First value true means the function name is valid.  Second value\n"
"  is the name, a symbol, of the function for use in the BLOCK of DEFUNs\n"
"  and in similar situations."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fdefinition.lisp
msgid ""
"First value is true if NAME has valid function name syntax.\n"
"  Second value is the name, a symbol, to use as a block name in DEFUNs\n"
"  and in similar situations."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fdefinition.lisp
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 ""

rtoy's avatar
rtoy committed
#: src/code/fdefinition.lisp
msgid "Invalid function name: ~S"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fdefinition.lisp
msgid ""
"Return the FDEFN of NAME.  Signal an error if there is none\n"
"   or if it's function is null."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fdefinition.lisp
msgid ""
"Returns the definition for name, including any encapsulations.  Settable\n"
"   with SETF."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fdefinition.lisp
msgid ""
"Return FUNCTION-NAME's global function definition.\n"
"   If FUNCTION-NAME is fwrapped, return the primary function definition\n"
"   stored in the innermost fwrapper."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fdefinition.lisp
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 ""

rtoy's avatar
rtoy committed
#: src/code/fdefinition.lisp
msgid ""
"Set FUNCTION-NAME's global function definition to NEW-VALUE.\n"
"   If FUNCTION-NAME is fwrapped, set the primary function stored\n"
"   in the innermost fwrapper."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fdefinition.lisp
msgid "Return true if name has a global function definition."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/fdefinition.lisp
msgid "Make Name have no global function definition."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "&rest keyword is ~:[missing~;misplaced~]."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"Return a list of all the currently active restarts ordered from most\n"
"   recently established to less recently established.  If Condition is\n"
"   specified, then only restarts associated with Condition (or with no\n"
"   condition) will be returned."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Returns the name of the given restart object."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
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"
"   This allows FIND-RESTART, etc., to recognize restarts that are not "
"related\n"
"   to the error currently being debugged.  See also RESTART-CASE."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"Executes forms in a dynamic context where the given restart bindings are\n"
"   in effect.  Users probably want to use RESTART-CASE.  When clauses "
"contain\n"
"   the same restart name, FIND-RESTART will find the first such clause."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Unnamed restart does not have a ~\n"
"					report function -- ~S"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"Returns the first restart named name.  If name is a restart, it is returned\n"
"   if it is currently active.  If no such restart is found, nil is "
"returned.\n"
"   It is an error to supply nil as a name.  If Condition is specified and "
"not\n"
"   NIL, then only restarts associated with that condition (or with no\n"
"   condition) will be returned."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"Calls the function associated with the given restart, passing any given\n"
"   arguments.  If the argument restart is not a restart or a currently "
"active\n"
"   non-nil restart name, then a control-error is signalled."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Restart ~S is not active."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
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."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"(RESTART-CASE form\n"
"   {(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"
"   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 "
"(or\n"
"   macroexpands into such) then the signalled condition will be associated "
"with\n"
"   the new restarts."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"(WITH-SIMPLE-RESTART (restart-name format-string format-arguments)\n"
"   body)\n"
"   If restart-name is not invoked, then all values returned by forms are\n"
"   returned.  If control is transferred to this restart, it immediately\n"
"   returns the values nil and t."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Condition ~S was signalled."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "No REPORT?  Shouldn't happen!"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Condition slot is not bound: ~S"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Slot ~S of ~S missing."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Make an instance of a condition object using the specified initargs."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "~S is not a condition class."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Bad thing for class arg:~%  ~S"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Condition already names a declaration: ~S."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"DEFINE-CONDITION Name (Parent-Type*) (Slot-Spec*) Option*\n"
"   Define NAME as a condition type.  This new type inherits slots and its\n"
"   report function from the specified PARENT-TYPEs.  A slot spec is either\n"
"   a symbol denoting the name of the slot, or a list of the form:\n"
"\n"
"     (slot-name {slot-option value}*)\n"
"\n"
"   where slot-option is one of :READER, :WRITER, :ACCESSOR, :ALLOCATION,\n"
"   :INITARG, :INITFORM, :DOCUMENTATION, and :TYPE.\n"
"\n"
"   Each overall option is of the form\n"
"\n"
"     (option-name {value}*)\n"
"\n"
"   where option-name is one of :DEFAULT-INITARGS, :DOCUMENTATION,\n"
"   and :REPORT.\n"
"\n"
"   The :REPORT option is peculiar to DEFINE-CONDITION.  Its argument is "
"either\n"
"   a string or a two-argument lambda or function name.  If a function, the\n"
"   function is called with the condition and stream to report the "
"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"
"   CLtL2) are neither STANDARD-OBJECTs nor STRUCTURE-OBJECTs.  WITH-SLOTS "
"and\n"
"   SLOT-VALUE may not be used on condition objects."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Keyword slot name indicates probable syntax error:~%  ~S"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Malformed condition slot spec:~%  ~S."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "More than one :INITFORM in:~%  ~S"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "More than one slot :DOCUMENTATION in~%  ~s"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Slot :DOCUMENTATION is not a string in~%  ~s"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Unknown slot option:~%  ~S"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Bad option:~%  ~S"
msgstr ""

rtoy's avatar
rtoy committed
#: src/compiler/new-assem.lisp src/code/error.lisp
msgid "Unknown option: ~S"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"(HANDLER-BIND ( {(type handler)}* )  body)\n"
"   Executes body in a dynamic context where the given handler bindings are\n"
"   in effect.  Each handler must take the condition being signalled as an\n"
"   argument.  The bindings are searched first to last in the event of a\n"
"   signalled condition."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Ill-formed handler bindings."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "~&~@<Error in function ~S:  ~3i~:_~?~:>"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Control stack overflow"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Heap (dynamic space) overflow"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "~@<Type-error in ~S:  ~3i~:_~S is not of type ~S~:>"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"Layout-invalid error in ~S:~@\n"
"		     Type test of class ~S was passed obsolete instance:~%  ~S"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "~@<~S fell through ~S expression.  ~:_Wanted one of ~:S.~:>"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "End-of-File on ~S"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "~&~@<File-error in function ~S:  ~3i~:_~?~:>"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Error in ~S:  the variable ~S is unbound."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Error in ~S:  the function ~S is undefined."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"~@<Destructive function ~S called on ~\n"
"                         constant data.~@:>"
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Arithmetic error ~S signalled."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "~%Operation was ~S, operands ~S."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"(HANDLER-CASE form\n"
"   { (type ([var]) body) }* )\n"
"   Executes form in a context with handlers established for the condition\n"
"   types.  A peculiar property allows type to be :no-error.  If such a "
"clause\n"
"   occurs, and form returns normally, all its values are passed to this "
"clause\n"
"   as if by MULTIPLE-VALUE-CALL.  The :no-error clause accepts more than "
"one\n"
"   var specification."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"Executes forms after establishing a handler for all error conditions that\n"
"   returns from this form nil and the condition signalled."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid "Found an \"abort\" restart that failed to transfer control dynamically."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"Transfers control to a restart named abort, signalling a control-error if\n"
"   none exists."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"Transfers control to a restart named muffle-warning, signalling a\n"
"   control-error if none exists."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"Transfer control to a restart named continue, returning nil if none exists."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"Transfer control and value to a restart named store-value, returning nil if\n"
"   none exists."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/error.lisp
msgid ""
"Transfer control and value to a restart named use-value, returning nil if\n"
"   none exists."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/typedefs.lisp
msgid "Forms that must happen before top level forms are run."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/typedefs.lisp
msgid "Can't cold-load-init other forms along with an eval-when."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/typedefs.lisp
msgid "~S is not a defined type class."
msgstr ""

rtoy's avatar
rtoy committed
#: src/code/typedefs.lisp
msgid "Missing type method for ~S"
msgstr ""