cmucl.po 556 KB
Newer Older
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
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
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
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
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
# @ cmucl
# SOME DESCRIPTIVE TITLE
# Copyright (C) 2010
# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR
#
#, fuzzy
msgid ""
msgstr ""
"Project-Id-Version: CMUCL 20b\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"

#: target:code/intl.lisp
msgid ""
"The message-lookup domain used by INTL:GETTEXT and INTL:NGETTEXT.\n"
"  Use (INTL:TEXTDOMAIN \"whatever\") in each source file to set this."
msgstr ""

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

#: target:code/intl.lisp
msgid "Encountered illegal token: ="
msgstr ""

#: target:code/intl.lisp
msgid "Encountered illegal token: ~C"
msgstr ""

#: target:code/intl.lisp
msgid "Expected : in ?: construct"
msgstr ""

#: target:code/intl.lisp
msgid "Expected close-paren."
msgstr ""

#: target:code/intl.lisp
msgid "Unexpected token: ~S."
msgstr ""

#: target:code/intl.lisp
msgid "Expecting end of expression.  ~S."
msgstr ""

#: target:code/intl.lisp
msgid ""
"Look up STRING in the current message domain and return its translation."
msgstr ""

#: target:code/intl.lisp
msgid "Look up the singular or plural form of a message in the current domain."
msgstr ""

#: target:code/intl.lisp
msgid ""
"Look up STRING in the specified message domain and return its translation."
msgstr ""

#: target:code/intl.lisp
msgid ""
"Look up the singular or plural form of a message in the specified domain."
msgstr ""

#: target:code/intl.lisp
msgid "_@ is a reserved reader macro prefix."
msgstr ""

#: target:code/intl.lisp
msgid "~&Dumping ~D messages for domain ~S~%"
msgstr ""

#: target:code/struct.lisp
msgid "The size of a stream in-buffer."
msgstr ""

#: target:code/sysmacs.lisp
msgid "Register the feature as having influenced the CMUCL build process."
msgstr ""

#: target:code/sysmacs.lisp
msgid ""
"Register the feature as having influenced the CMUCL build process,\n"
"and also the CMUCL C runtime."
msgstr ""

#: target: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 "
"operation,\n"
"  and are factored into the bindings of Start-Var and End-Var.  Offset-Var "
"is\n"
"  the cumulative offset of all displacements encountered, and does not\n"
"  include Svalue."
msgstr ""

#: target:code/sysmacs.lisp
msgid "Executes the forms in the body without doing a garbage collection."
msgstr ""

#: target: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 ""

#: target: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 ""

#: target:code/kernel.lisp
msgid ""
"Returns the length of the closure X.  This is one more than the number\n"
"  of variables closed over."
msgstr ""

#: target:code/kernel.lisp
msgid "Returns the three-bit lowtag for the object X."
msgstr ""

#: target:code/kernel.lisp
msgid "Returns the 8-bit header type for the object X."
msgstr ""

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

#: target:code/kernel.lisp
msgid "Return a System-Area-Pointer pointing to the end of the binding stack."
msgstr ""

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

#: target:code/kernel.lisp
msgid "Return a System-Area-Pointer pointing to the end of the control stack."
msgstr ""

#: target:code/kernel.lisp
msgid "Return the header typecode for FUNCTION.  Can be set with SETF."
msgstr ""

#: target:code/kernel.lisp
msgid "Extracts the arglist from the function header FUNC."
msgstr ""

#: target:code/kernel.lisp
msgid "Extracts the name from the function header FUNC."
msgstr ""

#: target:code/kernel.lisp
msgid "Extracts the type from the function header FUNC."
msgstr ""

#: target:code/kernel.lisp
msgid "Extracts the function from CLOSURE."
msgstr ""

#: target: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 ""

#: target:code/kernel.lisp
msgid "Return the SXHASH for the simple-string STRING."
msgstr ""

#: target:code/kernel.lisp
msgid ""
"Return the SXHASH for the first LENGTH characters of the simple-string\n"
"  STRING."
msgstr ""

#: target:code/kernel.lisp
msgid "Extract the INDEXth slot from CLOSURE."
msgstr ""

#: target: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 ""

#: target:code/kernel.lisp
msgid "Allocate an array header with type code TYPE and rank RANK."
msgstr ""

#: target:code/kernel.lisp
msgid "Return a SAP pointing to the instructions part of CODE-OBJ."
msgstr ""

