cmucl.pot 570 KB
Newer Older
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
#@ 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
18
19
#: src/code/struct.lisp
msgid "The size of a stream in-buffer."
20
21
msgstr ""

rtoy's avatar
rtoy committed
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
#: 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
47
48
49
msgid "Class not yet defined: ~S"
msgstr ""

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

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

rtoy's avatar
rtoy committed
60
#: src/code/sysmacs.lisp
61
62
63
64
65
66
67
68
69
70
71
72
73
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
74
#: src/code/sysmacs.lisp
75
76
77
msgid "Executes the forms in the body without doing a garbage collection."
msgstr ""

rtoy's avatar
rtoy committed
78
#: src/code/kernel.lisp
79
80
81
82
83
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
84
#: src/code/kernel.lisp
85
86
87
88
89
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
90
#: src/code/kernel.lisp
91
92
93
94
95
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
96
#: src/code/kernel.lisp
97
98
99
msgid "Returns the three-bit lowtag for the object X."
msgstr ""

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

rtoy's avatar
rtoy committed
104
#: src/code/kernel.lisp
105
106
107
108
109
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
110
#: src/code/kernel.lisp
111
112
113
msgid "Return a System-Area-Pointer pointing to the end of the binding stack."
msgstr ""

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

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

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

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

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

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

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

rtoy's avatar
rtoy committed
144
#: src/code/kernel.lisp
145
146
147
148
149
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
150
#: src/code/kernel.lisp
151
152
153
msgid "Return the SXHASH for the simple-string STRING."
msgstr ""

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

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

rtoy's avatar
rtoy committed
164
#: src/code/kernel.lisp
165
166
167
168
169
170
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
171
#: src/code/kernel.lisp
172
173
174
msgid "Allocate an array header with type code TYPE and rank RANK."
msgstr ""

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

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

rtoy's avatar
rtoy committed
185
186
187
#: 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
188
189
190
msgid "Argument ~A is not a ~S: ~S."
msgstr ""

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

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

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

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

rtoy's avatar
rtoy committed
209
#: src/code/lispinit.lisp
210
211
212
213
214
215
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
216
#: src/code/lispinit.lisp
217
218
219
220
221
222
223
224
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
225
#: src/code/lispinit.lisp
226
227
228
msgid "~A~%Break entered because of *break-on-signals* (now NIL.)"
msgstr ""

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

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

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

rtoy's avatar
rtoy committed
243
#: src/code/lispinit.lisp
244
245
246
247
248
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
249
#: src/pcl/dfun.lisp src/code/interr.lisp src/code/lispinit.lisp
250
251
252
msgid "Help! "
msgstr ""

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

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

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

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

rtoy's avatar
rtoy committed
271
#: src/code/lispinit.lisp
272
273
274
275
276
277
278
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
279
#: src/code/lispinit.lisp
280
281
282
msgid "a warning condition"
msgstr ""

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

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

rtoy's avatar
rtoy committed
291
#: src/code/lispinit.lisp
292
293
294
295
296
297
298
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
299
#: src/code/lispinit.lisp
300
301
302
msgid "Gives the world a shove and hopes it spins."
msgstr ""

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

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

rtoy's avatar
rtoy committed
313
#: src/code/lispinit.lisp
314
315
316
317
318
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
319
#: src/code/lispinit.lisp
320
321
322
323
324
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
325
#: src/code/lispinit.lisp
326
327
328
329
msgid ""
"Holds a list of all the values returned by the most recent top-level EVAL."
msgstr ""

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

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

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

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

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

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

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

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

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

rtoy's avatar
rtoy committed
366
#: src/code/lispinit.lisp
367
368
369
370
371
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
372
#: src/code/lispinit.lisp
373
374
375
376
377
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
378
#: src/code/lispinit.lisp
379
380
381
382
383
384
msgid ""
"Evaluate FORM, returning whatever it returns but adjust ***, **, *, +++, ++,"
"\n"
"  +, ///, //, /, and -."
msgstr ""

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

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

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

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

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

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

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

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

