Raymond Toy pushed to branch master at cmucl / cmucl
Commits: 95352e0d by Raymond Toy at 2024-01-08T15:39:09-08:00 Reorder docstring for defpackage to match CLHS
Minor tweak to list the options to `defpackage` to match the order showns in the CLHS entry for `defpackage`. Since it's just a change in the docstring, no changes in behavior anywhere.
- - - - -
2 changed files:
- src/code/package.lisp - src/i18n/locale/cmucl.pot
Changes:
===================================== src/code/package.lisp ===================================== @@ -915,14 +915,14 @@ "Defines a new package called PACKAGE. Each of OPTIONS should be one of the following: (:NICKNAMES {package-name}*) - (:SIZE <integer>) + (:DOCUMENTATION doc-string) + (:USE {package-name}*) (:SHADOW {symbol-name}*) (:SHADOWING-IMPORT-FROM <package-name> {symbol-name}*) - (:USE {package-name}*) (:IMPORT-FROM <package-name> {symbol-name}*) - (:INTERN {symbol-name}*) (:EXPORT {symbol-name}*) - (:DOCUMENTATION doc-string) + (:INTERN {symbol-name}*) + (:SIZE <integer>) All options except :SIZE and :DOCUMENTATION can be used multiple times." (let ((nicknames nil) (size nil)
===================================== src/i18n/locale/cmucl.pot ===================================== @@ -8164,14 +8164,14 @@ msgid "" "Defines a new package called PACKAGE. Each of OPTIONS should be one of the\n" " following:\n" " (:NICKNAMES {package-name}*)\n" -" (:SIZE <integer>)\n" +" (:DOCUMENTATION doc-string)\n" +" (:USE {package-name}*)\n" " (:SHADOW {symbol-name}*)\n" " (:SHADOWING-IMPORT-FROM <package-name> {symbol-name}*)\n" -" (:USE {package-name}*)\n" " (:IMPORT-FROM <package-name> {symbol-name}*)\n" -" (:INTERN {symbol-name}*)\n" " (:EXPORT {symbol-name}*)\n" -" (:DOCUMENTATION doc-string)\n" +" (:INTERN {symbol-name}*)\n" +" (:SIZE <integer>)\n" " All options except :SIZE and :DOCUMENTATION can be used multiple times." msgstr ""
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/95352e0d557d7d8beb750b22...