#: target:code/kernel.lisp
msgid ""
"Extract the INDEXth element from the header of CODE-OBJ.  Can be set with\n"
"  setf."
msgstr ""

#: target:code/format.lisp target:code/print.lisp target:code/irrat-dd.lisp
#: target:code/irrat.lisp target:code/float.lisp target:code/numbers.lisp
#: target:code/kernel.lisp
msgid "Argument ~A is not a ~S: ~S."
msgstr ""

#: target:code/lispinit.lisp
msgid ""
"Holds a list of symbols that describe features provided by the\n"
"   implementation."
msgstr ""

#: target:code/lispinit.lisp
msgid "Features affecting the runtime"
msgstr ""

#: target:code/lispinit.lisp
msgid "The fixnum closest in value to positive infinity."
msgstr ""

#: target:code/lispinit.lisp
msgid "The fixnum closest in value to negative infinity."
msgstr ""

#: target: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 ""

#: target: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 ""

#: target:code/lispinit.lisp
msgid "~A~%Break entered because of *break-on-signals* (now NIL.)"
msgstr ""

#: target:code/lispinit.lisp
msgid "Ignore the additional arguments."
msgstr ""

#: target:code/lispinit.lisp
msgid ""
"You may not supply additional arguments ~\n"
"\t\t\t\t     when giving ~S to ~S."
msgstr ""

#: target:code/lispinit.lisp
msgid "Bad argument to ~S: ~S"
msgstr ""

#: target: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 ""

#: target:pcl/dfun.lisp target:code/interr.lisp target:code/lispinit.lisp
msgid "Help! "
msgstr ""

#: target:pcl/dfun.lisp target:code/interr.lisp target:code/lispinit.lisp
msgid " nested errors.  "
msgstr ""

#: target:pcl/dfun.lisp target:code/interr.lisp target:code/lispinit.lisp
msgid "KERNEL:*MAXIMUM-ERROR-DEPTH* exceeded."
msgstr ""

#: target:code/lispinit.lisp
msgid ""
"Prints a message and invokes the debugger without allowing any possibility\n"
"   of condition handling occurring."
msgstr ""

#: target:code/lispinit.lisp
msgid "Return from BREAK."
msgstr ""

#: target: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 ""

#: target:code/lispinit.lisp
msgid "a warning condition"
msgstr ""

#: target:code/lispinit.lisp
msgid "Skip warning."
msgstr ""

#: target:code/lispinit.lisp
msgid "~&~@<Warning:  ~3i~:_~A~:>~%"
msgstr ""

#: target: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 ""

#: target:code/lispinit.lisp
msgid "Gives the world a shove and hopes it spins."
msgstr ""

#: target:code/lispinit.lisp
msgid "Functions to be invoked during cleanup at Lisp exit."
msgstr ""

#: target:code/lispinit.lisp
msgid ""
"Terminates the current Lisp.  Things are cleaned up unless Recklessly-P is\n"
"  non-Nil."
msgstr ""

#: target: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 ""

#: target: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 ""

#: target:code/lispinit.lisp
msgid ""
"Holds a list of all the values returned by the most recent top-level EVAL."
msgstr ""

#: target:code/lispinit.lisp
msgid "Gets the previous value of / when a new value is computed."
msgstr ""

#: target:code/lispinit.lisp
msgid "Gets the previous value of // when a new value is computed."
msgstr ""

#: target:code/lispinit.lisp
msgid "Holds the value of the most recent top-level EVAL."
msgstr ""

#: target:code/lispinit.lisp
msgid "Gets the previous value of * when a new value is computed."
msgstr ""

#: target:code/lispinit.lisp
msgid "Gets the previous value of ** when a new value is computed."
msgstr ""

#: target:code/lispinit.lisp
msgid "Holds the value of the most recent top-level READ."
msgstr ""

#: target:code/lispinit.lisp
msgid "Gets the previous value of + when a new value is read."
msgstr ""

#: target:code/lispinit.lisp
msgid "Gets the previous value of ++ when a new value is read."
msgstr ""

#: target:code/lispinit.lisp
msgid "Holds the form curently being evaluated."
msgstr ""

#: target: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 ""

#: target: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 ""

#: target:code/lispinit.lisp
msgid ""
"Evaluate FORM, returning whatever it returns but adjust ***, **, *, +++, +"
"+,\n"
"  +, ///, //, /, and -."
msgstr ""

#: target:code/lispinit.lisp
msgid "Go on with * set to NIL."
msgstr ""

