<BrokenCog>
hmm, let me try again. setq'd *default-pathname-defaults* and the project was created in the unchanged location ... give me a minute.
azimut has quit [Ping timeout: 240 seconds]
epony has quit [Remote host closed the connection]
pve has quit [Quit: leaving]
shka has quit [Ping timeout: 260 seconds]
azimut has joined #commonlisp
akoana has joined #commonlisp
tyson2 has quit [Remote host closed the connection]
tyson2 has joined #commonlisp
<BrokenCog>
okay. I must have done it wrong initially. changing *default-pathname-defaults* in ~/.sbclrc propogates correctly. make-project creates directories in the correct place. thanks for the help.
NicknameJohn has quit [Ping timeout: 268 seconds]
<josrr>
BrokenCog: I am glad it worked for you
scymtym has quit [Remote host closed the connection]
scymtym has joined #commonlisp
rtypo has quit [Ping timeout: 246 seconds]
son0p has joined #commonlisp
dra has quit [Ping timeout: 268 seconds]
ym has quit [Quit: Leaving]
random-nick has quit [Ping timeout: 276 seconds]
OlCe has quit [Ping timeout: 260 seconds]
azimut has quit [Remote host closed the connection]
azimut has joined #commonlisp
Lord_of_Life_ has joined #commonlisp
Lord_of_Life has quit [Ping timeout: 268 seconds]
Lord_of_Life_ is now known as Lord_of_Life
igemnace has quit [Quit: WeeChat 4.1.3]
josrr has quit [Remote host closed the connection]
NicknameJohn has joined #commonlisp
ronald_ has joined #commonlisp
ronald has quit [Ping timeout: 264 seconds]
tyson2 has quit [Read error: Connection reset by peer]
ronald_ has quit [Ping timeout: 260 seconds]
Inline has quit [Quit: Leaving]
Inline has joined #commonlisp
masinter has quit [Remote host closed the connection]
masinter has joined #commonlisp
masinter has quit [Remote host closed the connection]
masinter has joined #commonlisp
ronald has joined #commonlisp
Inline has quit [Ping timeout: 252 seconds]
triffid has joined #commonlisp
Inline has joined #commonlisp
bjorkintosh has quit [Remote host closed the connection]
bjorkintosh has joined #commonlisp
bjorkintosh has joined #commonlisp
may has joined #commonlisp
tyson2 has joined #commonlisp
NicknameJohn has quit [Ping timeout: 260 seconds]
akoana has quit [Quit: leaving]
epony has joined #commonlisp
dajole has joined #commonlisp
triffid has quit [Ping timeout: 240 seconds]
triffid has joined #commonlisp
makomo has quit [Ping timeout: 256 seconds]
mesaoptimizer has joined #commonlisp
triffid has quit [Remote host closed the connection]
triffid has joined #commonlisp
decweb has quit [Ping timeout: 276 seconds]
triffid has quit [Ping timeout: 240 seconds]
triffid has joined #commonlisp
may_ has joined #commonlisp
may has quit [Ping timeout: 260 seconds]
occ has joined #commonlisp
<paule32>
hello, and good morning
<paule32>
i have (#_new QTabBar)
<paule32>
i have: (let ((tab-1 (#_addTab tab-eval "Eval" )))
attila_lendvai has quit [Read error: Connection reset by peer]
danse-nr3 has quit [Ping timeout: 256 seconds]
attila_lendvai has joined #commonlisp
danse-nr3 has joined #commonlisp
notzmv has joined #commonlisp
dcb has quit [Quit: Connection closed for inactivity]
amb007 has quit [Ping timeout: 264 seconds]
rtypo has joined #commonlisp
<paule32>
hello beach, like i wrote: i am not a professional programmer, and no one stands behind me, where i have a must to do, on holding guide lines. I respect you all there. but sometimes: time is changing
<paule32>
i would like to take a look to the sources of quicklisp qt but i can not found files
<paule32>
in my user directory ~/quicklisp, i can found some packages, but no qt
<paule32>
but, quicklisp qt must be installed, else, i can not see the gui. but the qapplication gui, i can see
yitzi has joined #commonlisp
danse-nr3 has quit [Read error: Connection reset by peer]
<beach>
paule32: Perhaps you don't realize how insulting you are. You haven't learned much in half a dozen years or so, yet you want experienced people to read your code with a more "modern" style that you, the still inexperienced programmer, invented.
danse-nr3 has joined #commonlisp
jmdaemon has quit [Ping timeout: 264 seconds]
<beach>
paule32: But then you still ask for help from all those people you insult.
<paule32>
beach: nobody need to take a look at my code. i dont assume it. it was a little text, because i could not find any sentences, that make a half sense. and like i said, dont be blended that i used lisp dozen years. it is very tiny time i use lisp
<beach>
My bad. You *do* realize how insulting you are, and you don't care.
<paule32>
i would apology me for this. i respect you have write style guide lines. but when i hurt, i get in touch trouble with concepts of other dsl. like python or so. in python is a very strict indent on you must hold you. in c/c++ you can write foo_bar_baz() as function. in lisp foo-bar-baz. this are little guide lines. and i try to use the last one. but i come from pascal, and c. c is not modern, but i call it modetn, because many people assoc c with c++.
<paule32>
but they are different dsl
yitzi has quit [Remote host closed the connection]
waleee has quit [Ping timeout: 264 seconds]
danse-nr3 has quit [Ping timeout: 256 seconds]
yitzi has joined #commonlisp
<anthk_>
c and c++ are very different
<anthk_>
use ansi C/c99 and then check any c++ code and you'll understand it
AndreiDuma has joined #commonlisp
danse-nr3 has joined #commonlisp
<paule32>
yes. oop (object orient programming) was not thinking of the birth of lisp
decweb has joined #commonlisp
epony has quit [Remote host closed the connection]
epony has joined #commonlisp
josrr has joined #commonlisp
son0p has quit [Quit: Bye]
kevingal has joined #commonlisp
kevingal_ has joined #commonlisp
josrr has quit [Client Quit]
josrr has joined #commonlisp
random-nick has joined #commonlisp
pfdietz has joined #commonlisp
dra has joined #commonlisp
dra has joined #commonlisp
dnhester26 has joined #commonlisp
dra has quit [Ping timeout: 260 seconds]
<dnhester26>
question of style: If I am writing functions that operate on objects of a specific class, is it proper to then write them as methods (declaring the generic beforehand of course)? Or since I don't plan on having functions of the same name operate on other types of objects (AKA of another class) then it doesn't make a difference and I can/should write them as regular functions (defun) and not methods?
AndreiDuma has quit [Ping timeout: 276 seconds]
AndreiDuma has joined #commonlisp
<dnhester26>
I hear defun is faster for execution, but for my requirements I doubt it'll make a difference. The benefit I see from defining the function as a method is that I would get an error if I pass it something else because of the input, whereas as a function I'll get a different type of error
<dnhester26>
Perhaps this is dicussed in the Keene book which I know I have to read, it's just that I'm on a deadline now... and I was wondering about this detail
<pfdietz>
Either is acceptable, in my opinion.
<dnhester26>
pfdietz: thanks, so beyond the actual functionality, in terms of style there is no particular preference?
<dnhester26>
that's what I understood you meant, just confirming
johnjaye has quit [Ping timeout: 246 seconds]
johnjaye has joined #commonlisp
<pfdietz>
Yes
<dnhester26>
thanks
johnjaye has quit [Ping timeout: 246 seconds]
johnjaye has joined #commonlisp
prokhor has quit [Ping timeout: 256 seconds]
prokhor has joined #commonlisp
<paulapatience>
With SBCL you can also declaim the ftype to get errors when you pass the wrong types
<paulapatience>
With ordinary functions
occ has joined #commonlisp
AndreiDuma has quit [Ping timeout: 260 seconds]
AndreiDuma_ has joined #commonlisp
bjorkintosh has quit [Quit: Leaving]
OlCe has joined #commonlisp
AndreiDuma_ has quit [Ping timeout: 255 seconds]
jonatack has quit [Quit: WeeChat 4.1.2]
jonatack has joined #commonlisp
bjorkintosh has joined #commonlisp
<dnhester26>
paulpatience: thanks, so basically what comes out is just a syntax change since we can basically then even get a similar error indicating a wrong type
<beach>
dnhester26: But you would then rely on SBCL-specifics.
<kevingal>
Question: I know I can get growable arrays with (make-array 0 :adjustable t :fill-pointer t), but when I vector-pop an element I notice that it can still be accessed using (aref v index).
<dnhester26>
I find that in other languages that are typed I often declare a LinkedList<MyClass> types of things, but can one even specialize methods based on those since they are types and not classes?
<kevingal>
Is there a way to ensure that the element gets erased from the array after being popped?
<kevingal>
(to avoid garbage hanging around that shouldn't be referenced anymore).
<beach>
kevingal: Set it to something like NIL or 0.
<dnhester26>
beach: yeah, thanks, ah, so then outside of SBCL there is not much of type checking or at least there is no trivial-* package to do it?
<kevingal>
Hm, I was wondering if there was a built-in way of handling that, rather than having to do it manually.
<beach>
dnhester26: There is no way in Common Lisp to declare that a list contains only a certain type of element.
varjag has quit [Quit: ERC (IRC client for Emacs 27.1)]
<dnhester26>
ha, thanks, that's interesting
<beach>
dnhester26: You can do type checking withe CHECK-TYPE, just not with declarations.
<dnhester26>
the use case I have is needing to accept two classes A and B, and if there is a slot in A whose type would be a list of B objects, then return that slot, so that the client knows to bind the list of B objects to that slot
<dnhester26>
so basically there seems like no straight forward way to do it.
<beach>
WOW, hold on....
<dnhester26>
When it's just one object instead of a list, I can do it checking the type of the slot
<beach>
Are you sure A and B are classes and not instances of classes?
<dnhester26>
yeah
<dnhester26>
it's OK, I am going to make it less flexible and require that the slot to bind the results have to be provided
<beach>
I guess I don't understand the use case.
<beach>
How did you plan to find the slots of the class, and how did you plan to determine the type of the object in that slot?
<dnhester26>
two sql tables, modeled each with a respective class in CL, then say (select 'class-a (left-join 'class-b)) where class-a does not contain any references to class-b rather it's a 1-n relationship, and if there was some slot in the CL class which does not correspond to the table, but which allows to bind a list of class-b objects
<dnhester26>
I thought that by declaring that slot to be of type list-of-b-objects I could then programmatically deduce which slot it would be
<dnhester26>
I can do the other way (select 'class-b (left-join 'class-a)) where class-b has a reference to class-a
<dnhester26>
I just call the function to get class-slots...
<beach>
You can use this function to determine the slots of the class.
<dnhester26>
those issues I have already finished, this was just the last part
<dnhester26>
yeah, I finished all of that, the only case I had left was the list case where the type does not match
<beach>
So you found the type of the slot?
<dnhester26>
unless: is it ok to bind a list to a slot of some class-a type?
<dnhester26>
yeah, I can find the type of the slot no problem
<beach>
But to fill the slot, you need an instance.
<beach>
CLASS-SLOTS returns a list of the slots that each instance has.
<beach>
Not the slots of the class metaobject.
<dnhester26>
If I have an instance whose class defines slot-2 to be of class-b, can a bind to that instance's slot a list instead of an object of class-b?
may_ has joined #commonlisp
igemnace has quit [Read error: Connection reset by peer]
<beach>
That would be undefined behavior.
<dnhester26>
ah, right, I thought it would just give me an error, I tried looking for what to read for that in the ToC of the Keene book but couldn't find anything
<dnhester26>
ok, thanks
<dnhester26>
I'm going to try to finish this now
occ has quit [Ping timeout: 255 seconds]
AndreiDuma has joined #commonlisp
dra has joined #commonlisp
dra has quit [Changing host]
dra has joined #commonlisp
<beach>
dnhester26: What you are doing sounds very strange to me, but maybe it is necessary since you are dealing with SQL.
<dnhester26>
beach: yeah, it's somewhat unusual, I don't think what am doing has been done before. I'm extending some functionality of ORMs and it' basically impossible in non lisp languages, or at least extremely difficult because of the lack of introspection of the classes
AndreiDuma has quit [Read error: Connection reset by peer]
AndreiDuma has joined #commonlisp
<beach>
I see.
igemnace has joined #commonlisp
jack_rabbit has joined #commonlisp
jonatack has quit [Ping timeout: 256 seconds]
ldb has joined #commonlisp
Devon7 has joined #commonlisp
Devon has joined #commonlisp
Devon7 has quit [Client Quit]
ldb has quit [Quit: restart emacs]
son0p has joined #commonlisp
Inline has quit [Quit: Leaving]
Inline has joined #commonlisp
bendersteed has quit [Quit: bendersteed]
danse-nr3 has quit [Ping timeout: 268 seconds]
AndreiDuma has quit [Read error: Connection reset by peer]
<Devon>
Anyone here use CCL under a MicroSoft Windows OS?
AndreiDuma has joined #commonlisp
azimut has joined #commonlisp
epony has quit [Remote host closed the connection]
epony has joined #commonlisp
danse-nr3 has joined #commonlisp
tibfulv_ has joined #commonlisp
hineios26 has joined #commonlisp
dnhester_ has joined #commonlisp
beach` has joined #commonlisp
qhong_ has joined #commonlisp
beach has quit [Killed (NickServ (GHOST command used by beach`!~user@2a01:cb19:683:8800:b2e1:40af:a7a9:90e5))]
beach` is now known as beach
Demosthe1ex has joined #commonlisp
tasty_ has joined #commonlisp
tasty_ has quit [Changing host]
tasty_ has joined #commonlisp
cinerion_ has joined #commonlisp
|3b|` has joined #commonlisp
_cymew_ has joined #commonlisp
even4voi1 has joined #commonlisp
buffet2 has joined #commonlisp
thonkpod has joined #commonlisp
ski_ has joined #commonlisp
NotThatRPG_ has joined #commonlisp
NotThatRPG has quit [Ping timeout: 264 seconds]
thuna` has quit [Ping timeout: 264 seconds]
buffet1 has quit [Ping timeout: 264 seconds]
thonkpod_ has quit [Ping timeout: 264 seconds]
qhong has quit [Ping timeout: 264 seconds]
even4void has quit [Ping timeout: 264 seconds]
contrapunctus has quit [Ping timeout: 264 seconds]
attila_lendvai has quit [Ping timeout: 264 seconds]
dino_tutter has quit [Ping timeout: 264 seconds]
mathrick has quit [Ping timeout: 264 seconds]
tasty has quit [Ping timeout: 264 seconds]
Demosthenex has quit [Ping timeout: 264 seconds]
tibfulv has quit [Ping timeout: 264 seconds]
hineios2 has quit [Ping timeout: 264 seconds]
ski has quit [Ping timeout: 264 seconds]
cinerion has quit [Ping timeout: 264 seconds]
dnhester26 has quit [Ping timeout: 264 seconds]
|3b| has quit [Ping timeout: 264 seconds]
hineios26 is now known as hineios2
attila_lendvai_ has joined #commonlisp
epony has quit [Excess Flood]
epony has joined #commonlisp
dnhester_ has quit [Remote host closed the connection]
epony has quit [Remote host closed the connection]
dcb has joined #commonlisp
mathrick has joined #commonlisp
epony has joined #commonlisp
dino_tutter has joined #commonlisp
contrapunctus has joined #commonlisp
<paule32>
Devon: i am under windows
<paule32>
Devon: i use sbcl - a common lisp
AndreiDuma has quit [Read error: Connection reset by peer]
AndreiDuma has joined #commonlisp
vyrsh has joined #commonlisp
ski_ is now known as ski
may__ has joined #commonlisp
dnhester26 has joined #commonlisp
may_ has quit [Ping timeout: 240 seconds]
yagkasha has joined #commonlisp
danse-nr3 has quit [Ping timeout: 260 seconds]
dnhester26 has quit [Remote host closed the connection]
dnhester26 has joined #commonlisp
AndreiDuma has quit [Quit: My MacBook has gone to sleep. ZZZzzz…]
yitzi has quit [Ping timeout: 256 seconds]
jmdaemon has joined #commonlisp
makomo has quit [Quit: WeeChat 4.1.2]
<anthk_>
sbcl it's very fast, I tried some benchmarks from the project euler exercise I cloned from a repo, sbcl finished in seconds instead of minutes against clisp
Posterdati has joined #commonlisp
dnhester26 has quit [Remote host closed the connection]
Demosthe1ex is now known as Demosthenex
AndreiDuma has joined #commonlisp
cage has joined #commonlisp
mgl_ has quit [Ping timeout: 255 seconds]
lottaquestions has joined #commonlisp
mulk has quit [Ping timeout: 256 seconds]
mulk has joined #commonlisp
yitzi has joined #commonlisp
gpiero has quit [Quit: Quitting...]
gpiero has joined #commonlisp
jfloren_ has joined #commonlisp
vyrsh has quit [Ping timeout: 256 seconds]
<jfloren_>
Given a wav file, what's my best option for playing it back in CL on Linux?
wacki has joined #commonlisp
<Inline>
mcl or mlc ?
dnhester26 has joined #commonlisp
<Inline>
what was it's name meh
<Inline>
cml ?
<Inline>
no clm ah
<Inline>
common lisp multimedia provides such a thing afaik
<BrokenCog>
so, yesterday I was trying to figure out how to change the default directory which quickproject:make-project uses to create a new project. I thought (setq ql:*local-project-directories* (list #P"d:/Projects")) was working, but, turns out it isn't. The new project is created in the directory I started the sbcl repl.
<BrokenCog>
just happened to be in the correct directory yesterday I guess.
jonatack has joined #commonlisp
<BrokenCog>
(giving the full pathname to make-project creates the project in the given path)
<josrr>
BrokenCog: it is because Quickproject creates the project in cl:*default-pathname-defaults*
<BrokenCog>
the reason ... yes.
<BrokenCog>
which means changing it will arbitrarily change behavior of everything else. I don't understand why quickproject uses this variable.
mala has quit [Ping timeout: 260 seconds]
pfdietz has quit [Quit: Client closed]
<jfloren_>
Inline: thank you, I'm looking... do you mean Common Lisp Music?
<bike>
BrokenCog: you can just bind *default-pathname-defaults* around your quickprojecting, and then it won't affect anything outside the binding.
<ixelp>
GitHub - Shirakumo/harmony: A Common Lisp sound system
<jfloren_>
oh, that looks pretty straightforward
<bike>
BrokenCog: josrr gave you (let ((*default-pathname-defaults* #P"/tmp/")) (quickproject:make-project #P"prueba")) yesterday.
johnjaye has joined #commonlisp
pfdietz has joined #commonlisp
<BrokenCog>
bike: right, but, that is on a per-usage basis, which isn't a 'default'. Per usage I can much simpler give the full path: (qucikproject:make-project #P"/path/to/my/projects/new-project").
amb007 has joined #commonlisp
mgl_ has quit [Ping timeout: 256 seconds]
dnhester26 has quit [Remote host closed the connection]
dnhester26 has joined #commonlisp
<Inline>
yes jfloren_
Inline has quit [Quit: Leaving]
Inline has joined #commonlisp
OlCe has quit [Ping timeout: 256 seconds]
AndreiDuma has quit [Quit: My MacBook has gone to sleep. ZZZzzz…]
may_ has joined #commonlisp
Lycurgus has quit [Quit: leaving]
may__ has quit [Ping timeout: 276 seconds]
zxcvz has joined #commonlisp
zxcvz has quit [Quit: zxcvz]
ronald has quit [Ping timeout: 268 seconds]
ronald has joined #commonlisp
OlCe` has joined #commonlisp
AndreiDuma has joined #commonlisp
dnhester26 has quit [Remote host closed the connection]
amb007 has quit [Read error: Connection reset by peer]
amb007 has joined #commonlisp
AndreiDuma has quit [Quit: My MacBook has gone to sleep. ZZZzzz…]
szkl has quit [Quit: Connection closed for inactivity]
younder has quit [Remote host closed the connection]
dnhester26 has joined #commonlisp
younder has joined #commonlisp
mgl_ has joined #commonlisp
may_ has quit [Quit: Leaving]
copec has quit [Remote host closed the connection]
copec has joined #commonlisp
jonatack has quit [Ping timeout: 264 seconds]
NicknameJohn has quit [Ping timeout: 260 seconds]
dnhester26 has quit [Remote host closed the connection]
dnhester26 has joined #commonlisp
varjag has joined #commonlisp
yitzi has quit [Remote host closed the connection]
waleee has joined #commonlisp
mgl_ has quit [Ping timeout: 256 seconds]
tyson2 has joined #commonlisp
_cymew_ has quit [Ping timeout: 260 seconds]
igemnace has quit [Ping timeout: 268 seconds]
Gleefre has joined #commonlisp
mgl_ has joined #commonlisp
tyson2 has quit [Remote host closed the connection]
rendar has quit [Quit: Leaving]
wacki has quit [Quit: My iMac has gone to sleep. ZZZzzz…]
cage has quit [Quit: rcirc on GNU Emacs 29.1]
yagkasha has quit [Quit: Connection closed for inactivity]
epony has quit [Remote host closed the connection]
akoana has joined #commonlisp
epony has joined #commonlisp
<Kingsy>
you know what I find annoying about CLOS as I learn.. defmethod doesnt produce a method that is attached to a class. its just a method that knows about classes right? or am I wrong here?
lottaquestions has quit [Ping timeout: 260 seconds]
lispmacs[work] has quit [Remote host closed the connection]
traidare has quit [Ping timeout: 256 seconds]
<pfdietz>
That's not annoying, that's awesome.
<pfdietz>
You can also use individual values, not classes, as specifiers via EQL specifiers.
<pfdietz>
er, specializers
<Kingsy>
when you say specializers do you mean (name some-type) ?
<pfdietz>
The some-type (actually, some-class) is a specializer, but your can also use (eql <value>) as a specializer. The method will only apply if that argument is eql to that value.
<gilberth>
And you can specialize on any argument. Any number and any position. This is why methods are not attached to classes. And that's the awesome part.
<Kingsy>
alright I need to get my head around that in a little bit. haha yeah its so so strange coming from something like java
<Kingsy>
I feel like I want to "group" and associate" my methods
<pfdietz>
It's not limited to specializing on just the first argument, as it is in less powerful OOP systems.
<pfdietz>
This way, if someone wants to extend a generic function to some other classes, he doesn't have to modify the definition of any of those classes. He just has to define a method. If he wants to add a generic function, he doesn't have to modify a "base class" (fragile base class problem, I think that's called.)
Fare has joined #commonlisp
Gleefre has quit [Remote host closed the connection]
markb1 has joined #commonlisp
Pixel_Outlaw has joined #commonlisp
dnhester26 has quit [Remote host closed the connection]
Gleefre has joined #commonlisp
<Kingsy>
can someone please explain why this is happening -> https://bpa.st/MHKQ <- you can see my formats and my output. the only difference between the correct member call and the one thats incorrectly returning nil is I am using a class accessor. but the value is the same... I don't understand.
<ixelp>
View paste MHKQ
waleee has quit [Ping timeout: 276 seconds]
`Pixel_Outlaw has joined #commonlisp
<Kingsy>
they are both of type CONS, I am so confused why that wouldnt work
<edgar-rft>
Kingsy: ~A interpolates for "aesthetical" reasons and doen't necessarily print the correct result, try using ~S instead of ~A or show us the REPL output of (player-status player)
<edgar-rft>
for example (format t "~A~%" "(1 .2)") prints (1. 2) but "(1 .2)" is a string and not a cons