#: src/pcl/walk.lisp
422
423
424
425
426
427
428
429
430
431
432
433
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
434
#: src/pcl/walk.lisp
435
436
437
msgid "~@<~S is not a recognized variable declaration.~@:>"
msgstr ""

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

rtoy's avatar
rtoy committed
442
#: src/pcl/walk.lisp
443
444
445
446
447
448
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
449
#: src/pcl/walk.lisp
450
451
452
453
454
msgid ""
"~@<While handling repeat: ~\n"
"                     Ran into stop while still in repeat template.~@:>"
msgstr ""

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

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

rtoy's avatar
rtoy committed
465
#: src/pcl/walk.lisp
466
467
468
469
470
471
472
473
474
475
476
477
478
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
479
#: src/code/fwrappers.lisp
480
481
482
483
484
485
486
487
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
488
#: src/code/fwrappers.lisp
489
490
491
msgid "Print-function for struct FWRAPPER."
msgstr ""

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

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

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

rtoy's avatar
rtoy committed
506
#: src/code/fwrappers.lisp
507
508
509
510
511
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
512
#: src/code/fwrappers.lisp
513
514
515
msgid "Remove fwrapper F from the definition of FUNCTION-NAME."
msgstr ""

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

rtoy's avatar
rtoy committed
522
#: src/code/fwrappers.lisp
523
524
525
526
527
528
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
529
#: src/code/fwrappers.lisp
530
531
532
533
534
535
536
537
538
539
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
540
#: src/code/fwrappers.lisp
541
542
543
544
545
546
547
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
548
#: src/code/fwrappers.lisp
549
550
551
552
553
msgid ""
"Update the funcallable instance function of fwrapper F from its\n"
"   constructor."
msgstr ""

rtoy's avatar
rtoy committed
554
#: src/code/fwrappers.lisp
555
556
557
558
559
560
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
561
#: src/code/fwrappers.lisp
562
563
564
565
566
567
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
568
#: src/code/fwrappers.lisp
569
570
571
572
573
574
575
576
577
578
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
579
#: src/code/fwrappers.lisp
580
581
582
msgid "Return the expansion of a DEFINE-FWRAPPER."
msgstr ""

rtoy's avatar
rtoy committed
583
#: src/code/fwrappers.lisp
584
585
586
587
588
589
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
590
591
592
593
594
#: src/code/fwrappers.lisp
msgid "&MORE not supported in fwrapper lambda lists"
msgstr ""

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

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

rtoy's avatar
rtoy committed
602
#: src/code/fdefinition.lisp
603
604
605
606
607
608
609
610
611
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
612
#: src/code/fdefinition.lisp
613
614
615
616
617
618
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
619
#: src/code/fdefinition.lisp
620
621
622
623
624
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
625
#: src/code/fdefinition.lisp
626
627
628
msgid "Invalid function name: ~S"
msgstr ""

rtoy's avatar
rtoy committed
629
#: src/code/fdefinition.lisp
630
631
632
633
634
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
635
#: src/code/fdefinition.lisp
636
637
638
639
640
msgid ""
"Returns the definition for name, including any encapsulations.  Settable\n"
"   with SETF."
msgstr ""

rtoy's avatar
rtoy committed
641
#: src/code/fdefinition.lisp
642
643
644
645
646
647
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
648
#: src/code/fdefinition.lisp
649
650
651
652
653
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
654
#: src/code/fdefinition.lisp
655
656
657
658
659
660
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
661
#: src/code/fdefinition.lisp
662
663
664
msgid "Return true if name has a global function definition."
msgstr ""

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

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

rtoy's avatar
rtoy committed
673
#: src/code/error.lisp
674
675
676
677
678
679
680
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
681
#: src/code/error.lisp
682
683
684
msgid "Returns the name of the given restart object."
msgstr ""

rtoy's avatar
rtoy committed
685
#: src/code/error.lisp
686
687
688
689
690
691
692
693
694
695
696
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
697
#: src/code/error.lisp
698
699
700
701
702
703
704
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
705
#: src/code/error.lisp
706
707
708
709
msgid "Unnamed restart does not have a ~\n"
"					report function -- ~S"
msgstr ""

