phoe 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/>
gamaliel11 has joined #commonlisp
gamaliel2 has quit [Client Quit]
s-liao has joined #commonlisp
s-liao has quit [Ping timeout: 256 seconds]
gamaliel11 has quit [Quit: Client closed]
shka has quit [Ping timeout: 240 seconds]
eugercek has quit [Read error: Connection reset by peer]
eugercek has joined #commonlisp
orestarod has quit [Ping timeout: 268 seconds]
eugercek has quit [Read error: Connection reset by peer]
gamaliel has quit [Ping timeout: 256 seconds]
<Guest74> anybody know of any examples of sb-alien:union?
Bike has quit [Quit: Lost terminal]
s-liao has joined #commonlisp
Cena has joined #commonlisp
Cena has quit [Client Quit]
<White_Flame> Guest74: yeah, I did some fp/int casting with it: https://plaster.tymoon.eu/view/2962
<Guest74> thanks, that looks like the same format. I'm guessing it needs something special if placed inside a struct.
Cena has joined #commonlisp
s-liao has quit [Ping timeout: 256 seconds]
<Guest74> oh, looks like I had to give a name to the slot holding it.  somehow I thought it'd just use the name of the union.
Cena has quit [Client Quit]
s-liao has joined #commonlisp
<White_Flame> it's been a long time since I tried that, can't answer any specifics :)
<Guest74> Well your response led me to the solution either way :)   Now to just get my macro to spit out the right code.
s-liao has quit [Ping timeout: 256 seconds]
Cena has joined #commonlisp
Cena has quit [Client Quit]
s-liao has joined #commonlisp
s-liao has quit [Ping timeout: 256 seconds]
gxt has quit [Remote host closed the connection]
gxt has joined #commonlisp
Inline__ has joined #commonlisp
s-liao has joined #commonlisp
Inline has quit [Ping timeout: 250 seconds]
torbo has joined #commonlisp
Bike has joined #commonlisp
s-liao has quit [Ping timeout: 256 seconds]
Guest74 has quit [Quit: Connection closed]
s-liao has joined #commonlisp
torbo has left #commonlisp [ERC (IRC client for Emacs 27.1)]
silasfox has quit [Ping timeout: 240 seconds]
silasfox has joined #commonlisp
s-liao has quit [Ping timeout: 256 seconds]
waleee has quit [Ping timeout: 245 seconds]
recordgroovy has joined #commonlisp
<beach> Good morning everyone!
tyson2 has quit [Remote host closed the connection]
akoana has joined #commonlisp
semz_ has joined #commonlisp
semz has quit [Ping timeout: 245 seconds]
semz_ is now known as semz
Bike has quit [Quit: Connection closed]
<Josh_2> Mornin'
s-liao has joined #commonlisp
s-liao has quit [Ping timeout: 256 seconds]
s-liao has joined #commonlisp
s-liao18 has joined #commonlisp
s-liao has quit [Ping timeout: 256 seconds]
asen has joined #commonlisp
asen has quit [Quit: Leaving]
hashfunc528 has joined #commonlisp
s-liao18 has quit [Ping timeout: 256 seconds]
<hashfunc528> not quite sure how to go about this problem. what is the idiomatic approach for returning a full string when looking for a particular substring in a string? meaning, in pseudo-code ... (find-string-from-substring-idiom "TEST" "TEST123456789") => "TEST123456789 ... where "TEST" is the substring I'm specifying, and "TEST123456789" is the string I'm searching
<beach> clhs search
<beach> You will get a position, and then you can use SUBSEQ to extract the subsequence.
<beach> clhs subseq
<hashfunc528> beach: i think that'll work perfectly. thank you
<beach> Pleasure.
s-liao has joined #commonlisp
jealousmonk has quit [Quit: ERC 5.4.1 (IRC client for GNU Emacs 27.1)]
<Posterdati> hi
<Posterdati> gsll, antik and cffi still brolen on freebsd and openbsd! :)
Cymew has joined #commonlisp
attila_lendvai has joined #commonlisp
Dynom has joined #commonlisp
s-liao has quit [Ping timeout: 256 seconds]
hashfunc528 has quit [Remote host closed the connection]
Cena has joined #commonlisp
eugercek has joined #commonlisp
contrapunctus has left #commonlisp [#commonlisp]
Cena has quit [Ping timeout: 256 seconds]
hashfuncb70 has joined #commonlisp
<hashfuncb70> is it just me or is dugging LABELS functions seemingly impossible?
<hashfuncb70> *debugging
contrapunctus has joined #commonlisp
<hashfuncb70> what is the idiomatic way to return an object from a list of objects based on the value of a particular field?
<White_Flame> (find value list :key #'field-reader)
<White_Flame> of (find-if (lambda (obj) ...test stuff) list)
rotateq has joined #commonlisp
<White_Flame> s/of/or/
mgl has joined #commonlisp
<hashfuncb70> White_Flame: ok thanks, i'll give that a go
random-nick has joined #commonlisp
<hashfuncb70> White_Flame: that was a very frustrating four hours haha. i was using find, but i never changed the :test predicate
<hashfuncb70> White_Flame: thanks for the quick reply tho. i think i learned a valuable lesson
<pjb> hashfuncb70: of course, debugging features are implementation dependent. However, you can write your own flet/labels macro to help debugging in implementations that are not very supportive. See for example com.informatimago.common-lisp.cesarum.utility:tracing-labels
<hashfuncb70> pjb: ok, thanks
mogan90 has joined #commonlisp
<pjb> hashfuncb70: note: some implementations let you designate local functions with expressions such as (top-level-function local-function) in operators such as CL:TRACE.
contrapunctus has left #commonlisp [#commonlisp]
<hashfuncb70> why would a "local function" be meaningful in my case? i don't know what that means
lisp123 has quit [Remote host closed the connection]
contrapunctus has joined #commonlisp
lisp123 has joined #commonlisp
<White_Flame> labels & flet define functions that are local to a lexical scope
s-liao has joined #commonlisp
amb007 has quit [Ping timeout: 256 seconds]
amb007 has joined #commonlisp
aartaka has quit [Ping timeout: 240 seconds]
lisp123 has quit [Quit: Leaving...]
recordgroovy has quit [Ping timeout: 272 seconds]
lisp123 has joined #commonlisp
recordgroovy has joined #commonlisp
<lisp123> Off topic, but are all of the Ukraine & Russian Lispers okay? Let us know if need any help..
admich has joined #commonlisp
amb007 has quit [Read error: Connection reset by peer]
amb007 has joined #commonlisp
recordgroovy has quit [Ping timeout: 240 seconds]
s-liao has quit [Ping timeout: 256 seconds]
recordgroovy has joined #commonlisp
MajorBiscuit has joined #commonlisp
<jackdaniel> n.b people in belarus are also in a situation that is not pleasent
<lisp123> +1
shka has joined #commonlisp
<hashfuncb70> White_Flame: ok thanks. i understand. i was trying to connect the dots between my question and pjb's statement
Alfr has quit [Quit: Leaving]
<hashfuncb70> lisp123: ^ i agree. please let the channel know if there's anything the community can do to help
Alfr has joined #commonlisp
hashfuncb70 has quit [Remote host closed the connection]
s-liao has joined #commonlisp
lisp123 has quit [Remote host closed the connection]
lisp123 has joined #commonlisp
s-liao has quit [Ping timeout: 256 seconds]
lisp123 has quit [Ping timeout: 240 seconds]
akoana has quit [Quit: leaving]
scymtym has quit [Ping timeout: 240 seconds]
lisp123 has joined #commonlisp
gxt has quit [Remote host closed the connection]
gxt has joined #commonlisp
lisp123 has quit [Remote host closed the connection]
s-liao has joined #commonlisp
s-liao has quit [Ping timeout: 256 seconds]
s-liao has joined #commonlisp
scymtym has joined #commonlisp
s-liao has quit [Client Quit]
lisp123 has joined #commonlisp
lisp123 has quit [Ping timeout: 250 seconds]
Tallund16 has joined #commonlisp
mogan90 has quit [Ping timeout: 240 seconds]
Tallund16 has quit [Client Quit]
v88m has quit [Ping timeout: 256 seconds]
cage has joined #commonlisp
v88m has joined #commonlisp
attila_lendvai has quit [Ping timeout: 256 seconds]
jeosol has quit [Quit: Client closed]
mgl has quit [Quit: Client closed]
v88m has quit [Ping timeout: 240 seconds]
v88m has joined #commonlisp
tyson2 has joined #commonlisp
v88m has quit [Ping timeout: 245 seconds]
mgl has joined #commonlisp
admich has quit [Ping timeout: 272 seconds]
mogan90 has joined #commonlisp
Cymew has quit [Ping timeout: 272 seconds]
s-liao has joined #commonlisp
Cymew has joined #commonlisp
pranavats has left #commonlisp [Error from remote client]
danieli has quit [Quit: Alpine Linux, the security-oriented, lightweight Linux distribution]
danieli has joined #commonlisp
pranavats has joined #commonlisp
zacque has quit [Quit: Goodbye :D]
s-liao has quit [Ping timeout: 256 seconds]
Inline__ has quit [Quit: Leaving]
Inline has joined #commonlisp
Bike has joined #commonlisp
waleee has joined #commonlisp
admich has joined #commonlisp
vcarvalho has joined #commonlisp
vcarvalho has quit [Client Quit]
admich has quit [Read error: Connection reset by peer]
mgl has quit [Quit: Client closed]
admich has joined #commonlisp
mister_m` has joined #commonlisp
hineios3 has joined #commonlisp
Lord_of_Life_ has joined #commonlisp
greyrat_ has joined #commonlisp
zachel_ has joined #commonlisp
Bike_ has joined #commonlisp
luna-is-here_ has joined #commonlisp
cross_ has joined #commonlisp
aeth_ has joined #commonlisp
stack2 has joined #commonlisp
ryanbw1 has joined #commonlisp
rdrg109_ has joined #commonlisp
Oladon has joined #commonlisp
Bike has quit [*.net *.split]
greyrat has quit [*.net *.split]
Lord_of_Life has quit [*.net *.split]
ryanbw has quit [*.net *.split]
stack1 has quit [*.net *.split]
cross has quit [*.net *.split]
mister_m has quit [*.net *.split]
phantomics has quit [*.net *.split]
luna-is-here has quit [*.net *.split]
zachel has quit [*.net *.split]
aeth has quit [*.net *.split]
rdrg109 has quit [*.net *.split]
Lord_of_Life_ is now known as Lord_of_Life
hineios3 is now known as hineios
rotateq has quit [Remote host closed the connection]
phantomics has joined #commonlisp
waleee has quit [Ping timeout: 256 seconds]
mister_m` is now known as mister_m
Cymew has quit [Ping timeout: 240 seconds]
mgl has joined #commonlisp
Bike_ is now known as Bike
silasfox has quit [Ping timeout: 240 seconds]
silasfox has joined #commonlisp
lisp123 has joined #commonlisp
lisp123 has quit [Ping timeout: 252 seconds]
cosimone has joined #commonlisp
admich has quit [Remote host closed the connection]
jemoka has joined #commonlisp
jemoka has joined #commonlisp
jemoka has quit [Changing host]
jealousmonk has joined #commonlisp
Oladon has quit [Quit: Leaving.]
jemoka has quit [Quit: ZNC 1.9.x-git-126-0b8276c1 - https://znc.in]
jeosol has joined #commonlisp
ghost4096 is now known as pranshukhandal
attila_lendvai has joined #commonlisp
attila_lendvai has quit [Read error: Connection reset by peer]
cross_ is now known as cross
jmes has joined #commonlisp
mogan90 has quit [Ping timeout: 240 seconds]
ryanbw1 is now known as ryanbw
ebrasca has joined #commonlisp
waleee has joined #commonlisp
notzmv has quit [Ping timeout: 240 seconds]
mgl has quit [Ping timeout: 256 seconds]
<jmes> Does anyone know of common lisp audio/video codec libraries (of any kind, but specifically AAC/H.265)? Also if anyone knows which IRC channel I can talk to codec people that would be useful :)
<Josh_2> h.265 no chance
Josh_2 has quit [Quit: ERC (IRC client for Emacs 27.1)]
<jackdaniel> jmes: the best chance would be writing a library that uses a foreign function interface to access existing libraries with C ABI
<jmes> jackdaniel: Thanks, that may be my approach. I'm looking for an excuse to try out the CFFI library anyway
<|3b|> ffi to C libs is more likely to exist already, and much more likely to get useful results :)
<random-nick> there's a codec for MJPEG in pure CL
<|3b|> (for that specific task, i mean. implementing things in CL in general is good :)
<jmes> Gotcha, |3b| :P
<random-nick> or at least a decoder?
<jackdaniel> decodec :)
mgxm has quit [Quit: ....]
mgxm has joined #commonlisp
MajorBiscuit has quit [Quit: WeeChat 3.4]
Inline has quit [Quit: Leaving]
Inline has joined #commonlisp
<lagash> random-nick: which library would that be now? https://github.com/sharplispers/cl-jpeg
<random-nick> it's what allows mezzano to play video
<random-nick> though it would probably be possible to port a codec written in C/C++ to mezzano the same way quake and doom were ported
<lagash> I was gonna say cl-video next :P it uses cl-jpeg
dirtcastle has joined #commonlisp
tyson2 has quit [Remote host closed the connection]
notzmv has joined #commonlisp
<|3b|> for ffi, there are at least cl-flac, cl-vorbis, cl-mpg123 in ql, and probably some UI or game libs can also do audio/video decoding
<|3b|> and i think there have been a few attempts at wrapping ffmpeg and similar
Brucio-61 has joined #commonlisp
v88m has joined #commonlisp
<|3b|> also mixalot has similar set of ffi audio, and there seems to be easy-audio that does some CL decoding of flac and some other lossless audio
orestarod has joined #commonlisp
<jmes> ooh, interesting, I'll have a look. Thanks |3b|
Catie has quit [Remote host closed the connection]
dirtcastle has quit [Ping timeout: 240 seconds]
morganw has joined #commonlisp
Catie has joined #commonlisp
Desk has joined #commonlisp
dec0d3r has joined #commonlisp
tyson2 has joined #commonlisp
mksybr has joined #commonlisp
santiagopim has joined #commonlisp
aeth_ has quit [Ping timeout: 240 seconds]
aeth has joined #commonlisp
dec0d3r has quit [Quit: Leaving]
Lord_of_Life_ has joined #commonlisp
Lord_of_Life has quit [Ping timeout: 256 seconds]
Lord_of_Life_ is now known as Lord_of_Life
gjvc has quit [Quit: leaving]
gjvc has joined #commonlisp
tyson2 has quit [Remote host closed the connection]
lispy has joined #commonlisp
perrierjouet has quit [Quit: WeeChat 3.4]
perrierjouet has joined #commonlisp
cosimone has quit [Remote host closed the connection]
cosimone has joined #commonlisp
Desk has quit [Remote host closed the connection]
Desk has joined #commonlisp
cage has quit [Quit: rcirc on GNU Emacs 27.1]
tyson2 has joined #commonlisp
perrierjouet has quit [Quit: WeeChat 3.4]
Brucio-61 has quit [Ping timeout: 252 seconds]
scymtym has quit [Ping timeout: 245 seconds]
v88m has quit [Ping timeout: 252 seconds]
perrierjouet has joined #commonlisp
cosimone has quit [Quit: ERC (IRC client for Emacs 27.1)]
silasfox has quit [Quit: WeeChat 3.4]
morganw has quit [Remote host closed the connection]
morganw has joined #commonlisp
Dynom has quit [Quit: WeeChat 3.4]
wyrd has quit [Ping timeout: 240 seconds]
scymtym has joined #commonlisp
wyrd has joined #commonlisp
<dbotton> I've started work on a Common Lisp tutorial (with CLOG thrown in) this is the intro. The audience is to attract people to Lisp using CLOG. Comments always welcome (will be going off line soon but will be back tomorrow). Comments corrections and defects in my choice of terms always welcome. https://docs.google.com/document/d/1Mdp8IY7KzNxcThe9iZHXbyILKSYDWaNJX6k68aYpVR4/edit?usp=sharing
shapr has joined #commonlisp
<shapr> hi! Is there a shell.nix for getting started with common lisp in nixos?
<drakonis> wouldnt that be best asked in nixos's irc channels or matrix?
<shapr> could be?
<drakonis> its not a particularly popular language in nixpkgs buuut
<drakonis> let's see
<shapr> ok, I got it working
eugercek has quit [Remote host closed the connection]
hashfunc803 has joined #commonlisp
<hashfunc803> is it possible to jump back to the beginning of a loop if a certain condition is met?
<hashfunc803> meaning in pseudo-code:
xaltsc has quit [Remote host closed the connection]
<hashfunc803> (loop :until (condition) :do ((lambda (x)) (if x (jump-to-beginning-of-loop (pop list-of-thinigs))) (list-of-things)))
<random-nick> I don't think loop has such a feature
<random-nick> but in that specific case, why not use the list iteration clause
<hashfunc803> random-nick: doing some further research and it's looking like GO or TAGBODY might do the trick, but i think i may have a bad design if i have to resort to those
<random-nick> :for x :in list-of-things :until (condition)
<random-nick> etc.
lisp123 has joined #commonlisp
<hashfunc803> random-nick: i look into that
<hashfunc803> thanks
<random-nick> GO and TAGBODY will let you move inside the loop clause or exit the loop altogether (either above or below)
<|3b|> if it isn't too complicated, sometimes you can just put "the rest of the loop" in a separate DO, and guard that with WHEN or UNLESS
<random-nick> but LOOP doesn't give you labels for the iteration code you can GO to
<|3b|> (loop ... do (stuff) unless x do (rest of stuff))
<random-nick> there's also DO if you don't need LOOP's advanced features
<hashfunc803> ok thanks ya'll
<random-nick> oh, I above I meant to day
<random-nick> GO and TAGBODY will let you move inside the :DO clause
<random-nick> say*
<aeth> DO has an implicit tagbody
<aeth> so DO can do everything
<random-nick> TAGBODY has an explicit tagbody
<random-nick> so it can also do everything
<hashfunc803> alright if i think i figured out an approach
<hashfunc803> another question, is if there's a function that returns the item removed from a list?
<hashfunc803> meaining in pseudo-code:
<hashfunc803> (remove 3 '(1 2 3 4 5)) => 3
<hashfunc803> with the side-effect on the list being => '(1 2 4 5)
lispy has quit [Quit: Leaving]
cognemo has quit [Quit: ZNC 1.8.2 - https://znc.in]
cognemo has joined #commonlisp
Bike has quit [Quit: Lost terminal]
<White_Flame> hashfunc803: remember, a "list" is not a first class object, only cons cells are. In order to mutate a list, given that the first cons cell might be removed or replaced, you need to setf back into the place that it was read from
<White_Flame> so if some binding held (1 2 3 4 5), and you did (delete 1 my-list), my-list would still reference the original cons cell, and likely still hold (1 2 3 4 5), while DELETE might return just the 2nd cons cell onward for (2 3 4 5)
Bike has joined #commonlisp
fitzsim has quit [Ping timeout: 256 seconds]
dirtcastle has joined #commonlisp
shka has quit [Ping timeout: 260 seconds]
Guest74 has joined #commonlisp
lisp123 has quit [Remote host closed the connection]
lisp123 has joined #commonlisp
lisp123 has quit [Ping timeout: 240 seconds]