specbot has quit [Remote host closed the connection]
molson_ has joined #commonlisp
Brucio-61 has quit [Remote host closed the connection]
minion has quit [Killed (NickServ (GHOST command used by minion1))]
specbot has joined #commonlisp
minion has joined #commonlisp
Shinmera- has joined #commonlisp
Brucio-61 has joined #commonlisp
Shinmera has quit [Read error: Connection reset by peer]
Shinmera- is now known as Shinmera
molson has quit [Ping timeout: 272 seconds]
edgar-rft has quit [Ping timeout: 252 seconds]
Brucio-61 has quit [Ping timeout: 246 seconds]
edgar-rft has joined #commonlisp
igemnace has quit [Remote host closed the connection]
trumae has joined #commonlisp
Brucio-61 has joined #commonlisp
igemnace has joined #commonlisp
igemnace has quit [Ping timeout: 250 seconds]
megeve has quit [Ping timeout: 250 seconds]
megeve has joined #commonlisp
random-nick has quit [Ping timeout: 260 seconds]
igemnace has joined #commonlisp
poselyqualityles has joined #commonlisp
poselyqualityles has quit [Client Quit]
eddof13 has joined #commonlisp
zacque has joined #commonlisp
yauhsien has joined #commonlisp
attila_lendvai has quit [Ping timeout: 245 seconds]
eddof13 has quit [Quit: My MacBook has gone to sleep. ZZZzzz…]
euandreh has joined #commonlisp
Guest74 has quit [Quit: Connection closed]
waleee has quit [Ping timeout: 252 seconds]
euandreh has quit [Ping timeout: 260 seconds]
euandreh has joined #commonlisp
Bike has quit [Quit: Lost terminal]
igemnace has quit [Remote host closed the connection]
yauhsien has quit [Ping timeout: 256 seconds]
igemnace has joined #commonlisp
Inline__ has joined #commonlisp
Bike has joined #commonlisp
Inline has quit [Ping timeout: 260 seconds]
lispy has joined #commonlisp
<lispy>
Hi team,
<lispy>
On a previous java project I worked on I created an annotation that helped me cycle through all subclasses of a given class and their subclasses as well, I want to do something similar in lisp but I am not sure how, I read abit about closer to MOP but it doesn't seem like it does what I am looking for, anyone here that could point me to what I am
<Bike>
you'll have to be a bit careful iterating to make sure you don't get the same class more than once through different inheritances
<lispy>
I don't mind seeing the same class multiple times through multiple inheritances
<lispy>
I saw the direct subclasses function but it doesn't seem like I can generate a new instance of those subclasses using the values on that list, or am I wrong ?
<lispy>
let me read a bit more and ill get back to you
<Bike>
i don't understand what you mean by generating a new instance
<Bike>
like, make-instance?
<lispy>
yeah literally
<Bike>
oh. no, you can just pass the class to make-instance.
<lispy>
oh okay
trumae has quit [Remote host closed the connection]
<lispy>
Thanks I guess, ill make sure to try it
yauhsien has joined #commonlisp
ebrasca has quit [Remote host closed the connection]
<jackdaniel>
same applies i.e to :ps and :raster backends
<jackdaniel>
of course the backend in question must be loaded
phantomics has quit [Quit: Ex-Chat]
lisp123 has quit [Remote host closed the connection]
Oddity has quit [Ping timeout: 246 seconds]
<_death>
sounds cool
semz_ is now known as semz
yauhsien has quit [Remote host closed the connection]
yauhsien has joined #commonlisp
treflip has quit [Remote host closed the connection]
treflip has joined #commonlisp
razetime has joined #commonlisp
yauhsien has quit [Ping timeout: 272 seconds]
random-nick has joined #commonlisp
mon_aaraj has quit [Ping timeout: 272 seconds]
Algernon91 has quit [Ping timeout: 260 seconds]
mon_aaraj has joined #commonlisp
OlCe`` has joined #commonlisp
<_death>
hmm, horizontal scroll bars seem broken
<jackdaniel>
in mcclim?
<_death>
yes.. drawing them, atleast..
<jackdaniel>
if you don't want to count on my deliberely forgetful memory then please submit an issue. I'd love to hear details now I'm rather occupied at the moment
<_death>
well, I get all kinds of weird artifacts and my mcclim UIs look different each day.. but I'm not sure it's purely mcclim's fault, could be interaction with stumpwm or just my code.. my main project nowadays doesn't use mcclim so don't spend much time with it
<rotateq>
jackdaniel: let's hope people don't want circular scroll bars some day :)
<jackdaniel>
that won't happen unless a custom gadget is written - clim specifies only affine transformations
nature has joined #commonlisp
<jackdaniel>
so there are no "out of the box" cartesian->polar hacks
<jackdaniel>
other than that - perfectly doable
yauhsien has joined #commonlisp
<jackdaniel>
_death: "[main project nowdays] doesn't use mcclim" or "main project [nowdays doesn't use mcclim]" ?:p
tyson2 has joined #commonlisp
kevingal has quit [Ping timeout: 240 seconds]
<_death>
both :) .. it has mcclim UIs but a few months ago I started writing an ordinary "web UI"
<jackdaniel>
ah
<jackdaniel>
what is it? (if that's not a secret)
<_death>
I do use the mcclim ones occasionally, but recent development is on the latter
treflip has quit [Remote host closed the connection]
<contrapunctus>
These files look relevant - /usr/lib/x86_64-linux-gnu/libsqlite3.so.0.8.6 /usr/lib/x86_64-linux-gnu/libsqlite3.so.0 /usr/lib/x86_64-linux-gnu/libsqlite3.so - so I evaluated `(clsql:push-library-path "/usr/lib/x86_64-linux-gnu/")` and tried again, but to no avail :\
<Nilby>
maybe it's (ql:quickload :clsql-sqlite3) instead of (ql:quickload :clsql-sqlite) [with no 3]
<contrapunctus>
Nilby: ...and so it was 😶️
<Nilby>
just plain :clsql-sqlite is a deceptively old version
rogersm has joined #commonlisp
Algernon666 has quit [Read error: Connection reset by peer]
Algernon666 has joined #commonlisp
<Nilby>
it's unfortunate that SO doesn't mention this thing i've forgotten frequently, but I hate going there ever since I have to delete a big picture of a cookie obscuring the answers with ublock's element zapper every dang time.
<beach>
SO?
<random-nick>
stackoverflow?
<beach>
Ah, maybe so. Thanks.
<Nilby>
yes
lisp123 has joined #commonlisp
rawley has quit [Remote host closed the connection]
rawley has joined #commonlisp
lisp123 has quit [Ping timeout: 260 seconds]
razetime has quit [Remote host closed the connection]
trumae has quit [Read error: Connection reset by peer]
karlosz has joined #commonlisp
trumae has joined #commonlisp
treflip has joined #commonlisp
rotateq has joined #commonlisp
razetime has joined #commonlisp
wacki has quit [Remote host closed the connection]
karlosz has quit [Quit: karlosz]
sepanko has quit [Quit: You have been kicked for being idle]
Major_Biscuit has quit [Ping timeout: 260 seconds]
Nilby has quit [Ping timeout: 240 seconds]
kpoeck has quit [Quit: Client closed]
trumae has quit [Ping timeout: 256 seconds]
Major_Biscuit has joined #commonlisp
MajorBiscuit has joined #commonlisp
trumae has joined #commonlisp
MajorBiscuit has quit [Client Quit]
karlosz has joined #commonlisp
yauhsien has quit [Remote host closed the connection]
yauhsien has joined #commonlisp
tyson2 has joined #commonlisp
Cymew has quit [Ping timeout: 246 seconds]
hhdave has quit [Quit: hhdave]
Major_Biscuit has quit [Ping timeout: 250 seconds]
attila_lendvai has quit [Read error: Connection reset by peer]
attila_lendvai has joined #commonlisp
treflip has joined #commonlisp
Algernon666 has quit [Ping timeout: 250 seconds]
treflip has quit [Remote host closed the connection]
poselyqualityles has quit [Ping timeout: 260 seconds]
treflip has joined #commonlisp
<boigahs>
If I have a list that is really is constant, is there a "standard" thing to do since defconstant complains about lists not being eql every time it is evaluated? Just use defparameter, or is there something else I should consider?
<semz>
boigahs: alexandria has define-constant with a :test argument
<boigahs>
Thanks, I'll check it out
<_death>
I'd just use defvar
<Bike>
(defconstant whatever (if (boundp 'whatever) whatever list-goes-here)) is the quick way, but it will actually prevent redefinitions
<Bike>
(if (boundp 'whatever) (symbol-value 'whatever) ...) rather
<boigahs>
Ok to be honest I forgot about defvar
<boigahs>
It is probably fine, yeah
<pjb>
boigahs: from the point of view of the compiler, it's enough to quote the constant list. Using a constant VARIABLE defined with defconstant doesn't bring anything more.
<boigahs>
Hmmmm, ok
<pjb>
The only thing that defconstant may do, is to hardwire as an immediate value the pointer to the first cons of the quoted list. It's doubtful that it's really possibly on any target,, given the restriction on the size of immediate values.
karlosz has quit [Quit: karlosz]
<pjb>
defconstant could easily be removed from the language. It's even not very usable with CASE: (defconstant +foo+ 42) You have to switch to read-time: (case expr (#.+foo+ 'got-it0))
mgl has quit [Ping timeout: 250 seconds]
<jackdaniel>
what was the magic directive to format to print the argument in downcase?
<_73>
Is there anyway to compare clos objects with equalp or must I define my own equality method? For example I expected to get back T where I got NIL in this example: http://dpaste.com/2NN9E3K5N
rogersm has quit [Quit: Leaving...]
<dbotton>
It doesn’t make much sense for equal or equalp to work on an object since it can’t predict what would make them equal
<dbotton>
Ie you have to define your own function
<_73>
Wouldn't two objects be equal if all of their slots are equal?
<dbotton>
Why should they?
<_death>
dbotton: it is mcclim with a baby (2 hours old ;) clog backend.. clim is built to be extensible, and in this case one can implement some protocols in order to receive drawing commands from it and pass them to clog, and perhaps one day the other way around, to get input events from clog and pass them to clim
<dbotton>
Cool
<_73>
dbotton: I see, but maybe as a generic way to test equality. EQUALP works for structs this way though.
<_death>
dbotton: as you can see the drawing is not perfect.. it could take some work to properly implement such a backend, and I'm not sure I'll ever get to it
<dbotton>
I hear ya.
<dbotton>
_73 I hear ya.
<dbotton>
_death still that is very cool
<dbotton>
Is it using the canvas?
<_death>
dbotton: scymtym has a more mature backend that uses websockets as well
<_death>
yes
<dbotton>
Would be nicer if could use html primitives instead
yauhsien has joined #commonlisp
<dbotton>
That is the same issue with gtk
<dbotton>
You just end up with a vlc like product
<_death>
one could extend clim in a different way, so that instead native controls will be used
<dbotton>
Is there documentation on making such an extension
<_death>
dbotton: I think jackdaniel is working on it.. but there's also the existing material in the mcclim manual, the clim specification, and the various backends already written
<_death>
including a "null backend"
Dynom has quit [Quit: WeeChat 3.4]
parjanya has quit [Remote host closed the connection]
trumae has quit [Ping timeout: 240 seconds]
trumae has joined #commonlisp
yauhsien has quit [Ping timeout: 250 seconds]
<_death>
_73: equalp is just an arbitrary comparison operator.. I doubt you care for a result like (progn (defstruct foo bar) (equalp (make-foo :bar "Hi") (make-foo :bar "hI")))
<_death>
well, in my opinion you should first read the KMP article.. then you may be in a good position to form an opinion about that project..
<_73>
ok I will
wacki has quit [Quit: Leaving.]
ec has joined #commonlisp
trumae has quit [Read error: Connection reset by peer]
trumae has joined #commonlisp
<_death>
though I should mention that the issue KMP brings up is not the only one.. an equality predicate is usually expected to behave like a mathematical function, not something that could one day return some other result given identical arguments
kpoeck has quit [Quit: Client closed]
rawley has quit [Remote host closed the connection]
specbot has quit [Remote host closed the connection]
minion has quit [Remote host closed the connection]
specbot has joined #commonlisp
minion has joined #commonlisp
tane has quit [Quit: Leaving]
dlowe has quit [Remote host closed the connection]
trumae has quit [Ping timeout: 250 seconds]
trumae has joined #commonlisp
admich has quit [Remote host closed the connection]
mon_aaraj has quit [Ping timeout: 260 seconds]
mon_aaraj has joined #commonlisp
trumae has quit [Read error: Connection reset by peer]
trumae has joined #commonlisp
karlosz has joined #commonlisp
shka has quit [Ping timeout: 272 seconds]
Algernon666 has joined #commonlisp
Algernon91 has joined #commonlisp
poselyqualityles has quit [Ping timeout: 240 seconds]
hashfunc32 has joined #commonlisp
Algernon666 has quit [Ping timeout: 256 seconds]
<hashfunc32>
is there a way to specify to the lisp printer that i want a newline after every list?
<Krystof>
(let ((x '((1 2 3) (4 5 6)))) (pprint-logical-block (nil x :prefix "(" :suffix ")") (loop for xs on x for e = (car xs) do (write e) when (cdr xs) do (pprint-newline :mandatory))))
wyrd has quit [Ping timeout: 240 seconds]
ssafar has joined #commonlisp
<rotateq>
hm honestly I didn't deal with all those pprint functions yet directly. just FORMAT which calls them
<rotateq>
so I know what to do to go on filling my standard symbol holes piece by piece :)
<Krystof>
you can do ^ that in format, too
<rotateq>
yes
<Krystof>
it's probably something like "~@<~W~^~:_~@:>"
<rotateq>
:D
<Krystof>
(it's basically that, but I reserve the right to have all the modifiers to the directives completely wrong
<rotateq>
in FORMAT there are still some directives not fully discovered for me, a big DSL
<Krystof>
~@< ~@:> = pprint-logical-block; ~W = write; ~^ = stop if no more elements; ~_ = pprint-newline
cosimone has quit [Quit: ERC (IRC client for Emacs 27.1)]
Guest74 has joined #commonlisp
poselyqualityles has joined #commonlisp
wyrd has joined #commonlisp
waleee has joined #commonlisp
kevingal has joined #commonlisp
karlosz has quit [Ping timeout: 260 seconds]
_73 has left #commonlisp [ERC (IRC client for Emacs 27.2)]
nature has quit [Ping timeout: 260 seconds]
orestarod has quit [Ping timeout: 252 seconds]
yewscion has quit [Ping timeout: 272 seconds]
yauhsien has joined #commonlisp
Algernon91 has quit [Ping timeout: 260 seconds]
yauhsien has quit [Ping timeout: 260 seconds]
<Shinmera>
_death: Alloy backend for McClim or vice-versa when? :)
trumae has quit [Ping timeout: 246 seconds]
Posterdati has quit [Ping timeout: 256 seconds]
trumae has joined #commonlisp
adlai has quit [Read error: Connection reset by peer]
adlai has joined #commonlisp
hashfunc32 has quit [Ping timeout: 256 seconds]
Posterdati has joined #commonlisp
ec has quit [Quit: ec]
yauhsien has joined #commonlisp
azimut has quit [Remote host closed the connection]
azimut has joined #commonlisp
ec has joined #commonlisp
yauhsien has quit [Ping timeout: 250 seconds]
azimut has quit [Ping timeout: 240 seconds]
attila_lendvai has quit [Ping timeout: 260 seconds]
attila_lendvai has joined #commonlisp
tyson2 has quit [Remote host closed the connection]
attila_lendvai has quit [Ping timeout: 245 seconds]
szkl has joined #commonlisp
azimut has joined #commonlisp
trumae has quit [Read error: Connection reset by peer]
rotateq has quit [Quit: ERC (IRC client for Emacs 27.2)]
trumae has joined #commonlisp
kevingal has quit [Remote host closed the connection]
rawley has joined #commonlisp
trumae has quit [Ping timeout: 256 seconds]
trumae has joined #commonlisp
trumae has quit [Read error: Connection reset by peer]