rtoy's avatar
rtoy committed
710
#: src/code/error.lisp
711
712
713
714
715
716
717
718
719
720
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
721
#: src/code/error.lisp
722
723
724
725
726
727
728
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
729
#: src/code/error.lisp
730
731
732
msgid "Restart ~S is not active."
msgstr ""

rtoy's avatar
rtoy committed
733
#: src/code/error.lisp
734
735
736
737
738
739
740
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
741
#: src/code/error.lisp
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
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
758
#: src/code/error.lisp
759
760
761
762
763
764
765
766
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
767
#: src/code/error.lisp
768
769
770
msgid "Condition ~S was signalled."
msgstr ""

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

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

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

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

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

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

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

rtoy's avatar
rtoy committed
799
#: src/code/error.lisp
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
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
832
#: src/code/error.lisp
833
834
835
msgid "Keyword slot name indicates probable syntax error:~%  ~S"
msgstr ""

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

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

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

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

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

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

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

rtoy's avatar
rtoy committed
864
#: src/code/error.lisp
865
866
867
868
869
870
871
872
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
873
#: src/code/error.lisp
874
875
876
msgid "Ill-formed handler bindings."
msgstr ""

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

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

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

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

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

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

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

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

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

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

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

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

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

rtoy's avatar
rtoy committed
933
#: src/code/error.lisp
934
935
936
937
938
939
940
941
942
943
944
945
946
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
947
#: src/code/error.lisp
948
949
950
951
952
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
953
#: src/code/error.lisp
954
955
956
msgid "Found an \"abort\" restart that failed to transfer control dynamically."
msgstr ""

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

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

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

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

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

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

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

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

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

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

rtoy's avatar
rtoy committed
1006
#: src/code/typedefs.lisp
1007
1008
1009
msgid "DEFINE-TYPE-METHOD (Class-Name Method-Name+) Lambda-List Form*"
msgstr ""

rtoy's avatar
rtoy committed
1010
#: src/code/typedefs.lisp
1011
1012
1013
msgid "DEFINE-TYPE-CLASS Name [Inherits]"
msgstr ""

rtoy's avatar
rtoy committed
1014
#: src/code/class.lisp
1015
1016
1017
msgid "Layout for ~S~@[, Invalid=~S~]"
msgstr ""

rtoy's avatar
rtoy committed
1018
#: src/code/class.lisp
1019
1020
1021
msgid "The inclusive upper bound on LAYOUT-HASH values."
msgstr ""

rtoy's avatar
rtoy committed
1022
#: src/code/class.lisp
1023
1024
1025
1026
msgid "Layout depth conflict: ~S~%  ~\n"
"		        (~S collides at ~S with ~S)~%"
msgstr ""

rtoy's avatar
rtoy committed
1027
#: src/code/class.lisp
1028
1029
1030
msgid "Can't use anonymous or undefined class as constant:~%  ~S"
msgstr ""

rtoy's avatar
rtoy committed
1031
#: src/code/class.lisp
1032
1033
1034
msgid "~:[<anonymous>~;~:*~S~]~@[ (~(~A~))~]"
msgstr ""

rtoy's avatar
rtoy committed
1035
#: src/code/class.lisp
1036
1037
1038
1039
1040
msgid ""
"Return the class with the specified Name.  If ERRORP is false, then NIL is\n"
"   returned when no such class exists."
msgstr ""

rtoy's avatar
rtoy committed
1041
#: src/code/class.lisp
1042
1043
1044
msgid "Class not yet defined:~%  ~S"
msgstr ""

rtoy's avatar
rtoy committed
1045
#: src/code/class.lisp
1046
1047
1048
msgid "Illegal to redefine standard type ~S."
msgstr ""

rtoy's avatar
rtoy committed
1049
#: src/code/class.lisp
1050
1051
1052
msgid "Changing meta-class of ~S from ~S to ~S."
msgstr ""

