Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

method stream-line-column doesn't specializ #238

Open
Yehouda opened this issue Dec 30, 2024 · 9 comments
Open

method stream-line-column doesn't specializ #238

Yehouda opened this issue Dec 30, 2024 · 9 comments

Comments

@Yehouda
Copy link

Yehouda commented Dec 30, 2024

(defmethod trivial-gray-streams:stream-line-column (stream)

This needs to specialize on formatting-stream.

On Lispworks that errors, because LispWorks exports stream-line-column and by default doesn't allow methods that are not specialized (so actually specilized on T) for such generic functions.

@stassats
Copy link
Member

Can you make a pull request?

@Yehouda
Copy link
Author

Yehouda commented Dec 30, 2024

No, I don't work with github.
I test code that I downoad from quicklisp.
I checked that with the change the system compiles ok.

@stassats
Copy link
Member

You can send me a patch from git format-patch.

@metayan
Copy link

metayan commented Dec 30, 2024

@Yehouda Is this the change you have in mind?

diff --git a/make-docstrings.lisp b/make-docstrings.lisp
index 993a295..878781c 100644
--- a/make-docstrings.lisp
+++ b/make-docstrings.lisp
@@ -56,7 +56,7 @@ (defmethod trivial-gray-streams:stream-write-char ((stream formatting-stream) ch
          (vector-push-extend char (word-buffer stream))))
       (write-char char (understream stream))))
 
-(defmethod trivial-gray-streams:stream-line-column (stream)
+(defmethod trivial-gray-streams:stream-line-column ((stream formatting-stream))
   (+ (column stream) (length (word-buffer stream))))
 
 (defmethod trivial-gray-streams:stream-write-string ((stream formatting-stream) string &optional start end)

Maybe you can tell me how to invoke make-docstrings to test it.

@metayan
Copy link

metayan commented Dec 30, 2024

Ah, I need to load hunchentoot-dev - not hunchentoot/dev.

@Yehouda
Copy link
Author

Yehouda commented Dec 30, 2024

Yes, this is the change.
huncentoot/dev is what comes from quicklisp, and as far as I can see it also in the source

(defsystem :hunchentoot/dev

@Yehouda
Copy link
Author

Yehouda commented Dec 30, 2024

What is git format-patch?

metayan pushed a commit to metayan/hunchentoot that referenced this issue Dec 30, 2024
Reported and fixed by Yehouda Harpaz
@metayan
Copy link

metayan commented Dec 30, 2024

The fix is in
https://github.com/metayan/hunchentoot/tree/fix238
@Yehouda Can you test that it works as intended?

How is 'make-docstrings:parse-docsupposed to be used, so I can test it with SBCL and CCL? I usehunchentoot`, but not this part.

@metayan
Copy link

metayan commented Dec 30, 2024

By the way, my server, which is running hunchentoot on SBCL, was started 2023-08-24 10:00:38.

I have patched some things on-the-fly since then.
Lisp is great.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

No branches or pull requests

3 participants