Raymond Toy pushed to branch master at cmucl / cmucl
Commits:
d53c9575 by Raymond Toy at 2023-05-12T16:43:51-07:00
Update cmucl.pot and cmucl-unix.pot for Linux
See also #223.
- - - - -
2 changed files:
- src/i18n/locale/cmucl-unix.pot
- src/i18n/locale/cmucl.pot
Changes:
=====================================
src/i18n/locale/cmucl-unix.pot
=====================================
@@ -1356,6 +1356,14 @@ msgid ""
"found."
msgstr ""
+#: src/code/unix.lisp
+msgid ""
+"Return a USER-INFO structure for the user identified by UID. If\n"
+" not found, NIL is returned with a second value indicating the cause\n"
+" of the failure. In particular, if the second value is 0 (or\n"
+" ENONENT, ESRCH, EBADF, etc.), then the uid was not found."
+msgstr ""
+
#: src/code/unix.lisp
msgid ""
"Unix-times returns information about the cpu time usage of the process\n"
=====================================
src/i18n/locale/cmucl.pot
=====================================
@@ -9599,15 +9599,6 @@ msgid ""
" an otherwise undefined logical host."
msgstr ""
-#: src/code/pathname.lisp
-msgid ""
-"When non-NIL, pathnames are on Darwin are normalized when created.\n"
-" Otherwise, the pathnames are unchanged.\n"
-"\n"
-" This must be NIL during bootstrapping because Unicode is not yet\n"
-" available."
-msgstr ""
-
#: src/code/pathname.lisp
msgid "A path specification, either a string, file-stream or pathname."
msgstr ""
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/d53c9575b1166a3a9d5e98b…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/d53c9575b1166a3a9d5e98b…
You're receiving this email because of your account on gitlab.common-lisp.net.
Raymond Toy pushed to branch master at cmucl / cmucl
Commits:
7774063f by Raymond Toy at 2023-05-12T16:28:16-07:00
Update pot files for Darwin
- - - - -
2 changed files:
- src/i18n/locale/cmucl-unix.pot
- src/i18n/locale/cmucl.pot
Changes:
=====================================
src/i18n/locale/cmucl-unix.pot
=====================================
@@ -1356,14 +1356,6 @@ msgid ""
"found."
msgstr ""
-#: src/code/unix.lisp
-msgid ""
-"Return a USER-INFO structure for the user identified by UID. If\n"
-" not found, NIL is returned with a second value indicating the cause\n"
-" of the failure. In particular, if the second value is 0 (or\n"
-" ENONENT, ESRCH, EBADF, etc.), then the uid was not found."
-msgstr ""
-
#: src/code/unix.lisp
msgid ""
"Unix-times returns information about the cpu time usage of the process\n"
=====================================
src/i18n/locale/cmucl.pot
=====================================
@@ -9599,6 +9599,15 @@ msgid ""
" an otherwise undefined logical host."
msgstr ""
+#: src/code/pathname.lisp
+msgid ""
+"When non-NIL, pathnames are on Darwin are normalized when created.\n"
+" Otherwise, the pathnames are unchanged.\n"
+"\n"
+" This must be NIL during bootstrapping because Unicode is not yet\n"
+" available."
+msgstr ""
+
#: src/code/pathname.lisp
msgid "A path specification, either a string, file-stream or pathname."
msgstr ""
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/7774063faced8bd6f635408…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/7774063faced8bd6f635408…
You're receiving this email because of your account on gitlab.common-lisp.net.
Raymond Toy pushed to branch master at cmucl / cmucl
Commits:
a4c000f9 by Raymond Toy at 2023-05-10T11:48:33-07:00
Update cmucl.pot
Issue #143 updated a docstring so the pot file needs updating.
- - - - -
ee480fbf by Raymond Toy at 2023-05-10T11:49:20-07:00
Update release notes
Issue #143 has been fixed.
- - - - -
2 changed files:
- src/general-info/release-21e.md
- src/i18n/locale/cmucl.pot
Changes:
=====================================
src/general-info/release-21e.md
=====================================
@@ -64,6 +64,7 @@ public domain.
* ~~#140~~ External format for streams that are not `file-stream`'s.
* ~~#141~~ Disallow locales that are pathnames to a localedef file.
* ~~#142~~ `(random 0)` signals incorrect error.
+ * ~~#143~~ `LISTEN` doesn't signal error when given more than one arg
* ~~#147~~ `stream-line-column` method missing for `fundamental-character-output-stream`.
* ~~#149~~ Call setlocale(3C) on startup.
* ~~#150~~ Add aliases for external format cp949 and euckr.
=====================================
src/i18n/locale/cmucl.pot
=====================================
@@ -7024,7 +7024,15 @@ msgid "Impossible case reached in PEEK-CHAR"
msgstr ""
#: src/code/stream.lisp
-msgid "Returns T if a character is available on the given Stream."
+msgid ""
+"Returns T if a character is available on the given Stream.\n"
+" Argument Width is only used by instances of SIMPLE-STREAM. If\n"
+" Stream is a LISP-STREAM or FUNDAMENTAL-STREAM, passing more\n"
+" than one argument is invalid."
+msgstr ""
+
+#: src/code/interr.lisp src/code/stream.lisp
+msgid "Invalid number of arguments: ~S"
msgstr ""
#: src/code/stream.lisp
@@ -10912,10 +10920,6 @@ msgstr ""
msgid "Unknown error:~{ ~S~})"
msgstr ""
-#: src/code/interr.lisp
-msgid "Invalid number of arguments: ~S"
-msgstr ""
-
#: src/code/interr.lisp
msgid "Attempt to use VALUES-LIST on a dotted-list:~% ~S"
msgstr ""
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/e472bd4ff2846f2f6d4ac6…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/e472bd4ff2846f2f6d4ac6…
You're receiving this email because of your account on gitlab.common-lisp.net.
Jon Boone pushed to branch master at cmucl / cmucl
Commits:
6162e5b4 by Jon Boone at 2023-05-09T17:38:36+00:00
Fix #143 - Adds argument checking for lisp-streams and Gray sttreams for LISTEN
- - - - -
e472bd4f by Jon Boone at 2023-05-09T17:38:47+00:00
Merge branch 'issue-143-ansi-compliance-failure-listen-extra-argument' into 'master'
Fix #143 - Adds argument checking for lisp-streams and Gray sttreams for LISTEN
Closes #143
See merge request cmucl/cmucl!145
- - - - -
1 changed file:
- src/code/stream.lisp
Changes:
=====================================
src/code/stream.lisp
=====================================
@@ -604,19 +604,34 @@
:skipped-char-form ()
:eof-detected-form (eof-or-lose stream eof-errorp eof-value))))))
-(defun listen (&optional (stream *standard-input*) (width 1))
- "Returns T if a character is available on the given Stream."
+(defun listen (&optional (stream *standard-input*) (width 1 width-p))
+ _N"Returns T if a character is available on the given Stream.
+ Argument Width is only used by instances of SIMPLE-STREAM. If
+ Stream is a LISP-STREAM or FUNDAMENTAL-STREAM, passing more
+ than one argument is invalid."
(declare (type streamlike stream))
(let ((stream (in-synonym-of stream)))
(stream-dispatch stream
;; simple-stream
(stream::%listen stream width)
;; lisp-stream
- (or (/= (the fixnum (lisp-stream-in-index stream)) in-buffer-length)
- ;; Test for t explicitly since misc methods return :eof sometimes.
- (eq (funcall (lisp-stream-misc stream) stream :listen) t))
+ (progn
+ (when width-p
+ (error 'kernel:simple-program-error
+ :function-name 'listen
+ :format-control (intl:gettext "Invalid number of arguments: ~S")
+ :format-arguments (list 2)))
+ (or (/= (the fixnum (lisp-stream-in-index stream)) in-buffer-length)
+ ;; Test for t explicitly since misc methods return :eof sometimes.
+ (eq (funcall (lisp-stream-misc stream) stream :listen) t)))
;; fundamental-stream
- (stream-listen stream))))
+ (progn
+ (when width-p
+ (error 'kernel:simple-program-error
+ :function-name 'listen
+ :format-control (intl:gettext "Invalid number of arguments: ~S")
+ :format-arguments (list 2)))
+ (stream-listen stream)))))
(defun read-char-no-hang (&optional (stream *standard-input*)
(eof-errorp t) eof-value recursive-p)
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/fa4edacbea17140c0e869a…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/fa4edacbea17140c0e869a…
You're receiving this email because of your account on gitlab.common-lisp.net.
Jon Boone pushed to branch issue-143-ansi-compliance-failure-listen-extra-argument at cmucl / cmucl
Commits:
4ad74293 by Jon Boone at 2023-05-04T12:10:06-04:00
Fix #143 - correcting docstring to conform with CMUCL style
- - - - -
1 changed file:
- src/code/stream.lisp
Changes:
=====================================
src/code/stream.lisp
=====================================
@@ -606,9 +606,9 @@
(defun listen (&optional (stream *standard-input*) (width 1 width-p))
_N"Returns T if a character is available on the given Stream.
- Argument width is only used by streams of type simple-stream.
- If stream is of type lisp-stream or fundamental-stream,
- passing more than one argument is invalid. "
+ Argument Width is only used by instances of SIMPLE-STREAM. If
+ Stream is a LISP-STREAM or FUNDAMENTAL-STREAM, passing more
+ than one argument is invalid."
(declare (type streamlike stream))
(let ((stream (in-synonym-of stream)))
(stream-dispatch stream
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/4ad742939d3f88369c719cf…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/4ad742939d3f88369c719cf…
You're receiving this email because of your account on gitlab.common-lisp.net.
Jon Boone pushed to branch issue-143-ansi-compliance-failure-listen-extra-argument at cmucl / cmucl
Commits:
873fa8b1 by Jon Boone at 2023-05-03T19:33:09-04:00
Fix #143 - add gray-stream support and update docstring
- - - - -
1 changed file:
- src/code/stream.lisp
Changes:
=====================================
src/code/stream.lisp
=====================================
@@ -605,7 +605,10 @@
:eof-detected-form (eof-or-lose stream eof-errorp eof-value))))))
(defun listen (&optional (stream *standard-input*) (width 1 width-p))
- "Returns T if a character is available on the given Stream."
+ _N"Returns T if a character is available on the given Stream.
+ Argument width is only used by streams of type simple-stream.
+ If stream is of type lisp-stream or fundamental-stream,
+ passing more than one argument is invalid. "
(declare (type streamlike stream))
(let ((stream (in-synonym-of stream)))
(stream-dispatch stream
@@ -622,7 +625,13 @@
;; Test for t explicitly since misc methods return :eof sometimes.
(eq (funcall (lisp-stream-misc stream) stream :listen) t)))
;; fundamental-stream
- (stream-listen stream))))
+ (progn
+ (when width-p
+ (error 'kernel:simple-program-error
+ :function-name 'listen
+ :format-control (intl:gettext "Invalid number of arguments: ~S")
+ :format-arguments (list 2)))
+ (stream-listen stream)))))
(defun read-char-no-hang (&optional (stream *standard-input*)
(eof-errorp t) eof-value recursive-p)
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/873fa8b1049aea0c7165ef3…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/873fa8b1049aea0c7165ef3…
You're receiving this email because of your account on gitlab.common-lisp.net.
Jon Boone pushed to branch issue-143-ansi-compliance-failure-listen-extra-argument at cmucl / cmucl
Commits:
a071e45e by Jon Boone at 2023-05-03T18:59:57-04:00
Fix #143 - corrects typo on arg num
- - - - -
1 changed file:
- src/code/stream.lisp
Changes:
=====================================
src/code/stream.lisp
=====================================
@@ -617,7 +617,7 @@
(error 'kernel:simple-program-error
:function-name 'listen
:format-control (intl:gettext "Invalid number of arguments: ~S")
- :format-arguments (list 3)))
+ :format-arguments (list 2)))
(or (/= (the fixnum (lisp-stream-in-index stream)) in-buffer-length)
;; Test for t explicitly since misc methods return :eof sometimes.
(eq (funcall (lisp-stream-misc stream) stream :listen) t)))
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/a071e45e95556f42ed8c2d0…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/a071e45e95556f42ed8c2d0…
You're receiving this email because of your account on gitlab.common-lisp.net.
Raymond Toy pushed to branch issue-156-take-2-nan-comparison at cmucl / cmucl
Commits:
5dc0d7bf by Raymond Toy at 2023-03-24T14:31:40+00:00
Address #158: Filename encoding for Darwin
- - - - -
3578e015 by Raymond Toy at 2023-03-24T14:31:42+00:00
Merge branch 'issue-158-darwin-pathnames-utf8' into 'master'
Address #158: Filename encoding for Darwin
Closes #166 and #159
See merge request cmucl/cmucl!113
- - - - -
ce823be4 by Raymond Toy at 2023-03-24T08:17:30-07:00
Update release notes with recently closed issues
We left out a few issues that probably aren't relevant to users
like #175 and #170. We also added #158 which isn't closed, but
explains we support utf-8 on Darwin.
- - - - -
b9b145ab by Raymond Toy at 2023-03-24T08:23:42-07:00
Add period at the end of each bug item
- - - - -
72cdab53 by Raymond Toy at 2023-03-29T11:33:08-07:00
Fix warning about lack of prototype in os_get_locale_codeset.
Clang produces a warning for `char * os_get_locale_codeset()` because
we don't give a prototype for the arg of `os_get_locale_codeset`. So
just make it `void`.
- - - - -
bbfff3c0 by Raymond Toy at 2023-04-10T15:11:59+00:00
Fix #170: Move get-system-info to C
- - - - -
5196072a by Raymond Toy at 2023-04-10T15:12:01+00:00
Merge branch 'issue-179-get-system-info-in-c' into 'master'
Fix #170: Move get-system-info to C
Closes #170
See merge request cmucl/cmucl!137
- - - - -
b2aee0f7 by Raymond Toy at 2023-04-17T08:14:29-07:00
Update cmucl.pot with latest source
Some docstrings have changed, so update cmucl.pot
- - - - -
fbb742ae by Raymond Toy at 2023-04-19T14:14:39+00:00
Fix #120: software-version in C
- - - - -
501ca837 by Raymond Toy at 2023-04-19T14:14:40+00:00
Merge branch 'issue-120-software-type-in-c' into 'master'
Fix #120: software-version in C
Closes #120, #130, #146, #136, #142, #134, and #132
See merge request cmucl/cmucl!93
- - - - -
2556df76 by Raymond Toy at 2023-04-19T07:38:34-07:00
Update pot files
Forgot to update these in the merges, so let's do them all now.
- - - - -
38daa5e2 by Raymond Toy at 2023-04-19T15:13:28+00:00
Add missing colon after "Version"
- - - - -
de972bb3 by Raymond Toy at 2023-04-19T15:32:14+00:00
Merge branch 'rtoy-master-patch-80206' into 'master'
Add missing colon after "Version"
See merge request cmucl/cmucl!140
- - - - -
f52fcecb by Raymond Toy at 2023-04-21T13:35:02+00:00
Fix #180: Move get-page-size to C
- - - - -
412d6523 by Raymond Toy at 2023-04-21T13:35:02+00:00
Merge branch 'issue-180-get-page-size-in-c' into 'master'
Fix #180: Move get-page-size to C
Closes #180
See merge request cmucl/cmucl!136
- - - - -
31825793 by Raymond Toy at 2023-04-25T20:49:36+00:00
Fix #189: Move get-system-info from unix.lisp to os.lisp
- - - - -
90a5e569 by Raymond Toy at 2023-04-25T20:49:36+00:00
Merge branch 'issue-189-move-get-system-info' into 'master'
Fix #189: Move get-system-info from unix.lisp to os.lisp
Closes #189
See merge request cmucl/cmucl!141
- - - - -
c2a99381 by Raymond Toy at 2023-04-26T21:38:42+00:00
Fix #131: Move unix-uname to contrib/unix
- - - - -
acb29d8f by Raymond Toy at 2023-04-26T21:38:42+00:00
Merge branch 'issue-131-move-unix-uname' into 'master'
Fix #131: Move unix-uname to contrib/unix
Closes #131
See merge request cmucl/cmucl!142
- - - - -
677c3ccf by Raymond Toy at 2023-04-27T22:55:29+00:00
Fix #185: Use shorter instructions on x86
- - - - -
8826d962 by Raymond Toy at 2023-04-27T22:55:39+00:00
Merge branch 'issue-185-x86-shorter-insts' into 'master'
Fix #185: Use shorter instructions on x86
Closes #185
See merge request cmucl/cmucl!138
- - - - -
784a143b by Raymond Toy at 2023-04-29T03:54:43+00:00
Fix #192: Print radix marker in disassemblies; adjust note column
- - - - -
ce57a9f2 by Raymond Toy at 2023-04-29T03:55:21+00:00
Merge branch 'issue-192-disassemble-prints-radix-marker' into 'master'
Fix #192: Print radix marker in disassemblies; adjust note column
Closes #192
See merge request cmucl/cmucl!143
- - - - -
48aa21e0 by Raymond Toy at 2023-04-28T20:59:32-07:00
Update release notes for issue #192
- - - - -
3154df47 by Raymond Toy at 2023-04-30T13:54:45+00:00
Fix #193: Treat NIL and :UNSPECIFIC as equivalent in pathnames
- - - - -
9eec4ee5 by Raymond Toy at 2023-04-30T13:55:56+00:00
Merge branch 'issue-193-nil-unspecific-equivalent' into 'master'
Fix #193: Treat NIL and :UNSPECIFIC as equivalent in pathnames
Closes #193
See merge request cmucl/cmucl!144
- - - - -
a0c4c593 by Raymond Toy at 2023-04-30T07:17:53-07:00
Update pot file
- - - - -
95f592f0 by Raymond Toy at 2023-04-30T07:18:08-07:00
Update release notes for #193
- - - - -
65bf9fa5 by Raymond Toy at 2023-04-30T07:59:16-07:00
Update pot files for Darwin
- - - - -
89bdabd4 by Raymond Toy at 2023-04-30T15:08:48-07:00
More pot file updates on linux.
- - - - -
fa4edacb by Raymond Toy at 2023-05-01T13:09:03-07:00
Update CI to use latest snapshot (2023-04)
- - - - -
d07b8de1 by Raymond Toy at 2023-05-03T15:50:36-07:00
Merge branch 'master' into issue-156-take-2-nan-comparison
- - - - -
30 changed files:
- .gitlab-ci.yml
- .gitlab/issue_templates/Bug.md
- src/code/bsd-os.lisp
- src/code/exports.lisp
- src/code/hpux-os.lisp
- src/code/irix-os.lisp
- src/code/linux-os.lisp
- src/code/misc.lisp
- + src/code/os.lisp
- src/code/osf1-os.lisp
- src/code/pathname.lisp
- src/code/save.lisp
- src/code/string.lisp
- src/code/sunos-os.lisp
- src/code/unicode.lisp
- src/code/unix.lisp
- src/compiler/disassem.lisp
- src/compiler/x86/insts.lisp
- src/contrib/unix/unix-glibc2.lisp
- src/contrib/unix/unix.lisp
- src/general-info/release-21e.md
- src/i18n/locale/cmucl-bsd-os.pot
- src/i18n/locale/cmucl-linux-os.pot
- + src/i18n/locale/cmucl-os.pot
- src/i18n/locale/cmucl-unix.pot
- src/i18n/locale/cmucl-x86-vm.pot
- src/i18n/locale/cmucl.pot
- src/lisp/os-common.c
- src/pcl/simple-streams/internal.lisp
- src/tools/worldbuild.lisp
The diff was not included because it is too large.
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/b84c734965e4abdf14b6ac…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/b84c734965e4abdf14b6ac…
You're receiving this email because of your account on gitlab.common-lisp.net.