rtoy's avatar
rtoy committed
1053
#: src/code/class.lisp
1054
1055
1056
msgid "Redefining DEFTYPE type to be a class: ~S."
msgstr ""

rtoy's avatar
rtoy committed
1057
#: src/code/class.lisp
1058
1059
1060
1061
1062
msgid ""
"Return the class of the supplied object, which may be any Lisp object, not\n"
"   just a CLOS STANDARD-OBJECT."
msgstr ""

rtoy's avatar
rtoy committed
1063
#: src/code/class.lisp
1064
1065
1066
msgid "Modifing ~(~A~) class ~S; making it writable."
msgstr ""

rtoy's avatar
rtoy committed
1067
#: src/code/class.lisp
1068
1069
1070
msgid "Subclassing sealed class ~S; unsealing it."
msgstr ""

rtoy's avatar
rtoy committed
1071
#: src/code/class.lisp
1072
msgid ""
rtoy's avatar
rtoy committed
1073
1074
"Change in the inheritance structure of class ~S~%  ~\n"
"		 between the ~A definition and the ~A definition."
1075
1076
msgstr ""

rtoy's avatar
rtoy committed
1077
#: src/code/class.lisp
1078
1079
1080
1081
1082
1083
msgid ""
"Change in instance length of class ~S:~%  ~\n"
"		   ~A length: ~D~%  ~\n"
"		   ~A length: ~D"
msgstr ""

rtoy's avatar
rtoy committed
1084
#: src/code/class.lisp
1085
msgid ""
rtoy's avatar
rtoy committed
1086
1087
1088
1089
1090
1091
1092
1093
1094
1095
"In class ~S:~%  ~\n"
"		    ~:(~A~) definition of superclass ~S incompatible with~%  ~\n"
"		    ~A definition."
msgstr ""

#: src/code/class.lisp
msgid ""
"Change in superclasses of class ~S:~%  ~\n"
"		  ~A superclasses: ~S~%  ~\n"
"		  ~A superclasses: ~S"
1096
1097
msgstr ""

rtoy's avatar
rtoy committed
1098
#: src/code/class.lisp
1099
1100
1101
1102
1103
1104
msgid ""
"Loading a reference to class ~S when the compile~\n"
"		       ~%  time definition was incompatible with the current ~\n"
"		       one."
msgstr ""

rtoy's avatar
rtoy committed
1105
#: src/code/class.lisp
1106
1107
1108
msgid "Invalidate current definition."
msgstr ""

rtoy's avatar
rtoy committed
1109
1110
#: src/code/class.lisp
msgid "Smash current layout, preserving old code."
1111
1112
msgstr ""

rtoy's avatar
rtoy committed
1113
1114
1115
1116
1117
1118
#: src/code/class.lisp
msgid "Ignore the incompatibility, leave class alone."
msgstr ""

#: src/code/class.lisp
msgid "New definition of ~S must be loaded eventually."
1119
1120
msgstr ""

rtoy's avatar
rtoy committed
1121
#: src/code/class.lisp
1122
1123
1124
1125
1126
msgid ""
"Any old ~S instances will be in a bad way.~@\n"
"		      I hope you know what you're doing..."
msgstr ""

rtoy's avatar
rtoy committed
1127
#: src/code/class.lisp
1128
1129
1130
1131
1132
1133
msgid ""
"Assuming the current definition of ~S is correct, and~@\n"
"		      that the loaded code doesn't care about the ~\n"
"		      incompatibility."
msgstr ""

rtoy's avatar
rtoy committed
1134
#: src/code/class.lisp
1135
1136
1137
msgid "Topological sort failed due to constraint on ~S."
msgstr ""

rtoy's avatar
rtoy committed
1138
#: src/code/class.lisp
1139
1140
1141
msgid "Something strange with forward layout for ~S:~%  ~S"
msgstr ""

