phoe changed the topic of #lisp to: Common Lisp, the #1=(programmable . #1#) programming language | <http://cliki.net/> <https://irclog.tymoon.eu/freenode/%23lisp> <https://irclog.whitequark.org/lisp> <http://ccl.clozure.com/irc-logs/lisp/> | SBCL 1.4.14, CMUCL 21b, ECL 16.1.3, CCL 1.11.5, ABCL 1.5.0
robotoad has quit [Quit: robotoad]
Mr-Potter has quit [Quit: Leaving]
Kundry_Wag has joined #lisp
Kundry_Wag has quit [Ping timeout: 240 seconds]
mksybr has quit [Remote host closed the connection]
jack_rabbit has joined #lisp
osieln has quit [Quit: leaving]
phoe has joined #lisp
Lycurgus has joined #lisp
Kundry_Wag has joined #lisp
nowhere_man has joined #lisp
msb has quit [Quit: ENOENT]
Kundry_Wag has quit [Ping timeout: 250 seconds]
Oladon has joined #lisp
anewuser has joined #lisp
Selwyn has quit [Remote host closed the connection]
rumbler31 has joined #lisp
rumbler31 has quit [Ping timeout: 246 seconds]
keep_learning has joined #lisp
Kundry_Wag has joined #lisp
hectorhonn has joined #lisp
<hectorhonn> morning everyone
Kundry_Wag has quit [Ping timeout: 244 seconds]
smokeink has joined #lisp
<notzmv> morning hectorhonn
c4droid has joined #lisp
<c4droid> Good morning. :)
smokeink has quit [Remote host closed the connection]
smokeink has joined #lisp
smokeink has quit [Remote host closed the connection]
c4droid has left #lisp [#lisp]
c4droid has joined #lisp
c4droid has left #lisp [#lisp]
didi has joined #lisp
verisimilitude has quit [Remote host closed the connection]
verisimilitude has joined #lisp
pierpal has quit [Read error: Connection reset by peer]
pierpal has joined #lisp
pierpal has quit [Ping timeout: 240 seconds]
slightlycyborg has quit [Ping timeout: 240 seconds]
Oladon has quit [Quit: Leaving.]
pierpal has joined #lisp
dale has quit [Quit: dale]
pierpal has quit [Read error: Connection reset by peer]
pierpal has joined #lisp
Kundry_Wag has joined #lisp
pierpal has quit [Read error: Connection reset by peer]
Kundry_Wag has quit [Ping timeout: 245 seconds]
space_otter has joined #lisp
makomo has quit [Ping timeout: 250 seconds]
pierpal has joined #lisp
Lycurgus has quit [Quit: Exeunt]
pierpal has quit [Ping timeout: 250 seconds]
pierpal has joined #lisp
Kundry_Wag has joined #lisp
jack_rabbit has quit [Ping timeout: 240 seconds]
esrse has joined #lisp
pierpal has quit [Read error: Connection reset by peer]
robotoad has joined #lisp
Kundry_Wag has quit [Ping timeout: 268 seconds]
undiscovered has quit [Remote host closed the connection]
Essadon has quit [Quit: Qutting]
pierpal has joined #lisp
anewuser has quit [Ping timeout: 240 seconds]
akoana has left #lisp ["Leaving"]
dddddd has quit [Remote host closed the connection]
iovec has quit [Quit: Connection closed for inactivity]
pierpal has quit [Ping timeout: 268 seconds]
shifty has joined #lisp
krwq has joined #lisp
Kundry_Wag has joined #lisp
dale has joined #lisp
Kundry_Wag has quit [Ping timeout: 246 seconds]
Lord_of_Life has quit [Ping timeout: 272 seconds]
Lord_of_Life_ has joined #lisp
Lord_of_Life_ is now known as Lord_of_Life
pierpal has joined #lisp
shifty has quit [Ping timeout: 246 seconds]
orivej has quit [Ping timeout: 244 seconds]
pierpal has quit [Read error: Connection reset by peer]
pierpal has joined #lisp
actuallybatman has quit [Read error: Connection reset by peer]
<beach> Good morning everyone!
pierpal has quit [Read error: Connection reset by peer]
pierpal has joined #lisp
zhlyg has joined #lisp
Kundry_Wag has joined #lisp
Kundry_Wag has quit [Ping timeout: 250 seconds]
xrash has quit [Ping timeout: 246 seconds]
Khisanth has quit [Ping timeout: 240 seconds]
Bike has quit [Quit: Lost terminal]
Kundry_Wag has joined #lisp
gravicappa has joined #lisp
sauvin has joined #lisp
Kundry_Wag has quit [Ping timeout: 268 seconds]
Khisanth has joined #lisp
Oladon has joined #lisp
sabrac has joined #lisp
<sabrac> anyone have intermittant getaddrinfo errors with ccl and bordeaux threads? I have not seen it triggered in sbcl on the same code (dao-class-threads test in postmodern-tests)
<sabrac> linux box
pierpal has quit [Quit: Poof]
zhlyg has quit [Ping timeout: 246 seconds]
pierpal has joined #lisp
Arcaelyx has quit [Quit: Textual IRC Client: www.textualapp.com]
Kundry_Wag has joined #lisp
thodg has joined #lisp
Kundry_Wag has quit [Ping timeout: 240 seconds]
<sabrac> "intermittant" overstates it. Triggered twice in 100 tests
dale has quit [Quit: dale]
actuallybatman has joined #lisp
Kundry_Wag has joined #lisp
Kundry_Wag has quit [Ping timeout: 240 seconds]
froggey has quit [Ping timeout: 240 seconds]
froggey has joined #lisp
rippa has joined #lisp
hiroaki has quit [Ping timeout: 250 seconds]
<fiddlerwoaroof> What's the easiest way to setup a quicklisp dist?
mange has quit [Remote host closed the connection]
Oladon has quit [Quit: Leaving.]
iovec has joined #lisp
Kundry_Wag has joined #lisp
ahungry has joined #lisp
_whitelogger has quit [Ping timeout: 250 seconds]
pierpal has quit [Quit: Poof]
xkapastel has quit [Quit: Connection closed for inactivity]
X-Scale has quit [Ping timeout: 244 seconds]
marvin2 has quit [Ping timeout: 246 seconds]
Jesin has quit [Quit: Leaving]
gravicappa has quit [Ping timeout: 268 seconds]
_whitelogger has joined #lisp
<thrig> (OPTIMIZE (LEAST-SCARY-WARNINGS 3))
<Bike> well, that's because if you're using speed 3 it's expected that you'll want to go ever faster
<jackdaniel> (declare (moar-scarier-fasterer 3)) ; commonly known as (optimize (speed 3))
<fiddlerwoaroof> Bike: yeah, but once I've thought about one of the warnings it generates, I should be able to mark that one as "done"
isBEKaml has quit [Quit: WeeChat 2.3]
knicklux has quit [Ping timeout: 240 seconds]
benkard has quit [Ping timeout: 250 seconds]
admich has joined #lisp
nowhere_man has joined #lisp
rozenglass has joined #lisp
anewuser has quit [Quit: anewuser]
amerlyq has quit [Quit: amerlyq]
random-nick has quit [Ping timeout: 250 seconds]
knicklux has joined #lisp
admich has quit [Ping timeout: 240 seconds]
makomo has quit [Ping timeout: 246 seconds]
Zaab1t has quit [Quit: bye bye friends]
ggole has quit [Quit: ggole]
rjid has joined #lisp
pierpal has quit [Quit: Poof]
pierpal has joined #lisp
undiscov1 has quit [Ping timeout: 256 seconds]
nowhere_man has quit [Ping timeout: 252 seconds]
<fiddlerwoaroof> Is there any emacs magic to get proper indentation for defmethod with qualifiers as well as (:method ...) with qualifiers?
undiscov1 has joined #lisp
bexx has joined #lisp
rjid has left #lisp [#lisp]
<fiddlerwoaroof> Hmm, that code sample is a weird edgecase: defmethod indents properly at the toplevel, but not inside a LET
random-nick has joined #lisp
vms14 has joined #lisp
undiscov1 has quit [Ping timeout: 256 seconds]
nicksmaddog has quit [Quit: Leaving]
hiroaki has joined #lisp
deadghost has joined #lisp
frgo has joined #lisp
jmercouris has joined #lisp
knicklux has quit [Remote host closed the connection]
jmercouris has quit [Ping timeout: 272 seconds]
Lycurgus has joined #lisp
ifitzpatrick has joined #lisp
ifitzpatrick has quit [Remote host closed the connection]
jmercouris has joined #lisp
fortitude has quit [Remote host closed the connection]
zhlyg has quit [Ping timeout: 245 seconds]
Denommus has quit [Remote host closed the connection]
benkard has joined #lisp
xkapastel has quit [Quit: Connection closed for inactivity]
rippa has quit [Quit: {#`%${%&`+'${`%&NO CARRIER]
benkard has quit [Ping timeout: 244 seconds]
benkard has joined #lisp
jmercouris has quit [Remote host closed the connection]
undiscov1 has joined #lisp
m0w has quit [Ping timeout: 258 seconds]
equwal has quit [Quit: ZNC 1.7.1 - https://znc.in]
bexx has quit [Ping timeout: 258 seconds]
anamorphic has quit [Quit: anamorphic]
anamorphic has joined #lisp
anamorphic has quit [Client Quit]
anamorphic has joined #lisp
anamorphic has quit [Client Quit]
anamorphic has joined #lisp
anamorphic has quit [Client Quit]
anamorphic has joined #lisp
anamorphic has quit [Client Quit]
m0w has joined #lisp
phoe has quit [Ping timeout: 252 seconds]
hiroaki has quit [Ping timeout: 250 seconds]
LiamH has quit [Quit: Leaving.]
<vms14> why I can do this
<vms14> (defun mixed ( &optional arg1 &key arg2) (list arg1 arg2 ))
<vms14> but not this
<vms14> (defun mixed ( &key arg1 &optional arg2) (list arg1 arg2))
<thrig> some books warn against mixing those two
<vms14> I see the first one forces you to put the arg1 if you want to put the arg2
<vms14> but the second one it just don't work
<vms14> (terminated by "Lambda list marker &OPTIONAL not allowed here.")
<vms14> just because the &key was before
<vms14> where I can find an explanation of why this is not allowed?
<Bike> optional has to go before key in the syntax.
<Bike> it's part of the grammar. i'll find it in clhs, just a moment.
<Bike> clhs 3.4.1
<vms14> thrig,Bike, thanks
<thrig> http://www.gigamonkeys.com/book/functions.html "Mixing Different ..."
<Bike> i don't know how you would coherently parse it if you could have optional arguments after the key arguments, anyway.
varjag has quit [Quit: ERC (IRC client for Emacs 26.1)]
<vms14> The problem is that if a caller doesn't supply values for all the optional parameters, then those parameters will eat up the keywords and values intended for the keyword parameters.
<vms14> Thanks so much
<vms14> well, this explains why I must to put the keyword arguments before the optional ones, but not why it fails
hiroaki has joined #lisp
<vms14> I'll just avoid to mix &key and optional since there is no reason to use them toghether
<vms14> together*
<vms14> ty for the fast answer
Lycurgus has quit [Quit: Exeunt]
<vms14> I like to test things and try to understand why they happen
<vms14> if (eq(key, CAR(parms))) { parms = CDR(parms); while (CONS_P(parms)) { if (eq(opt, CAR(parms))) { write_format(standard_error, "Lambda list marker &OPTIONAL not allowed here.\n"); exit(1);
makomo has joined #lisp
orivej has joined #lisp
<drmeister> With Common Lisp is it possible to read files with filenames that contain '*'? sbcl treats it as a wild pathname.
<drmeister> (wild-pathname-p "/tmp/foo*.txt") --> T
<drmeister> But I have an actual file named 'foo*.txt'
m0w has quit [Ping timeout: 240 seconds]
<drmeister> Which is rather unfortunate - I know - but Common Lisp should be able to deal with this - no?
Bike has quit [Ping timeout: 256 seconds]
<vms14> OPEN: wildcards are not allowed here: #P"oh*.txt
<vms14> in clisp trying with "with-open-file"
<vms14> maybe there is a function able to do it
<drmeister> Thank you for that pointer on OPEN
<drmeister> Huh - it appears to be a problem for Common Lisp - gulp. OPEN doesn't deal with wild filespecs - nor does probe-file.
orivej has quit [Ping timeout: 250 seconds]
<vms14> drmeister: https://groups.google.com/forum/#!msg/comp.lang.lisp/-JrwtUnuMvs/fDEGdspUEpMJ
<Xach> drmeister: sbcl has an escape syntax
<vms14> Opened file "/tmp/foo*" as fd 31
<thrig> (let ((f (make-pathname :name "foo*"))) (with-open-file (s f) (read s)))
<Xach> drmeister: check what you get back from (directory "*.txt")
<Xach> (it returns the pathname with the syntax you can use for opening)
<thrig> (POSIX shells do even worse things with globs in names, by default)
<vms14> it seems with the linux package you can do it
Kaisyu has joined #lisp
defaultxr has quit [Quit: brb]
hiroaki has quit [Ping timeout: 240 seconds]
<pjb> vms14: you cannot put key arguments before optionals.
<pjb> vms14: however, you can implement your own argument parsing.
<thrig> nooooo
<vms14> but why not
<vms14> what's happening in there?
<vms14> drmeister: have you tried open the file with (open (parse-native-namestring "/tmp/foo*"))
orivej has joined #lisp
<vms14> this is in sbcl
<drmeister> (directory "/tmp/foo*.txt") --> (#P"/private/tmp/foo\\*.txt")
<drmeister> Interesting...
<vms14> so it works?
<vms14> xD
<drmeister> And (open "/tmp/foo\\*.txt" :direction :input) gives me a file-stream - thanks Xach!
zotan has quit [Ping timeout: 250 seconds]
<drmeister> Unfortunately none of this works in Clasp - that looks like I have a problem on my hands.
random-nick has quit [Ping timeout: 246 seconds]
zotan has joined #lisp
<drmeister> Nor does it work in ECL
<drmeister> We are birds of a feather.
<vms14> clhs open:
<specbot> Couldn't find anything for open:.
<vms14> An error of type file-error is signaled if (wild-pathname-p filespec)
<vms14> returns true.
<vms14> maybe you could redefine wild-pathname-p
<vms14> nah, it's not working
gxt has quit [Quit: WeeChat 2.3]
<drmeister> I was thinking of trying that first - to modify wild-pathname-p.
Kundry_Wag has joined #lisp
<vms14> (open "\*\") this is reading from somewhere xD
shifty has joined #lisp
<pjb> vms14: for example, like this: https://pastebin.com/girFsTdC
benkard has quit [Ping timeout: 258 seconds]
<pjb> vms14: I chose to put the optional arguments after the key arguments.
<pjb> Note that the optional argument cannot be one of the key!
<pjb> vms14: (open "\*\") is not a complete sexp! Type ") RET
<vms14> lol you made your own parameter "adder"
Kundry_Wag has quit [Ping timeout: 272 seconds]
karlosz has quit [Quit: karlosz]
<vms14> I was thinking I could just "bypass" in some way the arguments, but nope
<vms14> trying weird things usually I discover not documented ones
<vms14> like in C for a function expecting a struct you can pass it on the fly just casting it
<vms14> but then when looking about this weird thing I saw that it was a gcc extension
<pjb> You can, like this: https://pastebin.com/86QuMTqQ
<vms14> last one is cleaner
<vms14> ty for the hints, pjb
<vms14> (open "\*\") xD how dumb I am scaping the quotes and thinking it's reading
<pjb> It is reading.
<pjb> Also, (string= "\*" "*") #| --> t |#
frodef has quit [Ping timeout: 240 seconds]
<jasom> drmeister: Don't worry for all 3 lisp implementations I tried various tricks on, several years ago, I was able to come up with a file for which cl:directory would return a pathname that OPEN could not then open. I didn't try ECL, so never filed a bug :(
akoana has joined #lisp
<jasom> The two characters that were involved were backslash and asterisk; one implementation would let you escape asterisks, but when you did a directory would not return a doubly-escaped backslash (so e.g. a file named '\*' would return a pathname that would open '*') and the other one was cl:directory not quoting '*' characters in pathnames, so a file named '*' would end up as a wild pathname.
vms14 has quit [Quit: Leaving]
benkard has joined #lisp