Xach 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>
zuckonit has quit [Read error: Connection reset by peer]
zuckonit has joined #commonlisp
Alfr has quit [Killed (copper.libera.chat (Nickname regained by services))]
Alfr has joined #commonlisp
<zuckonit> lotuseater:)
attila_lendvai_ has joined #commonlisp
luna-is-here has quit [Read error: Connection reset by peer]
Inline has quit [Ping timeout: 240 seconds]
attila_lendvai has quit [Ping timeout: 240 seconds]
edgar-rft has quit [Ping timeout: 240 seconds]
Inline_ has joined #commonlisp
<lotuseater> zuckonit: when I'm anytime once again forced to use windows for work it's good there runs Emacs too
<zuckonit> very true lol
<zuckonit> i try to ssh off my mac to run emacs in terminal
luna-is-here has joined #commonlisp
edgar-rft has joined #commonlisp
<zuckonit> i really hate using windows
<zuckonit> at least now i can stay logged in irc through termux on my android lol
<zuckonit> it also runs emacs which is so nice
<zuckonit> similar to brew install
<zuckonit> pkg install
<zuckonit> i might go back on tripsit for a bit though
karlosz has quit [Quit: karlosz]
doyougnu has quit [Remote host closed the connection]
zuckonit has quit [Ping timeout: 240 seconds]
zuckonit has joined #commonlisp
Lord_of_Life has quit [Ping timeout: 250 seconds]
Lord_of_Life has joined #commonlisp
recordgroovy has quit [Quit: leaving]
recordgroovy has joined #commonlisp
zuckonit has quit [Read error: Connection reset by peer]
zuckonit has joined #commonlisp
scymtym has quit [Ping timeout: 250 seconds]
srhm has joined #commonlisp
tyson2 has quit [Remote host closed the connection]
khrbt has quit [Ping timeout: 252 seconds]
kulernil has quit [Remote host closed the connection]
kulernil has joined #commonlisp
d4ryus1 has quit [Ping timeout: 240 seconds]
kulernil has quit [Remote host closed the connection]
khrbt has joined #commonlisp
zuckonit has quit [Ping timeout: 250 seconds]
srhm has quit [Read error: Connection reset by peer]
srhm has joined #commonlisp
srhm has quit [Read error: Connection reset by peer]
srhm has joined #commonlisp
kuler has joined #commonlisp
kuler has quit [Remote host closed the connection]
kuler has joined #commonlisp
d4ryus1 has joined #commonlisp
srhm has quit [Read error: Connection reset by peer]
srhm has joined #commonlisp
zuckonit has joined #commonlisp
twi has quit [Ping timeout: 248 seconds]
srhm has quit [Read error: Connection reset by peer]
srhm has joined #commonlisp
srhm has quit [Read error: Connection reset by peer]
srhm has joined #commonlisp
srhm has quit [Read error: Connection reset by peer]
srhm has joined #commonlisp
srhm has quit [Read error: Connection reset by peer]
srhm has joined #commonlisp
semz has quit [Ping timeout: 250 seconds]
srhm has quit [Read error: Connection reset by peer]
srhm has joined #commonlisp
prxq has quit [Ping timeout: 250 seconds]
prxq has joined #commonlisp
lisp123 has joined #commonlisp
srhm has quit [Read error: Connection reset by peer]
srhm has joined #commonlisp
semz has joined #commonlisp
Spawns_Carpeting has joined #commonlisp
lisp123 has quit [Ping timeout: 250 seconds]
Oladon has joined #commonlisp
Spawns_Carpeting has quit [Ping timeout: 250 seconds]
Spawns_Carpeting has joined #commonlisp
srhm has quit [Read error: Connection reset by peer]
srhm has joined #commonlisp
srhm has quit [Read error: Connection reset by peer]
srhm has joined #commonlisp
<hexology> does anyone know what might cause this error when i run `qlot install`? https://bpa.st/ZW7Q the core of the error seems to be: Symbol "SYSTEM-AREA-UB8-FILL" not found in the SB-KERNEL package. the qlfile contains: `ql st-json`. did if find a bug in qlot? some change in backward compatibility in sbcl?
<Bike> sb-kernel is an internal and unstable sbcl package. if qlot is referring to it, it may be out of step with your sbcl version. or rather static vectors is, looks like it
<beach> Good morning everyone!
<hexology> Bike: thanks, sounds like maybe i should file a bug report. i'm not entirely sure how to control which version/implementation to run qlot with
<hexology> good morning beach
srhm has quit [Read error: Connection reset by peer]
cross has joined #commonlisp
<hexology> hmm
Spawns_Carpetin- has joined #commonlisp
Spawns_Carpeting has quit [Ping timeout: 248 seconds]
Bike has quit [Quit: Lost terminal]
recordgroovy has quit [Remote host closed the connection]
<hexology> what's a roswell "env"? i don't see any references to it in the docs, nor do i see a way to create or manage envs
<hexology> an unfinished feature?
semz has quit [Ping timeout: 250 seconds]
<lotuseater> maybe government hides the knowledge about it in another X-File
<lotuseater> sorry, I couldn't resist
srhm has joined #commonlisp
Spawns_Carpetin- has quit [Ping timeout: 250 seconds]
Spawns_Carpeting has joined #commonlisp
<hexology> sometimes i feel like i'm investigating an x-file when trying to learn how to use this stuff
<lotuseater> :D
semz has joined #commonlisp
<hexology> it looks like my issue with qlot has been resolved by nuking both qlot and roswell and starting over
<lotuseater> sorry I never used any of the two
Spawns_Carpeting has quit [Ping timeout: 252 seconds]
Spawns_Carpeting has joined #commonlisp
asarch has joined #commonlisp
waleee has quit [Ping timeout: 250 seconds]
<asarch> How do you increase the heap size?
<White_Flame> in SBCL, it's a cmdline option
<White_Flame> can't change it at runtime
<asarch> "Heap exhausted during allocation: 172654592 bytes available, 376885056 requested."
<asarch> How?
<White_Flame> I could check the manual, if you're not ;-P
<lotuseater> hm what are you doing? ^^
Spawns_Carpeting has quit [Ping timeout: 252 seconds]
<asarch> I have a small web application written with Caveman2 and I tried to upload the classic Quake II tarball to the server
<White_Flame> --dynamic-space-size <number of megabytes>
<lotuseater> uii Quake :)
<hayley> sbcl --dynamic-space-size 12345
srhm has quit [Quit: Konversation terminated!]
<hayley> If you are going to handle big uploads, you probably want to stream to disk rather than make a copy in memory. But I don't know how you do that.
srhm has joined #commonlisp
<asarch> This is the error log: https://pastebin.com/vUpqR947
Spawns_Carpeting has joined #commonlisp
<lotuseater> something like (make-array '#.(loop :for i :from 3 :to 20 :collect i)) is also a good candidate to exhaust the heap :P
<hayley> (loop collect 1) ; and wait
<lotuseater> haha, this also
<lotuseater> such a loop construct should be declined at compilation
<asarch> This is the controller code: https://pastebin.com/Y80JhxqU
<hayley> Good luck with that.
<lotuseater> you think so?
Oladon has quit [Quit: Leaving.]
<hayley> Hm, you only get a vector input stream? That is strange.
<hayley> Hunchentoot writes out a temporary file at least.
<asarch> The POST value _parsed has: (("nombre" #<FLEXI-STREAMS::VECTOR-INPUT-STREAM {1005996113}> "Screenshot_2021-02-02-00-01-21.jpeg" "image/jpeg"))
lisp123 has joined #commonlisp
Spawns_Carpetin- has joined #commonlisp
Spawns_Carpeting has quit [Ping timeout: 240 seconds]
srhm has quit [Read error: Connection reset by peer]
srhm has joined #commonlisp
akoana has quit [Quit: leaving]
srhm has quit [Quit: Konversation terminated!]
Spawns_Carpeting has joined #commonlisp
Spawns_Carpetin- has quit [Ping timeout: 240 seconds]
kuler has quit [*.net *.split]
gxt_ has quit [*.net *.split]
hendursaga has quit [*.net *.split]
azimut_ has quit [*.net *.split]
Inline_ has quit [Quit: Leaving]
elderK has quit [Quit: Connection closed for inactivity]
azimut has joined #commonlisp
gxt_ has joined #commonlisp
Spawns_Carpetin- has joined #commonlisp
hendursaga has joined #commonlisp
lisp123 has quit [Remote host closed the connection]
Spawns_Carpeting has quit [Ping timeout: 248 seconds]
lisp123 has joined #commonlisp
lisp123 has quit [Client Quit]
Spawns_Carpetin- has quit [Ping timeout: 240 seconds]
Spawns_Carpeting has joined #commonlisp
lisp123 has joined #commonlisp
shka has joined #commonlisp
shka has quit [Client Quit]
shka has joined #commonlisp
Spawns_Carpeting has quit [Ping timeout: 240 seconds]
Spawns_Carpeting has joined #commonlisp
rain3 has joined #commonlisp
gaqwas has joined #commonlisp
hexology has quit [Ping timeout: 258 seconds]
kakuhen has quit [Quit: Leaving...]
<flip214> hunchentoot will write files to disk already, and pass a stream to the handler.
<flip214> are the ELS 2020 videos no longer available on twitch?
<hayley> I don't think Twitch caches videos for very long. Or YouTube?
<moon-child> I think I
<moon-child> may have downloaded a copy
<moon-child> one sec, I'll check
kakuhen has joined #commonlisp
Spawns_Carpetin- has joined #commonlisp
Spawns_Carpeting has quit [Ping timeout: 250 seconds]
<flip214> thanks a lot!!
tophullyte has joined #commonlisp
silasfox11 has joined #commonlisp
Cymew has joined #commonlisp
silasfox11 has quit [Client Quit]
silasfox9 has joined #commonlisp
silasfox9 has quit [Client Quit]
v88m has quit [Ping timeout: 250 seconds]
amb007 has quit [Ping timeout: 250 seconds]
amb007 has joined #commonlisp
makomo has joined #commonlisp
<asarch> It tool
<asarch> I mean, it took ~6 min to transfer the 380 MB of the tarball
<asarch> And with FiSH with Gnome's Files, only ~2 min
<asarch> Omoshiroi desu ne
<hayley> Well, what do you expect by introducing more indirection while copying? I guess 6 minutes is a lot, sure.
<flip214> asarch: HTTP or HTTPS?
<asarch> HTTP on the Caveman2 app and SSH with Gnome's File
Spawns_Carpetin- has quit [Read error: Connection reset by peer]
<flip214> asarch: SBCL?
<asarch> Yeah, "This is SBCL 2.1.7, an implementation of ANSI Common Lisp."
<asarch> On Debian Bullseye for AMD64
<flip214> asarch: https://github.com/phmarek/sbcl/tree/stream-buffer-size has two patches on top that allow you to change the default buffer size via a special variable.
<moon-child> 3x difference is suspiciously long
<flip214> You could try to set eg. (* 128 1024) instead of the default 4KB.
Spawns_Carpeting has joined #commonlisp
<asarch> I did (from White_Flame and hayley suggestion): sbcl --dynamic-space-size 567890
<saturn2> how much CPU is being used by sbcl during the transfer?
<hayley> You have 568GB of RAM?
<asarch> Wow! That's a lot of RAM!
<asarch> No, I only have 3.5 GB :'-(
<asarch> CPU: Intel® Pentium(R) CPU N3540 @ 2.16GHz × 4
<flip214> asarch: well, the heap size isn't related to the stream buffer size in any way. The latter being small might be part of the slowdown.
<flip214> hayley: searching for els2021 on youtube gives ... interesting results.
<asarch> The 256.3 MB of the Unreal tarball consumes about ~7.7% of the CPU
<hayley> Right, those would not be on Twitch, and I don't think they have been uploaded elsewhere.
<flip214> ah, thanks again
<lotuseater> No minimum 1TB RAM? :(
<lotuseater> or having some Spintronics RAM on top :3
pve has joined #commonlisp
mfiano has quit [Ping timeout: 268 seconds]
Spawns_Carpeting has quit [Ping timeout: 252 seconds]
mfiano has joined #commonlisp
Spawns_Carpeting has joined #commonlisp
v88m has joined #commonlisp
psycomic has joined #commonlisp
Th30n has joined #commonlisp
Spawns_Carpetin- has joined #commonlisp
elf_fortrez has joined #commonlisp
Spawns_Carpeting has quit [Ping timeout: 248 seconds]
asarch_ has joined #commonlisp
tophullyte has quit [Ping timeout: 252 seconds]
okflo has joined #commonlisp
asarch_ has quit [Client Quit]
asarch has quit [Ping timeout: 240 seconds]
gaqwas has quit [Ping timeout: 250 seconds]
hendursa1 has joined #commonlisp
hendursaga has quit [Ping timeout: 276 seconds]
Spawns_Carpeting has joined #commonlisp
Spawns_Carpetin- has quit [Ping timeout: 240 seconds]
mfiano has quit [Ping timeout: 240 seconds]
domovod has joined #commonlisp
cosimone has joined #commonlisp
cosimone` has joined #commonlisp
cosimone` has quit [Remote host closed the connection]
cosimone` has joined #commonlisp
cosimone has quit [Ping timeout: 250 seconds]
lisp123 has quit [Quit: Leaving...]
mfiano has joined #commonlisp
phantomics has quit [Ping timeout: 248 seconds]
scymtym has joined #commonlisp
mfiano has quit [Ping timeout: 240 seconds]
phantomics has joined #commonlisp
Spawns_Carpetin- has joined #commonlisp
Spawns_Carpeting has quit [Ping timeout: 252 seconds]
selwyn has joined #commonlisp
Qwnavery has joined #commonlisp
vats has joined #commonlisp
mfiano has joined #commonlisp
cosimone` has quit [Remote host closed the connection]
cosimone has joined #commonlisp
v88m has quit [Ping timeout: 250 seconds]
Spawns_Carpeting has joined #commonlisp
Spawns_Carpetin- has quit [Ping timeout: 248 seconds]
Spawns_Carpetin- has joined #commonlisp
Spawns_Carpeting has quit [Ping timeout: 252 seconds]
PinealGlandOptic has joined #commonlisp
Spawns_Carpeting has joined #commonlisp
Cymew has quit [Ping timeout: 248 seconds]
Spawns_Carpetin- has quit [Ping timeout: 250 seconds]
peterhil has joined #commonlisp
kakuhen has quit [Quit: Leaving...]
elf_fortrez has quit [Ping timeout: 246 seconds]
random-nick has joined #commonlisp
Spawns_Carpetin- has joined #commonlisp
Spawns_Carpeting has quit [Ping timeout: 240 seconds]
domovod has quit [Quit: WeeChat 3.2]
Spawns_Carpetin- has quit [Ping timeout: 252 seconds]
Spawns_Carpeting has joined #commonlisp
Spawns_Carpeting has quit [Ping timeout: 240 seconds]
livoreno has joined #commonlisp
Spawns_Carpeting has joined #commonlisp
karlosz has joined #commonlisp
Qwnavery has quit [Quit: WeeChat 3.2]
cosimone has quit [Ping timeout: 250 seconds]
<flip214> With SBCL's "Control stack exhausted", the backtrace command only shows 5 frames - none of lisp code. How can I find out what the problem is?
igemnace has quit [Quit: WeeChat 3.2]
dlowe has joined #commonlisp
Cymew has joined #commonlisp
engblom has joined #commonlisp
<engblom> What is the most elegant way to create a list of length n where each element is (random 10)?
<engblom> (dotimes ...) feels like overkill.
<Xach> (map-into (make-list 10) (lambda () (random 10)))
<_death> or (loop repeat 10 collect (random 10))
<Xach> this received the P**l Gr***m excellence in elegance award in 2004
<Xach> loop cannot be elegant
<_death> it doesn't have to be elegant, just "most elegant" :)
<Xach> (mapcar #'random (make-list 10 :initial-element 10))
<hayley> Xach: If one uses SICL LOOP, macroexpansion will necessarily use CLOS and so P**l Gr***m will not come within a 10 mile radius of your computer
<lotuseater> hayley: xD
<lotuseater> so it's like a magical wall
<engblom> From where is (random ...) pulling the value if you use sbcl? From /dev/random?
<lotuseater> how does Arc handle those things asked by engblom?
<lotuseater> I think it has its own seed.
<lotuseater> or wait what was the other word i mean ...
<lotuseater> cycle length? for a Mersenne twister
<_death> engblom: sbcl contains an implementation of a pseudo random number generator called mersenne twister 19937
<lotuseater> or maybe period length
<flip214> Ain't there no MAP* equivalent for (apply #'append (mapcar ...)?? MAPCAN does NCONC and so modifies the lists... should I use that and have a MAPCAR #'COPY-SEQ inbetween?
<_death> alexandria:mappend
<lotuseater> engblom: maybe in the future SICL will use Hadamard gates for generating real random numbers ^^
<engblom> :)
<hayley> We do need a RANDOM implementation eventually.
<engblom> You think you will use lisp on quantum computers :)
<lotuseater> or Lava lamps
<lotuseater> engblom: why just think that?
<_death> engblom: with this https://gist.github.com/death/ba34a87cd43fc041215f36c735e0fe13 you can cheat at sbcl
<hayley> I know stylewarning thinks he does, probably because he does.
<lotuseater> it's the only natural option for that
<engblom> lotuseater: Hadamard gate is something in quantum computers.
<lotuseater> engblom: I know? why do you think I mentioned that ^^
<lotuseater> look for Rigetti and their Quil compiler
<lotuseater> and they were founded by someone who worked at DWave before that, which programs their QCs also with CL
* engblom wrote his Batchelor's Thesis about quantum computers...
<lotuseater> and now?
<engblom> It was just a trivial thesis where I explained everything needed in order to understand the Deutsch–Jozsa algorithm.
<lotuseater> but cool indeed
<engblom> That is why I happened to know what Hadamard gates are
<lotuseater> okay and now you know what's also a good fit for programming them, not just simulating :)
lisp123 has joined #commonlisp
<lotuseater> and you can load the QVM for trying things out
<flip214> _death: ah, thanks
attila_lendvai_ has quit [Ping timeout: 250 seconds]
Josh_2 has joined #commonlisp
<Josh_2> Hi, who has seen the project to create a working version of Interlisp on modern systems?
<Josh_2> I tried it out last night, certainly interesting
<lotuseater> oh do you have a link?
<Josh_2> If I release a private project under gpl3 does that mean I have to already have instructions on how to install/modify?
<flip214> Josh_2: no. Documentation is not required.
<Josh_2> okay thanks, guess I'll use gpl3
<flip214> But perhaps you might want to use LLGPL3 (Lisp-Lesser GPL), to clear up minor details about using your library in an image.
Bike has joined #commonlisp
* lotuseater wondered some time how it fits together if a non GPL project uses gcc for compiling
<Josh_2> I looked into LLGPL and on the cliki it says just to use GPL3
<Josh_2> contrapunctus: you here?
lisp123 has quit [Quit: Leaving...]
<contrapunctus> Josh_2: where else do I know you? O.o
<Josh_2> idk
<Josh_2> probably just here
<contrapunctus> Hehe
<Josh_2> I made my matrix bot open source
<lotuseater> or from #lispcafe :)
<contrapunctus> Nice
<Josh_2> Nah I'm not in #lispcafe
<Josh_2> https://github.com/K1D77A/LunaMech contrapunctus
<Josh_2> it does not build right now because of the defmodule macro... but I am going away for the weekend
<Josh_2> plus all the documentation I had written was on a taiga instance which has been shutdown...
<Josh_2> going away for the weekend so thought I'd make it opensource now and deal with the problems later :O
<contrapunctus> Josh_2: thanks for making it FOSS and for sharing it with me.
<contrapunctus> I'm busy with CLIM these days, but if I get back to the XMPP-Matrix bridge project, this will be a big help.
<Josh_2> Well its got an implementation of the matrix API in src/api, but its so intertwined with the bots code that I dont know if I can be bothered to untangle it all and create a library
cage has joined #commonlisp
<hayley> How many matrix(-the-messaging-protocol) libraries do we need?
<flip214> Josh_2: ah, so LGPL is good enough. thanks for the link!
doyougnu has joined #commonlisp
<Josh_2> hayley: another reason why I didn't bother separating them
engblom has left #commonlisp [#commonlisp]
<Josh_2> Altho tbf pretty sure there is only 1 other matrix api, and when I started mine Gnuxie's was totally unreadable sooo
<Josh_2> can't really blame me
<hayley> Where did you learn to read?
<Josh_2> Clearly I haven't
hendursa1 has quit [Quit: hendursa1]
hendursaga has joined #commonlisp
cosimone has joined #commonlisp
CrashTestDummy2 has joined #commonlisp
CrashTestDummy has quit [Ping timeout: 250 seconds]
<Gnuxie> You were probably reading the generator output, which was written to files because at the time I didn't realise I could just leave it in a macroexpansion
<Gnuxie> The files did say that though
<Gnuxie> But as I have said many times, if we ever do this again it will be better to have some model of http apis in CLOS that can be used to generate much richer libraries
<Gnuxie> Like open api 2 except not quite so constrained by YAML or some other thing
Inline has joined #commonlisp
attila_lendvai has joined #commonlisp
<Josh_2> Lots of the api is hidden away in random MSC's
<Josh_2> not sure if an auto generator is all that useful beyond a point
<Josh_2> not that I dont appreciate the efforts ofc
okflo has quit [Quit: WeeChat 3.2]
okflo has joined #commonlisp
Oladon has joined #commonlisp
Alfr has quit [Ping timeout: 248 seconds]
Alfr has joined #commonlisp
hexology has joined #commonlisp
Th30n has quit [Quit: WeeChat 3.2]
Alfr is now known as Guest7145
Guest7145 has quit [Killed (silver.libera.chat (Nickname regained by services))]
Alfr has joined #commonlisp
selwyn has quit [Read error: Connection reset by peer]
lisp123 has joined #commonlisp
lisp123 has quit [Client Quit]
Alfr has quit [Ping timeout: 240 seconds]
lisp123 has joined #commonlisp
Alfr has joined #commonlisp
francogrex has joined #commonlisp
<francogrex> Hi, does anyone use linj or jnil, the lisp <-> java translators? I show an example of what jnil can do here: https://pastebin.com/kMx0QneB
<francogrex> But I am looking for partnership on a project related to that: the "linj" programs are not executable by themselves unless translated to java, I would like to change that.
<raeda> Why don't you just use ABCL and interop directly with Java?
<francogrex> I get that reflection often but you can see the advantage of using jnil at least, it does the work automatically for you
<francogrex> maybe if someone works with me on this we might find a way to use ABCL to execute the resultant linj program
<raeda> What's your end goal? To run Java code in a Lisp image?
<raeda> I'm currently working on a CL library that generates JVM bytecode, but I'm not sure that's what you want
<francogrex> raeda: good for the lib/jvm bytecode. I am interested of course. yes my end goal would be to run Java code in a Lisp image, but "interactively"
<francogrex> (i.e. not to compile a java class and load it into lisp, that can be done too but not my interest particularly here)
<raeda> So you want to be able to redefine Java methods and stuff?
<francogrex> there are some incomplete CL libs that do that (like cl+j and one other I have been using as well)
<francogrex> raeda: I was thinking about linj methods and stuff rather
<francogrex> I forgot the name of that other lib was good, it was working through reflection as well
<francogrex> foam? maybe
<raeda> What people have historically done before is to build a translation layer between Lisp and Java, and then build the rest of the application in Lisp
<lisp123> Is there a command to suppress printing the return value of a function in REPL?
<raeda> Since the JVM is so strict and since it's hard to translate Java semantics to Lisp, reflection is pretty much the only choice
<francogrex> found it: http://foil.sourceforge.net
<francogrex> raeda: yes indeed
<francogrex> how far along are you with your project lisp 2 jvm?
<raeda> Well, the creator of Foil went on to make Clojure, if that says anything
<francogrex> raeda: I ddn't know. sometimes I see libraries and believe they are "abandonware"
<francogrex> sadly
<beach> lisp123: The value of a function? Do you mean the value of a form that you type?
<beach> lisp123: Why would you want to do such a thing? I mean what is your use case?
<raeda> francogrex: My project doesn't convert Lisp, it only generates class files
<lisp123> beach: Yes, of a function. Its a very large list (240+). Because I do a lot of programming in the REPL itself
<lisp123> run the program, then manually take CAR or LENGTH etc, do other stuff to it
<lisp123> btw I think this answer is wrong: https://stackoverflow.com/questions/16369474/prevent-terminal-output-in-lisp - can anyone confirm?
<lisp123> looks like terrible advice...
<beach> lisp123: Then it's not the value of a function. It's the value of a form.
<beach> lisp123: (progn <form> (values))
<beach> lisp123: And that's not a "command", it's a special form PROGN and a function VALUES.
<francogrex> lisp123: a lot of "accepted" or upvoted answers on stackoverflow are bad/horribly bad
<lisp123> Am I doing something wrong there?
<francogrex> that site is highly visible (thanks to google search engine) but in general it's pretty bad, I would avoid it as much as possible
<_death> lisp123: you may add such a "switch" to the slime repl, if you're not afraid of a little bit of elisp
<beach> lisp123: You said you wanted no value.
<lisp123> Suppress printing the value
<lisp123> I still want the value
<beach> *sigh*
<lisp123> "Is there a command to suppress printing the return value of a function in REPL?"
<beach> Got it.
<lisp123> I think this stack overflow is just plain wrong - https://stackoverflow.com/questions/16369474/prevent-terminal-output-in-lisp , I want to change it but just checking if I'm mistaken
<francogrex> though that answer isn't wrong this time in SO
<francogrex> lisp123: why do you think that?
<lisp123> francogrex: Actually you are right, the second sentence mentions not returning anything. The first sentence got me (run a function but not have output)
selwyn has joined #commonlisp
<lisp123> _death: How would you do that? Something that prevents printing after amount of lines?
selwyn_ has joined #commonlisp
<lisp123> certain amount*
<_death> lisp123: well, I have this patch: https://github.com/death/slime/commit/8ebaf6f8fada68b5c55dae1b18e33f44f8a50d07 so I could set a new pprint dispatch entry for type LIST, for example
<francogrex> (defparameter *test* 3) ... (defun addtotest () (incf *test*) (values)) ... (addtotest)
<francogrex> what's wrong with that?
<lisp123> _death: Great, thanks for sharing the code.
<lisp123> francogrex: I am thinking of going down that path...what I may do use either _death 's version or a macro which sets the value of some symbol lets say $, similar to what you have. That way I can keep using stuff like (+ * $) (and similarly do $$, $$$ etc)
<Alfr> francogrex, you could play with *print-length*, *print-level* .
<raeda> francogrex: there's also jfli http://jfli.sourceforge.net/ but that requires Lisp Works
<francogrex> it's ok, raeda jnil also requires a specific implementation (acl)
<francogrex> is clojure still getting enough love these days?
<lisp123> I was looking yesterday, and most of the functional progrmaming jobs listed were in Clojure
Cymew has quit [Ping timeout: 240 seconds]
<francogrex> oh well
<Alfr> francogrex, sorry, that was for lisp123: ^
<francogrex> Alfr: yes I guessed
<francogrex> I measure love by the github meter
<_death> Alfr: oh right.. I thought about *print-length*, but I didn't recall if it works for lists
<raeda> francogrex: Here's my project for reference: https://github.com/davidsun0/jclass Maybe you could translate bytecode into Lisp?
<lisp123> Alfr: Thanks, unfortunately that is just for printing and not the return value. But it will prove helpful elsewhere for sure! Thanks for the tip
<francogrex> raeda: good work. thumbs up!
<raeda> Thanks!
<francogrex> did you create that only yesterday or just pushed it yesterday
<raeda> Started in June, been working on it a lot this week
<francogrex> great
<Alfr> lisp123, I thought you were complaining about the REPL's verbose output and still want to use *, **, ***; recall that the P stands for PRINT.
<lisp123> Alfr: Ah, print I have been controlling with all my hacks onto print-object (and these days just rolling out more custom print functions), it was the return value that got me
<beach> lisp123: By the way, why are you writing code at the REPL, rather than in one or more files?
<beach> lisp123: You would have to move the code to a file eventually anyway, no?
<lisp123> beach: Ah no, so I write most of my code in files, maybe 10% in repl but those are 2-3 lines max. I am doing calculations / introspection etc in the REPL. I'm 'trying' to build some math software, so hence a lot of work is in the REPL doing calcs etc
ec_ has joined #commonlisp
<beach> I see.
selwyn_ has quit [Quit: Leaving]
waleee has joined #commonlisp
phantomics has quit [Quit: Ex-Chat]
<Josh_2> Who maintains planet lisp rss aggregator?
blihp has joined #commonlisp
<sm2n> Josh_2, Xach
<Josh_2> thanks sm2n
francogrex has left #commonlisp [ERC (IRC client for Emacs 24.5.1)]
<vats> I wonder why a function name is allowed to be a list of the form (setf symbol), as per CLHS (http://clhs.lisp.se/Body/26_glo_f.htm#function_name), and how that affects function definitions.
<beach> vats: Function definitions allow function names like that: (defun (setf bla) (...) ...)
elf_fortrez has joined #commonlisp
<vats> beach: I understand, but how is that different from just using the symbol name?
<beach> vats: I can see two reasons for the existence. 1. A form such as (setf (foo x) ...) expands to (funcall #'(setf foo) ... x) by default. It can't very well expand to (funcall #'foo...)
peterhil has quit [Read error: error:1408F10B:SSL routines:ssl3_get_record:wrong version number]
<beach> 2. In DEFCLASS, you can type :accessor foo, and that defines two methods, namely (equivalent to) (defmethod foo (...)...) and (defmethod (setf foo) (...) ...)
peterhil has joined #commonlisp
<beach> vats: In those two cases there must be a way to generate two separate function names. One could generate a new symbol name and INTERN it, but that would be very ugly.
<anddam> while building 2.49.92 I got [OS-ERROR]: OS-ERROR(25): Not a tty , how do I go in order to figure what is wrong?
<beach> anddam: What is 2.49.92?
<anddam> sorry, I meant clisp 2.49.92
<beach> anddam: Not many people here use CLISP. Do you have any particular reason for choosing it over more popular Common Lisp implementations?
<beach> vats: Does that make sense to you?
<anddam> beach: nothing more that "I have Land of Lisp"
<beach> Oh, I am sorry to hear that. That book is awfully written.
<anddam> but it has got comics
<vats> beach: Not yet. I don't understand the first statement.
<anddam> beach: but I am right now reading a chapter from Practical Common Lisp as a reference on a topic
<anddam> beach: I understand that has more following
<beach> vats: When you type (setf (foo x) <some-form>), SETF is a macro that checks whether FOO has a SETF expander defined. If it doesn't, it expands to (funcall #'(setf foo) <some-form> x).
<beach> vats: By doing it that way, you can type (defclass bar () ((... :accessor foo))) and then (setf (foo (make-instance 'bar)) <some-form>)
<beach> anddam: Most code from Land of Lisp works in any conforming Common Lisp implementations. There are a few exceptions, though.
<beach> "exceptions", meaning, some code in Land of Lisp uses CLISP-specific constructs, or otherwise constructs that are not conforming.
<vats> beach: Thanks. I need to try some things before I would get it. Can I get back to you on this?
<beach> vats: Sure, but in 20 minutes or so I am off to fix dinner for my (admittedly small) family. But many others here can help you.
<beach> vats: You can try the DEFCLASS form I showed, and then inspect the functions #'foo and #'(setf foo) and you will see that each one has one method.
<beach> vats: And you can check that (macroexpand-1 '(setf (foo x) y)) expands to what I said.
<vats> beach: Yeah. I also found the relevant CLHS page: http://www.lispworks.com/documentation/HyperSpec/Body/05_abi.htm
<vats> > A function named (setf f) must return its first argument as its only value in order to preserve the semantics of setf.
attila_lendvai has quit [Ping timeout: 240 seconds]
<_death> vats: suppose you have a function CAR, that returns the value in the car position of a cons.. (car (cons 'x 'y)) => X.. you can also have a function to replace the contents with some other value, RPLACA.. (rplaca (cons 'x 'y) 'z).. SETF lets you write something more "intuitive", like (setf (car (cons 'x 'y)) 'z).. simplifying a bit, the way it works is that it calls the rplaca-like function that's named (setf car)... it could be defined
<_death> like (defun (setf car) (new-value the-cons) (rplaca the-cons new-value) new-value) .. it could work otherwise, say by telling SETF that the setf function for CAR is SET-CAR, or say the value of (GET 'CAR 'SETF-FUNCTION), but a function with the name (setf car) seems clear enough and opens up the way for other "list names" for functions
nature_ has joined #commonlisp
<vats> I see. That makes more sense.
<_death> in sbcl, for example, you can define a (cas car) that compares-and-swaps with the value.. note, though, that since CL doesn't have a way for the programmer to define his own "namespace" like that, we often resort to the (get 'car 'my-function) or using a hash-table and such
<vats> _death: Do you mean you can write something like (defun (cas car) (cell) ...) in SBCL?
<vats> _death: Somehow the example in that link doesn't work on SBCL 2.1.6. I get the error:
<vats> The NAME argument to DEFUN, (CAS FOO), is not a function name. Same happens when I try to use (cas car) as a function name in a defun form.
<_death> vats: the symbol is sb-ext:cas
<vats> I see. Thanks
yitzi has joined #commonlisp
elf_fortrez has quit [Quit: Client closed]
peterhil has quit [Read error: error:1408F10B:SSL routines:ssl3_get_record:wrong version number]
Alfr has quit [Ping timeout: 250 seconds]
Alfr has joined #commonlisp
<Oladon> Hrm. I've got a list of lowercase tokens and am trying to figure out how to match any case combination of them with https://github.com/Ramarren/cl-parser-combinators using the choices1 function... but I can't seem to wrap my head around how to do it. Any ideas?
<Oladon> E.g. I'd call (apply #'choices1 '("foo" "bar" "baz")) to match any of those three tokens, but now I want to change it to match "Foo" or "fOo" or "FOO" as well.
saltrocklamp[m] has joined #commonlisp
gaqwas has joined #commonlisp
zuckonit has quit [Ping timeout: 240 seconds]
silasfox has quit [Ping timeout: 240 seconds]
silasfox has joined #commonlisp
silasfox has quit [Ping timeout: 240 seconds]
<Bike> Oladon: i don't see any case insensitivity operators in the documentation. you could do it the dumb way by listing each case in the choices.
silasfox has joined #commonlisp
<Oladon> Aha... apparently the built-in (string?) takes an optional :test, so I can do (apply #'choices1 (mapcar (lambda (x) (string? x :test #'string-equal)) '("foo" "bar" "baz")))
<Bike> oh, well, there you go then
<Oladon> :)
<Oladon> Thanks!
<Oladon> One of those "you'll only find the answer right after you ask" situations.
selwyn has quit [Read error: Connection reset by peer]
<lisp123> Anybody using Graphviz?
<lisp123> Very useful tool to visualise lists
blihp has quit [Quit: Leaving]
lisp123_ has joined #commonlisp
lisp123 has quit [Ping timeout: 252 seconds]
nature_ has quit [Ping timeout: 250 seconds]
recordgroovy has joined #commonlisp
silasfox has quit [Ping timeout: 248 seconds]
Oladon has quit [Ping timeout: 250 seconds]
cosimone has quit [Ping timeout: 250 seconds]
yitzi_ has joined #commonlisp
tophullyte has joined #commonlisp
yitzi has quit [Ping timeout: 250 seconds]
silasfox has joined #commonlisp
yitzi_ has quit [Read error: Connection reset by peer]
yitzi has joined #commonlisp
Alfr has quit [Ping timeout: 252 seconds]
Oladon has joined #commonlisp
Alfr has joined #commonlisp
pranavats has left #commonlisp [Disconnected: Replaced by new connection]
pranavats has joined #commonlisp
<lotuseater> lisp123_: https://github.com/michaelw/cl-dot
silasfox has quit [Ping timeout: 252 seconds]
<lisp123_> lotuseater: Thanks!
<lotuseater> there's also cl-graphviz in a darcs repository
silasfox has joined #commonlisp
<lisp123_> Yeah, I saw that one. This one looks a bit easier
<lotuseater> and I like darcs :)
yitzi has quit [Quit: Leaving]
yitzi has joined #commonlisp
Alfr has quit [Read error: Connection reset by peer]
Alfr has joined #commonlisp
silasfox has quit [Ping timeout: 250 seconds]
silasfox has joined #commonlisp
nature_ has joined #commonlisp
<lisp123_> :)
lisp123_ has quit [Remote host closed the connection]
lisp123 has joined #commonlisp
rain3 has quit [Ping timeout: 240 seconds]
lisp123 has quit [Read error: Connection reset by peer]
livoreno has quit [Ping timeout: 250 seconds]
cosimone has joined #commonlisp
selwyn has joined #commonlisp
peterhil has joined #commonlisp
silasfox has quit [Ping timeout: 250 seconds]
silasfox has joined #commonlisp
CrashTestDummy3 has joined #commonlisp
yitzi has quit [Ping timeout: 248 seconds]
CrashTestDummy2 has quit [Ping timeout: 250 seconds]
<recordgroovy> How does quicklisp pull in repos for updates? Is it automatic, or is it something I'd have to make a PR for?
<pjb> recordgroovy: it uses the quicklisp-projects git repository.
<pjb> recordgroovy: I guess a PR would work, but it seems just posting an issue will do.
<recordgroovy> awesome, thanks!
tophullyte has quit [Quit: Leaving]
lisp123 has joined #commonlisp
silasfox has quit [Ping timeout: 248 seconds]
ec_ has quit [Ping timeout: 276 seconds]
yitzi has joined #commonlisp
scymtym has quit [Ping timeout: 250 seconds]
silasfox has joined #commonlisp
<recordgroovy> It looks like there's no versioning metadata in that repo -- I would presumably have to wait for quicklisp to update the system by itself, right?
ec_ has joined #commonlisp
lisp123 has quit [Ping timeout: 250 seconds]
<pjb> recordgroovy: exactly.
<recordgroovy> good to know, thanks!
<pjb> recordgroovy: this is why I plan to implement ergo, based on git repositories, to replace quicklisp. cf. #cl-ergo
<pjb> recordgroovy: #clergo I mean.
<recordgroovy> why not just replace the quicklisp distro?
<pjb> recordgroovy: because quicklisp doesn't manage the versions.
<recordgroovy> Also, why tightly couple a dep manager to git?
<pjb> recordgroovy: but read the readme at https://gitlab.com/informatimago/ergo it lists alternatives.
<pjb> recordgroovy: because nowadays, everything is on git (gitlab, github, etc).
<recordgroovy> /Everything?/
<pjb> and with git, versions come naturally: you only have to specify a commit sha, or a tag, etc.
<pjb> Yep, everything.
silasfox has quit [Ping timeout: 240 seconds]
rdrg109 has quit [Ping timeout: 276 seconds]
cosimone has quit [Ping timeout: 240 seconds]
rdrg109 has joined #commonlisp
yitzi_ has joined #commonlisp
joe_mad has joined #commonlisp
yitzi has quit [Ping timeout: 250 seconds]
scymtym has joined #commonlisp
silasfox has joined #commonlisp
Devon has joined #commonlisp
recordgroovy has quit [Quit: leaving]
Devon is now known as Devon7
Devon7 is now known as Devon
cage has quit [Quit: rcirc on GNU Emacs 27.1]
lisp123 has joined #commonlisp
pve has quit [Quit: leaving]
lisp123 has quit [Read error: Connection reset by peer]
peterhil has quit [Ping timeout: 250 seconds]
cosimone has joined #commonlisp
recordgroovy has joined #commonlisp
tfeb has joined #commonlisp
skn2 has joined #commonlisp
amb007 has quit [Ping timeout: 248 seconds]
amb007 has joined #commonlisp
xantoz_ has joined #commonlisp
xantoz has quit [Ping timeout: 276 seconds]
skn has quit [Ping timeout: 276 seconds]
silasfox has quit [Ping timeout: 240 seconds]
yitzi_ has quit [Quit: Leaving]
yitzi has joined #commonlisp
doyougnu has quit [Read error: Connection reset by peer]
Oladon has quit [Quit: Leaving.]
CrashTestDummy2 has joined #commonlisp
silasfox has joined #commonlisp
tfeb has quit [Quit: died]
CrashTestDummy3 has quit [Ping timeout: 250 seconds]
CrashTestDummy3 has joined #commonlisp
CrashTestDummy2 has quit [Ping timeout: 252 seconds]
peterhil has joined #commonlisp
CrashTestDummy2 has joined #commonlisp
ck_ has quit [Ping timeout: 240 seconds]
yitzi_ has joined #commonlisp
CrashTestDummy3 has quit [Ping timeout: 240 seconds]
yitzi has quit [Ping timeout: 248 seconds]
amb007 has quit [Ping timeout: 250 seconds]
amb007 has joined #commonlisp
ck_ has joined #commonlisp
joe_mad has quit [Quit: ERC (IRC client for Emacs 26.3)]
shka has quit [Ping timeout: 250 seconds]
silasfox has quit [Ping timeout: 240 seconds]
tophullyte has joined #commonlisp
psycomic has quit [Ping timeout: 240 seconds]
amb007 has quit [Ping timeout: 248 seconds]
amb007 has joined #commonlisp
amb007 has quit [Ping timeout: 240 seconds]
silasfox has joined #commonlisp
amb007 has joined #commonlisp
Alfr has quit [Killed (zirconium.libera.chat (Nickname regained by services))]
Alfr has joined #commonlisp
<etimmons> recordgroovy: I've been working on CLPM as a QL alternate.
<etimmons> recordgroovy: It's able to use QL metadata (I mean, it really has to if I want to have any chance of convincing people to give it a try :P )
gaqwas has quit [Ping timeout: 252 seconds]
<etimmons> recordgroovy: But I too am not very enthused about QL's versioning and updating story, so I've been working on an alternate project index as well, that's capable of advertising ASD system versions, upstream repo locations, etc.
amb007 has quit [Ping timeout: 252 seconds]
pillton has joined #commonlisp
<etimmons> recordgroovy: I have a server for it that allows developers to release their projects on demand. It works well enough for my collaborators and I, but would still need quite a bit of work to become something more people could use.
Alfr has quit [Remote host closed the connection]
Alfr has joined #commonlisp
<recordgroovy> etimmons: I wasn't really looking for a Quicklisp, I was mostly looking to fix a library so that I can fix another library so that I won't have to see ironclad when compiling my web app again
selwyn has quit [Read error: Connection reset by peer]
kakuhen has joined #commonlisp
<etimmons> recordgroovy: Ah, I misunderstood then. I thought you were frustrated that you had to wait for QL to pull the project.
jeosol has quit [Remote host closed the connection]
makomo has quit [Ping timeout: 250 seconds]
attila_lendvai has joined #commonlisp
amb007 has joined #commonlisp
karlosz has quit [Quit: karlosz]
ec_ has quit [Quit: ec_]
attila_lendvai has quit [Quit: Leaving]
random-nick has quit [Ping timeout: 250 seconds]
attila_lendvai has joined #commonlisp
cosimone has quit [Ping timeout: 248 seconds]
tankrim has joined #commonlisp
attila_lendvai has quit [Quit: Leaving]
attila_lendvai has joined #commonlisp
yitzi_ has quit [Quit: Leaving]
tankrim has quit [Quit: ERC (IRC client for Emacs 27.2)]
igemnace has joined #commonlisp