rtoy's avatar
rtoy committed
1142
#: src/code/type.lisp
1143
1144
1145
1146
1147
1148
1149
1150
1151
1152
1153
msgid ""
"*Use-Implementation-Types* is a semi-public flag which determines how\n"
"   restrictive we are in determining type membership.  If two types are the\n"
"   same in the implementation, then we will consider them them the same "
"when\n"
"   this switch is on.  When it is off, we try to be as restrictive as the\n"
"   language allows, allowing us to detect more errors.  Currently, this "
"only\n"
"   affects array types."
msgstr ""

rtoy's avatar
rtoy committed
1154
#: src/code/type.lisp
1155
1156
1157
msgid "Subtypep is illegal on this type:~%  ~S"
msgstr ""

rtoy's avatar
rtoy committed
1158
#: src/code/type.lisp
1159
1160
1161
msgid "&Aux in a FUNCTION or VALUES type: ~S."
msgstr ""

rtoy's avatar
rtoy committed
1162
#: src/code/type.lisp
1163
1164
1165
msgid "Keyword type description is not a two-list: ~S."
msgstr ""

rtoy's avatar
rtoy committed
1166
#: src/code/type.lisp
1167
1168
1169
msgid "Repeated keyword ~S in lambda list: ~S."
msgstr ""

rtoy's avatar
rtoy committed
1170
#: src/code/type.lisp
1171
1172
1173
1174
1175
msgid ""
"The maximum length of a union of integer types before we take a\n"
"  short cut and return a simpler union."
msgstr ""

rtoy's avatar
rtoy committed
1176
#: src/code/type.lisp
1177
1178
1179
msgid "Bad thing to be a type specifier: ~S."
msgstr ""

rtoy's avatar
rtoy committed
1180
#: src/code/type.lisp
1181
1182
1183
msgid "VALUES type illegal in this context:~%  ~S"
msgstr ""

rtoy's avatar
rtoy committed
1184
1185
1186
1187
1188
1189
1190
1191
1192
1193
1194
1195
1196
1197
1198
1199
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
1222
1223
1224
1225
1226
1227
1228
1229
1230
1231
1232
#: src/code/type.lisp
msgid "Bad N specified for MOD type specifier: ~S."
msgstr ""

#: src/code/type.lisp
msgid "Bad size specified for SIGNED-BYTE type specifier: ~S."
msgstr ""

#: src/code/type.lisp
msgid "Bad size specified for UNSIGNED-BYTE type specifier: ~S."
msgstr ""

#: src/code/type.lisp
msgid "Bad float format: ~S."
msgstr ""

#: src/code/type.lisp
msgid "Arrays can't have a negative number of dimensions: ~D."
msgstr ""

#: src/code/type.lisp
msgid "Array type has too many dimensions: ~S."
msgstr ""

#: src/code/type.lisp
msgid "Bad dimension in array type: ~S."
msgstr ""

#: src/code/type.lisp
msgid "Array dimensions is not a list, integer or *:~%  ~S"
msgstr ""

#: src/code/type.lisp
msgid "Type of characters that aren't base-char's.  None in CMU CL."
msgstr ""

#: src/code/type.lisp
msgid "Type corresponding to the charaters required by the standard."
msgstr ""

#: src/code/type.lisp
msgid "Type for any keyword symbol."
msgstr ""

#: src/code/type.lisp
msgid "&KEY or &ALLOW-OTHER-KEYS in values type: ~s"
msgstr ""

#: src/code/type.lisp
1233
1234
1235
msgid "The SATISFIES predicate name is not a symbol: ~S"
msgstr ""

rtoy's avatar
rtoy committed
1236
#: src/code/type.lisp
1237
1238
1239
msgid "Weird CONS type ~S"
msgstr ""

rtoy's avatar
rtoy committed
1240
#: src/code/type.lisp
1241
1242
1243
msgid "The component type for COMPLEX is not numeric: ~S"
msgstr ""

rtoy's avatar
rtoy committed
1244
#: src/code/type.lisp
1245
1246
1247
msgid "The component type for COMPLEX is not real: ~S"
msgstr ""

rtoy's avatar
rtoy committed
1248
#: src/code/type.lisp
1249
1250
1251
1252
1253
msgid ""
"The component type for COMPLEX (EQL X) ~\n"
"                                    is complex: ~S"
msgstr ""