#: target:code/lispinit.lisp
msgid "EVAL returned an unbound marker."
msgstr ""

#: target:code/lispinit.lisp
msgid ""
"How many pages to reserve from the total heap space so we can handle\n"
"heap overflow."
msgstr ""

#: target:code/lispinit.lisp
msgid "Top-level READ-EVAL-PRINT loop.  Do not call this."
msgstr ""

#: target:code/lispinit.lisp
msgid "Return to Top-Level."
msgstr ""

#: target:code/lispinit.lisp
msgid ""
"~&Received EOF on *standard-input*, ~\n"
"\t\t\t\t\tswitching to *terminal-io*.~%"
msgstr ""

#: target:code/lispinit.lisp
msgid "~&Received more than ~D EOFs; Aborting.~%"
msgstr ""

#: target:code/lispinit.lisp
msgid "~&Received EOF.~%"
msgstr ""

#: target: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 ""

#: target:pcl/walk.lisp
msgid "~@<~S is not a recognized variable declaration.~@:>"
msgstr ""

#: target:pcl/walk.lisp
msgid "~@<Can't get template for ~S.~@:>"
msgstr ""

#: target:pcl/walk.lisp
msgid ""
"~@<~S is a special form, not defined in the CommonLisp ~\n"
"\t\t      manual.  This code walker doesn't know how to walk it.  ~\n"
"\t\t      Define a template for this special form and try again.~@:>"
msgstr ""

#: target:pcl/walk.lisp
msgid ""
"~@<While handling repeat: ~\n"
"                     Ran into stop while still in repeat template.~@:>"
msgstr ""

#: target:pcl/walk.lisp
msgid ""
"~@<Encountered declare ~S in a place where a ~\n"
"         declare was not expected.~@:>"
msgstr ""

#: target:pcl/walk.lisp
msgid "~@<Can't understand something in the arglist ~S.~@:>"
msgstr ""

#: target: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 ""

#: target: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 ""

#: target:code/fwrappers.lisp
msgid "Print-function for struct FWRAPPER."
msgstr ""

#: target:code/fwrappers.lisp
msgid "Return FUN if it is an fwrapper or nil if it isn't."
msgstr ""

#: target:code/fwrappers.lisp
msgid ""
"Evaluate BODY with VAR bound to consecutive fwrappers of\n"
"   FDEFN.  Return RESULT at the end."
msgstr ""

#: target:code/fwrappers.lisp
msgid "Return tha last encapsulation of FDEFN or NIL if none."
msgstr ""

#: target: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 ""

#: target:code/fwrappers.lisp
msgid "Remove fwrapper F from the definition of FUNCTION-NAME."
msgstr ""

#: target:code/fwrappers.lisp
msgid ""
"Return a list of all fwrappers of FUNCTION-NAME, ordered\n"
"   from outermost to innermost."
msgstr ""

#: target: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 ""

#: target: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 ""

#: target: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 ""

#: target:code/fwrappers.lisp
msgid ""
"Update the funcallable instance function of fwrapper F from its\n"
"   constructor."
msgstr ""

#: target: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 ""

#: target: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 ""

#: target: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 ""

#: target:code/fwrappers.lisp
msgid "Return the expansion of a DEFINE-FWRAPPER."
msgstr ""

#: target:code/fwrappers.lisp
msgid "&MORE not supported in fwrapper lambda lists"
msgstr ""

#: target: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 ""

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

#: target:code/fwrappers.lisp
msgid "This function is deprecated; use fwrappers instead."
msgstr ""

#: target: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 ""

#: target: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 ""

#: target: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 ""

#: target:code/fdefinition.lisp
msgid "Invalid function name: ~S"
msgstr ""

#: target: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 ""

#: target:code/fdefinition.lisp
msgid ""
"Returns the definition for name, including any encapsulations.  Settable\n"
"   with SETF."
msgstr ""

#: target: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 ""

#: target: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 ""

#: target: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 ""

#: target:code/fdefinition.lisp
msgid "Return true if name has a global function definition."
msgstr ""

#: target:code/fdefinition.lisp
msgid "Make Name have no global function definition."
msgstr ""

#: target:code/error.lisp
msgid "&rest keyword is ~:[missing~;misplaced~]."
msgstr ""

#: target: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 ""

#: target:code/error.lisp
msgid "Returns the name of the given restart object."
msgstr ""

