jackdaniel changed the topic of #commonlisp to: Common Lisp, the #1=(programmable . #1#) programming language | Wiki: <https://www.cliki.net> | IRC Logs: <https://irclog.tymoon.eu/libera/%23commonlisp> | Cookbook: <https://lispcookbook.github.io/cl-cookbook> | Pastebin: <https://plaster.tymoon.eu/>
_whitelogger has joined #commonlisp
ezakimak has joined #commonlisp
masinter has joined #commonlisp
yewscion has joined #commonlisp
mfiano has joined #commonlisp
Lord_Nightmare has joined #commonlisp
molson has joined #commonlisp
ello has joined #commonlisp
bird_ has joined #commonlisp
Everything has joined #commonlisp
bike has joined #commonlisp
jmd_ has joined #commonlisp
random-nick has quit [Ping timeout: 264 seconds]
NotThatRPG has quit [Quit: My MacBook has gone to sleep. ZZZzzz…]
akoana has quit [Quit: leaving]
dra_ has joined #commonlisp
dra has quit [Ping timeout: 240 seconds]
dra_ has quit [Ping timeout: 240 seconds]
jmd_ has quit [Ping timeout: 260 seconds]
tyson2 has quit [Remote host closed the connection]
coderdan has joined #commonlisp
<coderdan> Is there a way I can rewrite this snippet so that I can use (plusthree 4) without needing funcall? (let ((plusthree (alexandria:curry '+ 3))) (funcall plusthree 4))
kevingal has quit [Read error: Connection reset by peer]
jmd_ has joined #commonlisp
<paulapatience> Use flet or serapeum:fbind
waleee has quit [Ping timeout: 245 seconds]
<coderdan> paulapatience: serapeum:fbind is exactly what I want, thanks!
dcb has quit [Quit: MSN Messenger 4.0.2]
cmack has quit [Remote host closed the connection]
coderdan has quit [Remote host closed the connection]
randm has quit [Ping timeout: 246 seconds]
randm has joined #commonlisp
<paulapatience> Is (alphanumericp c) guaranteed to be the same as (and (alpha-char-p c) (digit-char-p c))?
<aeth> or, not and, right?
<ixelp> CLHS: Function ALPHANUMERICP
<aeth> (digit-char-p #\1) => 1
<aeth> so it's defined as (or (alpha-char-p x) (not (null (digit-char-p x))))
<aeth> That isn't really good style, though. NULL is meant to test for '() so NOT NOT would probably make more sense to convert a value to a T/NIL rather than NOT NULL.
<aeth> as in, the empty list
<beach> NULL can also be used to test for the symbol NIL and the default value NIL returned by some operators.
<char[m]> Certainly (not (not... is also not ideal style though
<beach> char[m]: That should never be required. If the innermost form returns a Boolean, then just return it. And if not, then NOT should not be the innermost operator.
<aeth> (or (alpha-char-p x) (and (digit-char-p x) t))
<aeth> is a much clearer way to write it
<aeth> (to write ALPHANUMERICP)
<paulapatience> I meant or of course
<paulapatience> Thanks
<paulapatience> Right, I forgot about digit-char-p's result
rtypo has quit [Ping timeout: 252 seconds]
<edgar-rft> (defun alpha-char-p (x) (find x '(#\α #\Α)))
AetherWind has joined #commonlisp
tibfulv has quit [Remote host closed the connection]
tibfulv has joined #commonlisp
rgherdt has joined #commonlisp
igemnace has joined #commonlisp
bendersteed has joined #commonlisp
shka has joined #commonlisp
rpx has joined #commonlisp
LW has joined #commonlisp
msavoritias has joined #commonlisp
pve has joined #commonlisp
Psybur has quit [Ping timeout: 245 seconds]
snits has joined #commonlisp
snits has quit [Read error: Connection reset by peer]
habamax has quit [Ping timeout: 250 seconds]
snits has joined #commonlisp
habamax has joined #commonlisp
rgherdt has quit [Ping timeout: 260 seconds]
rgherdt has joined #commonlisp
LW has quit [Quit: WeeChat 3.8]
azimut has joined #commonlisp
Cymew has joined #commonlisp
rgherdt has quit [Ping timeout: 260 seconds]
habamax has quit [Read error: Connection reset by peer]
snits has quit [Quit: https://quassel-irc.org - Chat comfortably. Anywhere.]
thollief has joined #commonlisp
easye has quit [Ping timeout: 260 seconds]
easye has joined #commonlisp
Brucio-61 has quit [Ping timeout: 250 seconds]
rgherdt has joined #commonlisp
dino_tutter has joined #commonlisp
Brucio-61 has joined #commonlisp
mgl has joined #commonlisp
habamax has joined #commonlisp
grawlinson has quit [Quit: SIGTERM]
grawlinson has joined #commonlisp
morganw has joined #commonlisp
herjazz has joined #commonlisp
Lord_of_Life has quit [Ping timeout: 245 seconds]
Lord_of_Life has joined #commonlisp
green_ has quit [Quit: Leaving]
beach has quit [Ping timeout: 246 seconds]
tibfulv has quit [Remote host closed the connection]
tibfulv has joined #commonlisp
tyson2 has joined #commonlisp
shka has quit [Quit: Konversation terminated!]
shka has joined #commonlisp
random-nick has joined #commonlisp
beach has joined #commonlisp
dino_tutter has quit [Ping timeout: 264 seconds]
<doulos05> Is there a way I can specify a branch or tag when installing a script via `ros install`?
<doulos05> nvm, I found it in the code
Brucio-61 has quit [Read error: Connection reset by peer]
Brucio-61 has joined #commonlisp
mgl has quit [Quit: Client closed]
cage has joined #commonlisp
mgl has joined #commonlisp
dino_tutter has joined #commonlisp
rgherdt has quit [Read error: Connection reset by peer]
rgherdt_ has joined #commonlisp
lucasta has joined #commonlisp
ASLDC-worker-386 has joined #commonlisp
ASLDC-worker-386 has quit [Max SendQ exceeded]
dra_ has joined #commonlisp
dino_tutter has quit [Ping timeout: 245 seconds]
yewscion has quit [Ping timeout: 246 seconds]
rgherdt_ is now known as rgherdt
herjazz has quit [Quit: leaving]
dra_ has quit [Ping timeout: 245 seconds]
jmd_ has quit [Ping timeout: 245 seconds]
rgherdt has quit [Read error: No route to host]
rgherdt has joined #commonlisp
jonatack3 has quit [Ping timeout: 245 seconds]
tyson2 has quit [Remote host closed the connection]
yewscion has joined #commonlisp
jonatack3 has joined #commonlisp
morganw has quit [Remote host closed the connection]
rtypo has joined #commonlisp
tyson2 has joined #commonlisp
jonatack3 has quit [Ping timeout: 260 seconds]
NotThatRPG has joined #commonlisp
slyrus has quit [Read error: Connection reset by peer]
habamax has quit [Remote host closed the connection]
seok has joined #commonlisp
NotThatRPG has quit [Quit: My MacBook has gone to sleep. ZZZzzz…]
NotThatRPG has joined #commonlisp
eddof13 has joined #commonlisp
eddof13 has quit [Client Quit]
tyson2 has quit [Remote host closed the connection]
rpx has quit [Quit: Client closed]
szkl has joined #commonlisp
jonatack3 has joined #commonlisp
Cymew has quit [Ping timeout: 245 seconds]
son0p has quit [Ping timeout: 245 seconds]
Algernon69 has joined #commonlisp
Algernon69 has quit [Client Quit]
tyson2 has joined #commonlisp
eddof13 has joined #commonlisp
rgherdt has quit [Remote host closed the connection]
rgherdt has joined #commonlisp
<NotThatRPG> Should CL do macroexpansion on the body of DECLAIM? I think I have found that SBCL does expand macros inside the body (specifically inside a FUNCTION form inside an FTYPE declaration) but Allegro does not. The spec says the body isn't *evaluated* but doesn't say whether it's macro-expanded. Is one of these two implementations wrong, or is this an allowable variation?
<bike> declaration specifiers are not forms. they should not be macroexpanded.
<beach> I am pretty sure macro expansion is done only in a context of evaluation.
<bike> i'm not sure i understand what you mean by a function form inside an ftype declaration. do you mean a function _type_? there shouldn't be any forms.
AetherWind has quit [Quit: leaving]
igemnace has quit [Remote host closed the connection]
<NotThatRPG> What I was trying to do was to cut out the verbosity of having to declare return values as (values <real return values> &optional) to avoid the possibility of their being additional return values.
<NotThatRPG> So I wrote a macro called ONLY-VALUES &rest values that expands to that form. Interestingly, it seems to work on SBCL and errors out on Allegro.
dcb has joined #commonlisp
rgherdt has quit [Ping timeout: 258 seconds]
<NotThatRPG> Interestingly, trivial-macroexpand-all seems to follow Allegro and not expand inside a `FUNCTION` form.
<beach> As bike said, only forms are macroexpanded.
<NotThatRPG> I guess the short answer is that I would need to write a macro that wraps around declaim, and replaces `only-values` forms.
<bike> NotThatRPG: you can use deftype for that, if i understand you correctly
<bike> (deftype only-values (&rest values) `(values ,@values &optional))
<NotThatRPG> bike: Oh, neat! I had never thought of that!
<bike> I believe internally sbcl defines an 'sfunction' type so that (sfunction (foo) bar) = (sfunction (foo) (values bar &optional))
ROYGBYTE has joined #commonlisp
dino_tutter has joined #commonlisp
bendersteed has quit [Quit: bye]
tyson2 has quit [Ping timeout: 245 seconds]
lucasta has quit [Quit: Leaving]
<beach> Do you mean just FUNCTION on the right?
jmdaemon has joined #commonlisp
eelhazred has quit [Quit: Connection closed for inactivity]
<bike> yes, oops
slyrus has joined #commonlisp
attila_lendvai_ has joined #commonlisp
eddof13 has quit [Quit: My MacBook has gone to sleep. ZZZzzz…]
eddof13 has joined #commonlisp
ldb has joined #commonlisp
ldb has quit [Remote host closed the connection]
jonatack3 has quit [Quit: WeeChat 3.8]
jonatack has joined #commonlisp
rtypo has quit [Ping timeout: 252 seconds]
tyson2 has joined #commonlisp
masinter has quit [Remote host closed the connection]
eddof13 has quit [Quit: My MacBook has gone to sleep. ZZZzzz…]
eddof13 has joined #commonlisp
eddof13 has quit [Quit: My MacBook has gone to sleep. ZZZzzz…]
eddof13 has joined #commonlisp
eddof13 has quit [Client Quit]
rtypo has joined #commonlisp
robin has quit [Quit: Leaving]
aeth_ has joined #commonlisp
aeth has quit [Killed (NickServ (GHOST command used by aeth_))]
aeth_ is now known as aeth
ec has quit [Ping timeout: 240 seconds]
famicom_guy_ has joined #commonlisp
energizer_ has joined #commonlisp
ec has joined #commonlisp
sellers has joined #commonlisp
SAL9000 has quit [Killed (NickServ (GHOST command used by SAL9000_))]
SAL9000_ has joined #commonlisp
Psybur has joined #commonlisp
hirez has quit [*.net *.split]
jmercouris has quit [*.net *.split]
haku has quit [*.net *.split]
lieven has quit [*.net *.split]
gko` has quit [*.net *.split]
jcowan has quit [*.net *.split]
drmeister has quit [*.net *.split]
selwynning has quit [*.net *.split]
dale has quit [*.net *.split]
empwilli has quit [*.net *.split]
famicom_guy has quit [*.net *.split]
energizer has quit [*.net *.split]
froggey has quit [*.net *.split]
mgl has quit [Quit: Client closed]
empwilli has joined #commonlisp
dale has joined #commonlisp
drmeister has joined #commonlisp
gko` has joined #commonlisp
jmercouris has joined #commonlisp
froggey has joined #commonlisp
lieven has joined #commonlisp
hirez has joined #commonlisp
jcowan has joined #commonlisp
haku has joined #commonlisp
msavoritias has quit [Remote host closed the connection]
Brucio-61 has quit [Ping timeout: 246 seconds]
Brucio-61 has joined #commonlisp
count3rmeasure has joined #commonlisp
jrm2 has joined #commonlisp
jrm has quit [Ping timeout: 246 seconds]
jrm2 is now known as jrm
yewscion has quit [Remote host closed the connection]
<count3rmeasure> curious if anyone knows of selenium bindings for common lisp (or scheme!) or something that would help with automating web accessibility checking
morganw has joined #commonlisp
count3rmeasure has quit [Quit: Leaving]
cage has quit [Quit: rcirc on GNU Emacs 28.2]
thollief has quit [Quit: Leaving]
shka has quit [Ping timeout: 264 seconds]
attila_lendvai_ has quit [Ping timeout: 250 seconds]
Lycurgus has joined #commonlisp
yewscion has joined #commonlisp
dra_ has joined #commonlisp
dra_ has quit [Quit: Leaving]
dra has joined #commonlisp
dra has quit [Changing host]
dra has joined #commonlisp
Lycurgus has quit [Quit: Exeunt: personae.ai-integration.biz]
dra has quit [Client Quit]
thuna` has joined #commonlisp
varjag has joined #commonlisp
aljazmc has joined #commonlisp
Brucio-61 has quit [Remote host closed the connection]
Brucio-61 has joined #commonlisp
Brucio-61 has quit [Remote host closed the connection]
Brucio-61 has joined #commonlisp
eddof13 has joined #commonlisp
eddof13 has quit [Quit: My MacBook has gone to sleep. ZZZzzz…]
aljazmc has quit [Quit: Leaving]
dino_tutter has quit [Ping timeout: 244 seconds]
morganw has quit [Remote host closed the connection]
akoana has joined #commonlisp
tibfulv has quit [Remote host closed the connection]
tibfulv has joined #commonlisp
thuna` has quit [Remote host closed the connection]
waleee has joined #commonlisp
b00p has joined #commonlisp
son0p has joined #commonlisp
pve has quit [Quit: leaving]
thonkpod has quit [Ping timeout: 245 seconds]
thonkpod has joined #commonlisp
yewscion has quit [Remote host closed the connection]
random-nick has quit [Ping timeout: 246 seconds]