rtoy's avatar
rtoy committed
1254
#: src/code/type.lisp
1255
1256
1257
1258
1259
msgid ""
"~@<(known bug #145): The type ~S is too hairy to be \n"
"                         used for a COMPLEX component.~:@>"
msgstr ""

rtoy's avatar
rtoy committed
1260
#: src/code/type.lisp
1261
1262
1263
msgid "Bound is not *, a ~A or a list of a ~A: ~S"
msgstr ""

rtoy's avatar
rtoy committed
1264
1265
#: src/compiler/generic/vm-type.lisp
msgid "~S isn't an integer type?"
1266
1267
msgstr ""

rtoy's avatar
rtoy committed
1268
1269
#: src/code/pred.lisp
msgid "Return T if OBJECT is an array-header-p and NIL otherwise."
1270
1271
msgstr ""

rtoy's avatar
rtoy committed
1272
1273
#: src/code/pred.lisp
msgid "Return T if OBJECT is an arrayp and NIL otherwise."
1274
1275
msgstr ""

rtoy's avatar
rtoy committed
1276
1277
#: src/code/pred.lisp
msgid "Return T if OBJECT is an atom and NIL otherwise."
1278
1279
msgstr ""

rtoy's avatar
rtoy committed
1280
1281
#: src/code/pred.lisp
msgid "Return T if OBJECT is a base-char-p and NIL otherwise."
1282
1283
msgstr ""

rtoy's avatar
rtoy committed
1284
1285
#: src/code/pred.lisp
msgid "Return T if OBJECT is a bignump and NIL otherwise."
1286
1287
msgstr ""

rtoy's avatar
rtoy committed
1288
1289
#: src/code/pred.lisp
msgid "Return T if OBJECT is a bit-vector-p and NIL otherwise."
1290
1291
msgstr ""

rtoy's avatar
rtoy committed
1292
1293
#: src/code/pred.lisp
msgid "Return T if OBJECT is a characterp and NIL otherwise."
1294
1295
msgstr ""

rtoy's avatar
rtoy committed
1296
1297
#: src/code/pred.lisp
msgid "Return T if OBJECT is a code-component-p and NIL otherwise."
1298
1299
msgstr ""

rtoy's avatar
rtoy committed
1300
1301
#: src/code/pred.lisp
msgid "Return T if OBJECT is a consp and NIL otherwise."
1302
1303
msgstr ""

rtoy's avatar
rtoy committed
1304
1305
#: src/code/pred.lisp
msgid "Return T if OBJECT is a compiled-function-p and NIL otherwise."
1306
1307
msgstr ""

rtoy's avatar
rtoy committed
1308
1309
1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329
1330
1331
1332
1333
1334
#: src/code/pred.lisp
msgid "Return T if OBJECT is a complexp and NIL otherwise."
msgstr ""

#: src/code/pred.lisp
msgid "Return T if OBJECT is a complex-double-float-p and NIL otherwise."
msgstr ""

#: src/code/pred.lisp
msgid "Return T if OBJECT is a complex-float-p and NIL otherwise."
msgstr ""

#: src/code/pred.lisp
msgid ""
"Return T if OBJECT is a complex-double-double-float-p and NIL otherwise."
msgstr ""

#: src/code/pred.lisp
msgid "Return T if OBJECT is a complex-rational-p and NIL otherwise."
msgstr ""

#: src/code/pred.lisp
msgid "Return T if OBJECT is a complex-single-float-p and NIL otherwise."
msgstr ""

#: src/code/pred.lisp
msgid "Return T if OBJECT is a double-double-float-p and NIL otherwise."
1335
1336
msgstr ""

rtoy's avatar
rtoy committed
1337
1338
1339
1340
1341
1342
1343
1344
1345
1346
1347
1348
1349
1350
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1367
1368
1369
1370
1371
1372
1373
1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395
1396
1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
1411
1412
1413
1414
1415
1416
1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443
1444
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464
1465
1466
1467
1468
1469
1470