#: target: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-"
"Form.\n"
"   This allows FIND-RESTART, etc., to recognize restarts that are not "
"related\n"
"   to the error currently being debugged.  See also RESTART-CASE."
msgstr ""

#: target: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 ""

#: target:code/error.lisp
msgid ""
"Unnamed restart does not have a ~\n"
"\t\t\t\t\treport function -- ~S"
msgstr ""

#: target: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 ""

#: target: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 ""

#: target:code/error.lisp
msgid "Restart ~S is not active."
msgstr ""

#: target: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 ""

#: target: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-"
"RESTART).\n"
"   When clauses contain the same case-name, FIND-RESTART will find the "
"first\n"
"   such clause.  If Expression is a call to SIGNAL, ERROR, CERROR or WARN "
"(or\n"
"   macroexpands into such) then the signalled condition will be associated "
"with\n"
"   the new restarts."
msgstr ""

#: target: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 ""

#: target:code/error.lisp
msgid "Condition ~S was signalled."
msgstr ""

#: target:code/error.lisp
msgid "No REPORT?  Shouldn't happen!"
msgstr ""

#: target:code/error.lisp
msgid "Condition slot is not bound: ~S"
msgstr ""

#: target:code/error.lisp
msgid "Slot ~S of ~S missing."
msgstr ""

#: target:code/error.lisp
msgid "Make an instance of a condition object using the specified initargs."
msgstr ""

#: target:code/error.lisp
msgid "~S is not a condition class."
msgstr ""

#: target:code/error.lisp
msgid "Bad thing for class arg:~%  ~S"
msgstr ""

#: target:code/error.lisp
msgid "Condition already names a declaration: ~S."
msgstr ""

#: target: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 ""

#: target:code/error.lisp
msgid "Keyword slot name indicates probable syntax error:~%  ~S"
msgstr ""

#: target:code/error.lisp
msgid "Malformed condition slot spec:~%  ~S."
msgstr ""

#: target:code/error.lisp
msgid "More than one :INITFORM in:~%  ~S"
msgstr ""

#: target:code/error.lisp
msgid "More than one slot :DOCUMENTATION in~%  ~s"
msgstr ""

#: target:code/error.lisp
msgid "Slot :DOCUMENTATION is not a string in~%  ~s"
msgstr ""

#: target:code/error.lisp
msgid "Unknown slot option:~%  ~S"
msgstr ""

#: target:code/error.lisp
msgid "Bad option:~%  ~S"
msgstr ""

#: target:compiler/new-assem.lisp target:code/error.lisp
msgid "Unknown option: ~S"
msgstr ""

#: target: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 ""

#: target:code/error.lisp
msgid "Ill-formed handler bindings."
msgstr ""

#: target:code/error.lisp
msgid "~&~@<Error in function ~S:  ~3i~:_~?~:>"
msgstr ""

#: target:code/error.lisp
msgid "Control stack overflow"
msgstr ""

#: target:code/error.lisp
msgid "Heap (dynamic space) overflow"
msgstr ""

#: target:code/error.lisp
msgid "~@<Type-error in ~S:  ~3i~:_~S is not of type ~S~:>"
msgstr ""

#: target:code/error.lisp
msgid ""
"Layout-invalid error in ~S:~@\n"
"\t\t     Type test of class ~S was passed obsolete instance:~%  ~S"
msgstr ""

#: target:code/error.lisp
msgid "~@<~S fell through ~S expression.  ~:_Wanted one of ~:S.~:>"
msgstr ""

#: target:code/error.lisp
msgid "End-of-File on ~S"
msgstr ""

#: target:code/error.lisp
msgid "~&~@<File-error in function ~S:  ~3i~:_~?~:>"
msgstr ""

#: target:code/error.lisp
msgid "Error in ~S:  the variable ~S is unbound."
msgstr ""

#: target:code/error.lisp
msgid "Error in ~S:  the function ~S is undefined."
msgstr ""

#: target:code/error.lisp
msgid ""
"~@<Destructive function ~S called on ~\n"
"                         constant data.~@:>"
msgstr ""

#: target:code/error.lisp
msgid "Arithmetic error ~S signalled."
msgstr ""

#: target:code/error.lisp
msgid "~%Operation was ~S, operands ~S."
msgstr ""

#: target:code/error.lisp
msgid ""
"(HANDLER-CASE form\n"
"   { (type ([var]) body) }* )\n"
"   Executes form in a context with handlers established for the condition\n"