Raymond Toy pushed to branch branch-21f at cmucl / cmucl

Commits:

5 changed files:

Changes:

  • .gitlab-ci.yml
    ... ... @@ -4,7 +4,7 @@ variables:
    4 4
       download_url: "https://common-lisp.net/project/cmucl/downloads/snapshots/$year/$month"
    
    5 5
       version: "$year-$month-x86"
    
    6 6
       tar_ext: "xz"
    
    7
    -  bootstrap: ""
    
    7
    +  bootstrap: "-B boot-21f"
    
    8 8
     
    
    9 9
     # Default install configuration to download the cmucl tarballs to use
    
    10 10
     # for building.
    
    ... ... @@ -129,6 +129,7 @@ linux:install:
    129 129
         - if: $CI_PIPELINE_SOURCE == "schedule"
    
    130 130
         - if: $CI_PIPELINE_SOURCE == "push"
    
    131 131
         - if: $CI_PIPELINE_SOURCE == "merge_request_event"
    
    132
    +    - if: $CI_PIPELINE_SOURCE == "branch"
    
    132 133
     
    
    133 134
     linux:build:
    
    134 135
       <<: *build_configuration
    

  • src/i18n/locale/en@piglatin/LC_MESSAGES/cmucl-x86-vm.po
    ... ... @@ -109,6 +109,38 @@ msgstr ""
    109 109
     "Readthay afesay ushpay ofway alvay ontoway ethay istlay inway ethay ectorvay "
    
    110 110
     "elementway."
    
    111 111
     
    
    112
    +#: src/code/x86-vm.lisp
    
    113
    +msgid "The bit in the x87 FPU control word that controls the infinity mode."
    
    114
    +msgstr ""
    
    115
    +
    
    116
    +#: src/code/x86-vm.lisp
    
    117
    +msgid "The bits in the x87 FPU control word for the rounding mode."
    
    118
    +msgstr ""
    
    119
    +
    
    120
    +#: src/code/x86-vm.lisp
    
    121
    +msgid "The bits in the x87 FPU contol word for the FP operation precision."
    
    122
    +msgstr ""
    
    123
    +
    
    124
    +#: src/code/x86-vm.lisp
    
    125
    +msgid ""
    
    126
    +"The bits in the x87 FPU control word indicating the exceptions that\n"
    
    127
    +" are enabled."
    
    128
    +msgstr ""
    
    129
    +
    
    130
    +#: src/code/x86-vm.lisp
    
    131
    +msgid ""
    
    132
    +"Alist for the x87 precison control.  The car is the symbolic\n"
    
    133
    +" precision and the cdr is the value for the precision control field."
    
    134
    +msgstr ""
    
    135
    +
    
    136
    +#: src/code/x86-vm.lisp
    
    137
    +msgid "Print SSE2 floating modes word in a human-readable fashion."
    
    138
    +msgstr ""
    
    139
    +
    
    140
    +#: src/code/x86-vm.lisp
    
    141
    +msgid "Print X87 floating modes word in a human-readable fashion."
    
    142
    +msgstr ""
    
    143
    +
    
    112 144
     #: src/code/load.lisp
    
    113 145
     msgid "Top-Level Form"
    
    114 146
     msgstr "Optay-Evellay Ormfay"
    
    ... ... @@ -179,6 +211,23 @@ msgstr "Askmay otay etgay ethay ixnumfay agtay"
    179 211
     msgid "Maximum number of bits in a positive fixnum"
    
    180 212
     msgstr "Aximummay umbernay ofway itsbay inway away ositivepay ixnumfay"
    
    181 213
     
    
    214
    +#: src/compiler/x86/parms.lisp
    
    215
    +msgid ""
    
    216
    +"The bits in the FP mode that hold the accrued exceptions that have\n"
    
    217
    +" occurred since the bits were reset."
    
    218
    +msgstr ""
    
    219
    +
    
    220
    +#: src/compiler/x86/parms.lisp
    
    221
    +msgid "The bits in the FP mode that hold FP exceptions that are enabled."
    
    222
    +msgstr ""
    
    223
    +
    
    224
    +#: src/compiler/x86/parms.lisp
    
    225
    +msgid ""
    
    226
    +"The bits in the FP mode that hold the current exception.  However\n"
    
    227
    +" for x86, there aren't separate bits for this, so we use the stick\n"
    
    228
    +" bits from the accrued exceptions"
    
    229
    +msgstr ""
    
    230
    +
    
    182 231
     #: src/compiler/x86/vm.lisp
    
    183 232
     msgid "Redefining SC number ~D from ~S to ~S."
    
    184 233
     msgstr "Edefiningray SC umbernay ~D omfray ~S otay ~S."
    

  • src/i18n/locale/en@piglatin/LC_MESSAGES/cmucl.po
    ... ... @@ -5197,7 +5197,7 @@ msgstr ""
    5197 5197
     msgid ""
    
    5198 5198
     "WITH-STRING-CODEPOINT-ITERATOR ((next string) &body body)\n"
    
    5199 5199
     "  provides a method of looping through a string from the beginning to\n"
    
    5200
    -"  the end of the string prodcucing successive codepoints from the\n"
    
    5200
    +"  the end of the string producing successive codepoints from the\n"
    
    5201 5201
     "  string.  NEXT is bound to a generator macro that, within the scope\n"
    
    5202 5202
     "  of the invocation, returns one or two values. The first value tells\n"
    
    5203 5203
     "  whether any objects remain in the string. When the first value is\n"
    
    ... ... @@ -5663,7 +5663,7 @@ msgstr ""
    5663 5663
     msgid ""
    
    5664 5664
     "WITH-STRING-GLYPH-ITERATOR ((next string) &body body)\n"
    
    5665 5665
     "  provides a method of looping through a string from the beginning to\n"
    
    5666
    -"  the end of the string prodcucing successive glyphs from the string.\n"
    
    5666
    +"  the end of the string producing successive glyphs from the string.\n"
    
    5667 5667
     "  NEXT is bound to a generator macro that, within the scope of the\n"
    
    5668 5668
     "  invocation, returns one or three values. The first value tells\n"
    
    5669 5669
     "  whether any objects remain in the string. When the first value is\n"
    
    ... ... @@ -11833,6 +11833,7 @@ msgid ""
    11833 11833
     "     (:EXPORT {symbol-name}*)\n"
    
    11834 11834
     "     (:INTERN {symbol-name}*)\n"
    
    11835 11835
     "     (:SIZE <integer>)\n"
    
    11836
    +"     (:LOCAL-NICKNAMES {({nickname package}*)})\n"
    
    11836 11837
     "   All options except :SIZE and :DOCUMENTATION can be used multiple times."
    
    11837 11838
     msgstr ""
    
    11838 11839
     "Efinesday away ewnay ackagepay alledcay PACKAGE.  Eachway ofway OPTIONS "
    
    ... ... @@ -12285,6 +12286,58 @@ msgstr ""
    12285 12286
     "ofway ethay ymbolssay\n"
    
    12286 12287
     "  oundfay insteadway ofway escribingday emthay."
    
    12287 12288
     
    
    12289
    +#: src/code/package.lisp
    
    12290
    +msgid ""
    
    12291
    +"Returns an alist of (local-nickname . actual-package) describing the\n"
    
    12292
    +"  nicknames local to Package."
    
    12293
    +msgstr ""
    
    12294
    +
    
    12295
    +#: src/code/package.lisp
    
    12296
    +msgid ""
    
    12297
    +"For the designated package Package (defaulting to *PACKAGE*), add\n"
    
    12298
    +"  Local-Nickname as a package local nickname to the package\n"
    
    12299
    +"  Actual-Package. Actual-Package and Package must be an package\n"
    
    12300
    +"  designator. Local-Nickname should be a string designator.\n"
    
    12301
    +"\n"
    
    12302
    +"  Returns the designated package.\n"
    
    12303
    +"\n"
    
    12304
    +"  Signals a continuable error if any of the following are true:\n"
    
    12305
    +"    - Local-Nickname is already a local nickname for a different package\n"
    
    12306
    +"    - Local-Nickname is one of \"CL\", \"COMMON-LISP\", or \"KEYWORD\""
    
    12307
    +msgstr ""
    
    12308
    +
    
    12309
    +#: src/code/package.lisp
    
    12310
    +msgid "Local nickname cannot be \"CL\", \"COMMON-LISP\" or \"KEYWORD\""
    
    12311
    +msgstr ""
    
    12312
    +
    
    12313
    +#: src/code/package.lisp
    
    12314
    +#, fuzzy
    
    12315
    +msgid "~A is already a local nickname for the package ~A in ~A"
    
    12316
    +msgstr "~Away isway away icknay-amenay orfay ethay ackagepay ~Away"
    
    12317
    +
    
    12318
    +#: src/code/package.lisp
    
    12319
    +msgid ""
    
    12320
    +"~A cannot be a package local nickname for the global package~_ ~A with the "
    
    12321
    +"same name"
    
    12322
    +msgstr ""
    
    12323
    +
    
    12324
    +#: src/code/package.lisp
    
    12325
    +msgid ""
    
    12326
    +"~A cannot be a package local nickname for the global package~_ ~A with "
    
    12327
    +"nickname ~A"
    
    12328
    +msgstr ""
    
    12329
    +
    
    12330
    +#: src/code/package.lisp
    
    12331
    +msgid ""
    
    12332
    +"If Package has Old-Nickname as a local nickname, it is removed.\n"
    
    12333
    +"  Returns true if the nickname existed and was removed.  Otherwise\n"
    
    12334
    +" returns NIL."
    
    12335
    +msgstr ""
    
    12336
    +
    
    12337
    +#: src/code/package.lisp
    
    12338
    +msgid "Returns a list of packages which have a local nickname for Package."
    
    12339
    +msgstr ""
    
    12340
    +
    
    12288 12341
     #: src/code/reader.lisp
    
    12289 12342
     msgid "Float format for 1.0E1"
    
    12290 12343
     msgstr "Oatflay ormatfay orfay 1.0E1"
    

  • src/i18n/locale/ko/LC_MESSAGES/cmucl-x86-vm.po
    ... ... @@ -77,6 +77,38 @@ msgstr ""
    77 77
     msgid "Thread safe push of val onto the list in the vector element."
    
    78 78
     msgstr ""
    
    79 79
     
    
    80
    +#: src/code/x86-vm.lisp
    
    81
    +msgid "The bit in the x87 FPU control word that controls the infinity mode."
    
    82
    +msgstr ""
    
    83
    +
    
    84
    +#: src/code/x86-vm.lisp
    
    85
    +msgid "The bits in the x87 FPU control word for the rounding mode."
    
    86
    +msgstr ""
    
    87
    +
    
    88
    +#: src/code/x86-vm.lisp
    
    89
    +msgid "The bits in the x87 FPU contol word for the FP operation precision."
    
    90
    +msgstr ""
    
    91
    +
    
    92
    +#: src/code/x86-vm.lisp
    
    93
    +msgid ""
    
    94
    +"The bits in the x87 FPU control word indicating the exceptions that\n"
    
    95
    +" are enabled."
    
    96
    +msgstr ""
    
    97
    +
    
    98
    +#: src/code/x86-vm.lisp
    
    99
    +msgid ""
    
    100
    +"Alist for the x87 precison control.  The car is the symbolic\n"
    
    101
    +" precision and the cdr is the value for the precision control field."
    
    102
    +msgstr ""
    
    103
    +
    
    104
    +#: src/code/x86-vm.lisp
    
    105
    +msgid "Print SSE2 floating modes word in a human-readable fashion."
    
    106
    +msgstr ""
    
    107
    +
    
    108
    +#: src/code/x86-vm.lisp
    
    109
    +msgid "Print X87 floating modes word in a human-readable fashion."
    
    110
    +msgstr ""
    
    111
    +
    
    80 112
     #: src/code/load.lisp
    
    81 113
     msgid "Top-Level Form"
    
    82 114
     msgstr ""
    
    ... ... @@ -136,6 +168,23 @@ msgstr ""
    136 168
     msgid "Maximum number of bits in a positive fixnum"
    
    137 169
     msgstr ""
    
    138 170
     
    
    171
    +#: src/compiler/x86/parms.lisp
    
    172
    +msgid ""
    
    173
    +"The bits in the FP mode that hold the accrued exceptions that have\n"
    
    174
    +" occurred since the bits were reset."
    
    175
    +msgstr ""
    
    176
    +
    
    177
    +#: src/compiler/x86/parms.lisp
    
    178
    +msgid "The bits in the FP mode that hold FP exceptions that are enabled."
    
    179
    +msgstr ""
    
    180
    +
    
    181
    +#: src/compiler/x86/parms.lisp
    
    182
    +msgid ""
    
    183
    +"The bits in the FP mode that hold the current exception.  However\n"
    
    184
    +" for x86, there aren't separate bits for this, so we use the stick\n"
    
    185
    +" bits from the accrued exceptions"
    
    186
    +msgstr ""
    
    187
    +
    
    139 188
     #: src/compiler/x86/vm.lisp
    
    140 189
     msgid "Redefining SC number ~D from ~S to ~S."
    
    141 190
     msgstr ""
    

  • src/i18n/locale/ko/LC_MESSAGES/cmucl.po
    ... ... @@ -3718,7 +3718,7 @@ msgstr ""
    3718 3718
     msgid ""
    
    3719 3719
     "WITH-STRING-CODEPOINT-ITERATOR ((next string) &body body)\n"
    
    3720 3720
     "  provides a method of looping through a string from the beginning to\n"
    
    3721
    -"  the end of the string prodcucing successive codepoints from the\n"
    
    3721
    +"  the end of the string producing successive codepoints from the\n"
    
    3722 3722
     "  string.  NEXT is bound to a generator macro that, within the scope\n"
    
    3723 3723
     "  of the invocation, returns one or two values. The first value tells\n"
    
    3724 3724
     "  whether any objects remain in the string. When the first value is\n"
    
    ... ... @@ -3987,7 +3987,7 @@ msgstr ""
    3987 3987
     msgid ""
    
    3988 3988
     "WITH-STRING-GLYPH-ITERATOR ((next string) &body body)\n"
    
    3989 3989
     "  provides a method of looping through a string from the beginning to\n"
    
    3990
    -"  the end of the string prodcucing successive glyphs from the string.\n"
    
    3990
    +"  the end of the string producing successive glyphs from the string.\n"
    
    3991 3991
     "  NEXT is bound to a generator macro that, within the scope of the\n"
    
    3992 3992
     "  invocation, returns one or three values. The first value tells\n"
    
    3993 3993
     "  whether any objects remain in the string. When the first value is\n"
    
    ... ... @@ -8225,6 +8225,7 @@ msgid ""
    8225 8225
     "     (:EXPORT {symbol-name}*)\n"
    
    8226 8226
     "     (:INTERN {symbol-name}*)\n"
    
    8227 8227
     "     (:SIZE <integer>)\n"
    
    8228
    +"     (:LOCAL-NICKNAMES {({nickname package}*)})\n"
    
    8228 8229
     "   All options except :SIZE and :DOCUMENTATION can be used multiple times."
    
    8229 8230
     msgstr ""
    
    8230 8231
     
    
    ... ... @@ -8568,6 +8569,57 @@ msgid ""
    8568 8569
     "  found instead of describing them."
    
    8569 8570
     msgstr ""
    
    8570 8571
     
    
    8572
    +#: src/code/package.lisp
    
    8573
    +msgid ""
    
    8574
    +"Returns an alist of (local-nickname . actual-package) describing the\n"
    
    8575
    +"  nicknames local to Package."
    
    8576
    +msgstr ""
    
    8577
    +
    
    8578
    +#: src/code/package.lisp
    
    8579
    +msgid ""
    
    8580
    +"For the designated package Package (defaulting to *PACKAGE*), add\n"
    
    8581
    +"  Local-Nickname as a package local nickname to the package\n"
    
    8582
    +"  Actual-Package. Actual-Package and Package must be an package\n"
    
    8583
    +"  designator. Local-Nickname should be a string designator.\n"
    
    8584
    +"\n"
    
    8585
    +"  Returns the designated package.\n"
    
    8586
    +"\n"
    
    8587
    +"  Signals a continuable error if any of the following are true:\n"
    
    8588
    +"    - Local-Nickname is already a local nickname for a different package\n"
    
    8589
    +"    - Local-Nickname is one of \"CL\", \"COMMON-LISP\", or \"KEYWORD\""
    
    8590
    +msgstr ""
    
    8591
    +
    
    8592
    +#: src/code/package.lisp
    
    8593
    +msgid "Local nickname cannot be \"CL\", \"COMMON-LISP\" or \"KEYWORD\""
    
    8594
    +msgstr ""
    
    8595
    +
    
    8596
    +#: src/code/package.lisp
    
    8597
    +msgid "~A is already a local nickname for the package ~A in ~A"
    
    8598
    +msgstr ""
    
    8599
    +
    
    8600
    +#: src/code/package.lisp
    
    8601
    +msgid ""
    
    8602
    +"~A cannot be a package local nickname for the global package~_ ~A with the "
    
    8603
    +"same name"
    
    8604
    +msgstr ""
    
    8605
    +
    
    8606
    +#: src/code/package.lisp
    
    8607
    +msgid ""
    
    8608
    +"~A cannot be a package local nickname for the global package~_ ~A with "
    
    8609
    +"nickname ~A"
    
    8610
    +msgstr ""
    
    8611
    +
    
    8612
    +#: src/code/package.lisp
    
    8613
    +msgid ""
    
    8614
    +"If Package has Old-Nickname as a local nickname, it is removed.\n"
    
    8615
    +"  Returns true if the nickname existed and was removed.  Otherwise\n"
    
    8616
    +" returns NIL."
    
    8617
    +msgstr ""
    
    8618
    +
    
    8619
    +#: src/code/package.lisp
    
    8620
    +msgid "Returns a list of packages which have a local nickname for Package."
    
    8621
    +msgstr ""
    
    8622
    +
    
    8571 8623
     #: src/code/reader.lisp
    
    8572 8624
     msgid "Float format for 1.0E1"
    
    8573 8625
     msgstr ""