jackdaniel 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.5.4, CMUCL 21b, ECL 16.1.3, CCL 1.11.5, ABCL 1.5.0
ebrasca has joined #lisp
pfdietz has quit [Remote host closed the connection]
ltriant has quit [Ping timeout: 272 seconds]
ltriant has joined #lisp
xkapastel has quit [Quit: Connection closed for inactivity]
CloseToZero has joined #lisp
CloseToZero has quit [Remote host closed the connection]
CloseToZero has joined #lisp
Fare has joined #lisp
dddddd has quit [Ping timeout: 268 seconds]
CloseToZero has quit [Remote host closed the connection]
DGASAU has quit [Read error: Connection reset by peer]
ltriant has quit [Ping timeout: 245 seconds]
orivej has joined #lisp
dddddd has joined #lisp
bwidlar has joined #lisp
slyrus_ has joined #lisp
CloseToZero has joined #lisp
slyrus__ has quit [Ping timeout: 244 seconds]
hello80493485039 has quit [Ping timeout: 260 seconds]
DGASAU has joined #lisp
ltriant has joined #lisp
ltriant has quit [Ping timeout: 272 seconds]
pygmypup_ has joined #lisp
pygmypuppy has quit [Ping timeout: 246 seconds]
bwidlar has quit [Ping timeout: 272 seconds]
bwidlar has joined #lisp
bwidlar has quit [Client Quit]
Oladon has quit [Quit: Leaving.]
pjb has joined #lisp
Lord_of_Life has quit [Ping timeout: 245 seconds]
Lord_of_Life has joined #lisp
ltriant has joined #lisp
ltriant has quit [Ping timeout: 245 seconds]
ebzzry has joined #lisp
<ebzzry> lispworks.com seems to be down
<no-defun-allowed> Down here too.
dialectic has quit [Ping timeout: 246 seconds]
ebrasca has quit [Remote host closed the connection]
actuallybatman has joined #lisp
actuallybatman is now known as MikeSS
Fare has quit [Ping timeout: 258 seconds]
MikeSS is now known as actuallybatman
<ebzzry> OK. It’s back up.
ltriant has joined #lisp
pygmypup_ has quit [Quit: My MacBook has gone to sleep. ZZZzzz…]
Fare has joined #lisp
ltriant has quit [Ping timeout: 248 seconds]
anewuser has joined #lisp
dialectic has joined #lisp
krid has quit [Ping timeout: 248 seconds]
dale has joined #lisp
<beach> Good morning everyone!
_whitelogger has joined #lisp
jmbr has joined #lisp
ltriant has joined #lisp
Bike has quit [Quit: Lost terminal]
ravndal has quit [Quit: WeeChat 2.5]
ravndal has joined #lisp
jmbr has quit [Ping timeout: 276 seconds]
mindthelion has joined #lisp
techquila has quit [Remote host closed the connection]
froggey has quit [Ping timeout: 272 seconds]
vlatkoB has joined #lisp
froggey has joined #lisp
nanoz has joined #lisp
dialectic has quit [Ping timeout: 245 seconds]
torbo has joined #lisp
wigust has quit [Read error: Connection reset by peer]
X-Scale has quit [Quit: Want to be different? Try HydraIRC -> http://www.hydrairc.com <-]
bmansurov has joined #lisp
wigust has joined #lisp
ravndal has quit [Remote host closed the connection]
dannyboy35 has joined #lisp
ravndal has joined #lisp
<dannyboy35> Hi I’m new to lisp and was wondering what development environment would be suggested? Please don’t say slime lol
<dannyboy35> I’ve looked into sublime-text
<dannyboy35> And I may go with that
Oladon has joined #lisp
orivej has quit [Ping timeout: 268 seconds]
<LdBeth> Then you don’t get as much goodies as using slime
<dannyboy35> Also would you recommend Roswell for a newbie?
<bmansurov> o/ Can anyone tell me how I can return from a recursive call? Line 8 here: https://pastebin.com/udgjP4em . (return-from helper (car l)) doesn't seem to do the trick.
<LdBeth> dannyboy35: do you have previous experience on other programming languages
<dannyboy35> LdBeth: emacs seems like a huge deal to learn I do want to
ltriant has quit [Ping timeout: 248 seconds]
<dannyboy35> LdBeth: I’ve been teaching myself python but haven’t really done anything with it
<LdBeth> dannyboy35: roswell is good when you don’t what to go everywhere to download things
<dannyboy35> I know a bit of C I took s Visual Basic class in college so I’m not new to programming but I wouldn’t call myself a programmer
<LdBeth> <dannyboy35 "LdBeth: I’ve been teaching mysel"> dannyboy35: then the first thing I’d like to recommend is to get some feeling of doing programming, and I think the most productive way to do so is learning emacs : D
dannyboy35 has quit [Quit: Mutter: www.mutterirc.com]
ltriant has joined #lisp
dannyboy35 has joined #lisp
<dannyboy35> LdBeth: I have the oreilly book on smack
<dannyboy35> Emacs
<dannyboy35> The book on smack is something else
Fare has quit [Quit: Leaving]
<LdBeth> dannyboy35: You don’t have to learn and read a lot to use it, my recommendation is http://spacemacs.org/ which is a work out of the box config for many programming languages including C python CommonLisp Scheme Haskell Swift ...
dannyboy35 has quit [Client Quit]
dannyboy35 has joined #lisp
<dannyboy35> sbcl is the one I’ve decided on
<dannyboy35> I’ve looked at atom I got slima working but it crashed my computer
<dannyboy35> I have played with emacs in the past vim is just a lot easier to use at least for me
torbo has quit [Remote host closed the connection]
<dannyboy35> I’ve only probably learn less then 1% of it
<dannyboy35> At least I can open and close files lol
<dannyboy35> But I’ll definitely take a look at that it looks cool LdBeth
<LdBeth> dannyboy35: that’s great, spacemacs is designed primarily for prior vim users
anewuser has quit [Quit: anewuser]
<dannyboy35> Well LdBeth I’m going to sleep it’s 1 am here and I work tomorrow afternoon I’ll definitely be back my nick on my computer is danielboston26 I’m on my iPhone right now
<dannyboy35> Take care all
<Godel[m]> Bye
dannyboy35 has quit [Quit: Mutter: www.mutterirc.com]
<beach> bmansurov: You can do (return-from kth-to-last-recursive ...)
<bmansurov> beach: ok thanks, is there a way to return from the recursive call but stay inside the main function?
<LdBeth> bmansurov: you decide which function to return to by passing the function name to return-from
<beach> bmansurov: You need to create a block then.
nanoz has quit [Ping timeout: 248 seconds]
<beach> bmansurov: (block hello (labels .... (return-from hello ...)))
dddddd has quit [Remote host closed the connection]
<LdBeth> Yes, when necessary, create a block
<beach> bmansurov: But recursion is not a good technique on lists.
<LdBeth> A function is a implicit block
<beach> bmansurov: Try using a combination of LENGTH and NTH.
ym555_ has joined #lisp
<beach> bmansurov: Besides, I don't see how your code might do the right thing.
<bmansurov> beach: sure, I think length and nth solves it easily, I wanted to try the recursive version.
<bmansurov> beach: hmm, any obvious errors in it?
<beach> But recursion on lists is not a good idea.
<beach> I may be missing something. Maybe it works.
<bmansurov> beach: ok got it
ym555 has quit [Ping timeout: 272 seconds]
ym555 has joined #lisp
actuallybatman has left #lisp ["ERC (IRC client for Emacs 26.2)"]
<beach> Your Common Lisp system may have a very small stack, so the risk of too great a recursion depth is significant.
bmansurov has left #lisp ["Later"]
Arcaelyx has quit [Ping timeout: 258 seconds]
<beach> And you will probably trash the cache by growing and shrinking the stack a lot.
* beach suspects that his advice was not appreciated.
ym555_ has quit [Ping timeout: 246 seconds]
CloseToZero has quit [Remote host closed the connection]
chris4197 has joined #lisp
CloseToZero has joined #lisp
CloseToZero has quit [Remote host closed the connection]
CloseToZero has joined #lisp
CloseToZero has quit [Remote host closed the connection]
CloseToZero has joined #lisp
Necktwi has quit [Ping timeout: 244 seconds]
frgo has joined #lisp
FennecCode has quit [Quit: ERC (IRC client for Emacs 26.2)]
jeosol has joined #lisp
<jeosol> morning guys
CloseToZero has quit [Remote host closed the connection]
CloseToZero has joined #lisp
igemnace has quit [Ping timeout: 245 seconds]
CloseToZero has quit [Remote host closed the connection]
igemnace has joined #lisp
<beach> Hello jeosol.
CloseToZero has joined #lisp
<beach> jeosol: Are you excluding the women here, or are you using "guys" to refer to women as well?
Necktwi has joined #lisp
stacksmith has quit [Ping timeout: 276 seconds]
<jeosol> pardon. I used it loosely to refer to both gender, I guess, just "good morning" is correct
<chris4197> Isn't "guys" basically gender neutral on the internet?
<jeosol> that's what I thought, at least in my local area
<beach> It might be.
<beach> I was just checking.
Oladon has quit [Quit: Leaving.]
<jeosol> been a while since i was here, but noticed webchat.freenode.net has a much nicer interface now
<chris4197> Eh, I like the older one more.
<chris4197> More simple.
<chris4197> And more information dense.
<jeosol> haha, yeah, it was simpler, and dense, very true
kajo has quit [Ping timeout: 250 seconds]
<chris4197> On discord, for example, I absolutely LOATHE the "cozy" UI.
<chris4197> Give me as many lines of text as possible.
<jeosol> is anyone working on/ or using lisp with symbolic AI?
<beach> Yes, someone mentioned that yesterday.
<jeosol> oh, really, I missed out
<beach> jeosol: ... and that person wanted to collaborate with others.
<jeosol> I was trying to get a case-based reasoning book with lisp on Amazon, recalling seeing one with lisp code
kajo has joined #lisp
<beach> Let me find it for you...
<jeosol> thanks, Beach, much appreciated
CloseToZero has quit [Remote host closed the connection]
<beach> This one: <aindilis> any Lispers here interested in AI?
<beach>
Necktwi has quit [Quit: leaving]
CloseToZero has joined #lisp
<jeosol> that's great. It's the general area. I am looking at implementing some standard problems from some articles with Gabor's/ or any neural network code and compile the examples. Some of the code examples are in python and wanted to have a compilation of these examples
<jeosol> aindilis: what areas of AI are you working on? Are you currently using any specific libraries?
<no-defun-allowed> jeosol: them and dmiles are doing some stuff with Cyc from memory
<beach> jeosol: If you go to Tymoon, you can search for aindilis and get the contents of the conversation.
<jeosol> thank you guys
jprajzne_ has joined #lisp
<jeosol> looked up Cyc, very interesting and it's written in lisp
CloseToZero has quit [Remote host closed the connection]
CloseToZero has joined #lisp
<no-defun-allowed> I think what dmiles has is written in Java though, but the database is in s-expression format.
<jeosol> ok. not very Java saavy, tried picking it up for some stuff a while ago, and lost my mind -- very verbose then
<jeosol> I am planning to get some books on AI books with some CL focus. I am interested in cognitive systems and explainable AI
frgo has quit [Ping timeout: 245 seconds]
JohnMS_WORK has joined #lisp
CloseToZero has quit [Remote host closed the connection]
hiroaki has quit [Ping timeout: 245 seconds]
CloseToZero has joined #lisp
CloseToZero has quit [Ping timeout: 276 seconds]
andrei-n has joined #lisp
CloseToZero has joined #lisp
ltriant has quit [Quit: leaving]
CloseToZero has quit [Remote host closed the connection]
scymtym has joined #lisp
CloseToZero has joined #lisp
CloseToZero has quit [Remote host closed the connection]
ggole has joined #lisp
frgo has joined #lisp
<LdBeth> I’d like to hear someone’s doing theorem proving tools in lisp here
orivej has joined #lisp
<ck_> LdBeth: I have some experience with RRL. I don't want a repeat.
<LdBeth> ck_: I’m more interested in the interaction interface rather than the logic framework beneath
<LdBeth> Hope that’s better than AUTOMATH : D
Necktwi has joined #lisp
rsawrecht has joined #lisp
Necktwi has quit [Ping timeout: 248 seconds]
CloseToZero has joined #lisp
orivej has quit [Ping timeout: 248 seconds]
scymtym has quit [Ping timeout: 252 seconds]
CloseToZero has quit [Ping timeout: 276 seconds]
ym555 has quit [Quit: leaving...]
hhdave has joined #lisp
CloseToZero has joined #lisp
igemnace has quit [Read error: Connection reset by peer]
igemnace has joined #lisp
manualcrank has quit [Quit: WeeChat 1.9.1]
random-nick has joined #lisp
mindthelion has quit [Ping timeout: 268 seconds]
Gaius_ has joined #lisp
CloseToZero has quit [Ping timeout: 252 seconds]
techquila has joined #lisp
Soltex has joined #lisp
CloseToZero has joined #lisp
CloseToZero has quit [Remote host closed the connection]
amerlyq has joined #lisp
CloseToZero has joined #lisp
scymtym has joined #lisp
Soltex has quit [Quit: Leaving for some reason]
scymtym has quit [Ping timeout: 252 seconds]
CloseToZero has quit [Ping timeout: 252 seconds]
CloseToZero has joined #lisp
frgo has quit [Remote host closed the connection]
frgo has joined #lisp
orivej has joined #lisp
frgo has quit [Read error: Connection reset by peer]
frgo_ has joined #lisp
frgo_ has quit [Remote host closed the connection]
FreeBirdLjj has joined #lisp
mindthelion has joined #lisp
FreeBirdLjj has quit [Ping timeout: 258 seconds]
techquila has quit [Ping timeout: 276 seconds]
khisanth_ has quit [Ping timeout: 246 seconds]
actuallybatman has joined #lisp
frgo has joined #lisp
frgo has quit [Remote host closed the connection]
frgo has joined #lisp
m00natic has joined #lisp
orivej has quit [Ping timeout: 245 seconds]
CloseToZero has quit [Read error: Connection reset by peer]
khisanth_ has joined #lisp
orivej has joined #lisp
moei has joined #lisp
gxt has quit [Remote host closed the connection]
gxt has joined #lisp
scymtym has joined #lisp
jeosol has quit [Ping timeout: 260 seconds]
igemnace has quit [Read error: Connection reset by peer]
igemnace has joined #lisp
kajo has quit [Quit: From my rotting body, flowers shall grow and I am in them and that is eternity. -- E. M.]
kajo has joined #lisp
actuallybatman has quit [Ping timeout: 244 seconds]
<chris4197> Netsplit!
<chris4197> Woo!
<chris4197> nvm
<chris4197> I am just a fucking idiot.
rumbler31 has quit [Remote host closed the connection]
jmercouris has joined #lisp
alexanderbarbosa has quit [Ping timeout: 252 seconds]
szmer has joined #lisp
schweers has quit [Remote host closed the connection]
giova has joined #lisp
giova has quit [Remote host closed the connection]
jmercouris has quit [Ping timeout: 244 seconds]
pankajgodbole has joined #lisp
jmercouris has joined #lisp
dddddd has joined #lisp
<chris4197> Welp, once again I failed to write the proper exit condition for recursion.
seok has quit [Remote host closed the connection]
rutyiraw has joined #lisp
slyrus__ has joined #lisp
gravicappa has joined #lisp
bexx has left #lisp ["WeeChat 2.5"]
slyrus_ has quit [Ping timeout: 268 seconds]
thawes has quit [Ping timeout: 248 seconds]
<random-nick> is there a read-byte equivalent of read-char-no-hang?
rumbler31 has joined #lisp
<lieven> not in the standard
<jackdaniel> random-nick: you may combine listen with read-byte
<jackdaniel> (when (listen stream) (read-byte stream))
random-jellyfish has joined #lisp
<random-jellyfish> I want to store the output of format to a string variable, how do I do that?
<random-jellyfish> like (format my-var "hello world")
<random-jellyfish> then (print my-var) should print "hello world"
<ck_> random-jellyfish: (let ((my-var (format nil "format nil"))) ...)
<random-jellyfish> yes
<ck_> random-jellyfish: or if you want to compose it with multiple operations, take a look at with-output-to-string
<random-jellyfish> I also found with-output-to-string
<random-jellyfish> yes I just found that, thanks!
<ck_> All right. Thank you for participating on Internet Relay Chat.
xkapastel has joined #lisp
<_death> you can actually format to a string (with a fill pointer) as well..
jmercouris has quit [Ping timeout: 272 seconds]
<random-jellyfish> how do I do that?
<_death> (let ((string (make-array 0 :adjustable t :fill-pointer t :element-type 'character))) (dotimes (i 5) (format string "~R~%" (1+ i))) string)
<_death> this could be useful if you use the partial outputs (as get-output-stream-string clears the stream)
<ebzzry> I just noticed that the last release of CCL was last 2017. Is it intentional?
<no-defun-allowed> Well, the last release of the CL standard was in 1994, so anything new is going to be bug fixes or optimisations.
<no-defun-allowed> But I think 1.12 is nearing completion.
<lieven> or implementation specific extensions :)
jmercouris has joined #lisp
<jackdaniel> or fixing the calling conventions for more than 63 arguments passed to the function ,)
random-jellyfish has quit [Remote host closed the connection]
<no-defun-allowed> jackdaniel: call-argument-limit only has to be greater than 50, so you don't have much work to do (;
<_death> also porting to new platforms
<ebzzry> CCL has advice. :-)
<ebzzry> Does SBCL have defadvice, too?
<jackdaniel> no-defun-allowed: it would be sad if I had lowered 65k call argument limit to 50 because of a bug
Bike has joined #lisp
chris4197 has quit [Remote host closed the connection]
chris4197 has joined #lisp
lucasb has joined #lisp
pfdietz has joined #lisp
krid has joined #lisp
m00natic has quit [Remote host closed the connection]
warweasle has joined #lisp
orivej has quit [Ping timeout: 245 seconds]
jmercouris has quit [Ping timeout: 246 seconds]
t58 has joined #lisp
kajo has quit [Ping timeout: 250 seconds]
<p_l> SBCL doesn't have defadvice, afaik
<scymtym> SBCL has SB-INT:ENCAPSULATE which is like a rudimentary advice facility, but it is internal
flamebeard has joined #lisp
JohnMS_WORK has quit [Quit: KVIrc 4.2.0 Equilibrium http://www.kvirc.net/]
kajo has joined #lisp
<LdBeth> what's the idiom to use to get the directory of the loading file?
Lord_of_Life has quit [Ping timeout: 246 seconds]
<jdz> (directory *load-pathname*)? (directory-namestring *load-pathname*)?
Lord_of_Life has joined #lisp
<LdBeth> so on CCL if I type (load "boo") then *load-pathname* is just "boo"
<jdz> Well, you can do (merge-pathnames *load-pathname*)
<jackdaniel> ow about *load-truename* ?
<jackdaniel> how*
<LdBeth> oh, yeah (merge-pathnames *load-pathname*)
<LdBeth> then I start to think if I should setup a logical pathname translation
<dlowe> if you're loading an asdf system, then you can query asdf for the system's location
<dlowe> which may be more useful
<jackdaniel> logical pathnames would be cool if they were better specified
<dlowe> If they were better specified, I imagine they would have been less portable between OSes
<jackdaniel> well, as they are now they are useless from the lisp implementation perspective
<jackdaniel> because you can't write a portable common lisp code using them
<jackdaniel> if anyone things about grand new CDR they should write a precise pathnames and logical pathanmes along with an elaborate test suite for this addendum
<jackdaniel> thinks*
<LdBeth> it saves lots of naive concatenation
seok has joined #lisp
cosimone has joined #lisp
danielboston26 has joined #lisp
chris4197 has quit [Remote host closed the connection]
bmansurov has joined #lisp
nanoz has joined #lisp
scymtym has quit [Ping timeout: 252 seconds]
Inline has joined #lisp
<bmansurov> beach: thanks. I had to leave earlier, but I appreciated your advice.
<beach> Oh, good!
notzmv has quit [Ping timeout: 245 seconds]
slyrus_ has joined #lisp
smazga has joined #lisp
manualcrank has joined #lisp
slyrus__ has quit [Ping timeout: 272 seconds]
pfdietz has quit [Remote host closed the connection]
Oladon_work has joined #lisp
<mfiano> Any HTTP experts here? I've been trying to solve a problem in my use of drakma for 2 days. I would like to POST an HTTP array with a content type of application/x-www-form-urlencoded, in the same way the curl argument -d works. This command: "curl https://... -d -d items[0][plan]=plan_FPjya2CCLvYKVB" does the correct thing, but drakma expects an association list for content to post, and sending that in any
<mfiano> variation results in the server receiving it wrapped in a string and the server returns that it is not an array.
bmansurov has left #lisp ["Later"]
<jackdaniel> mfiano: afair drakma has keyword arguments like external-format and force-binary, maybe this will help?
sjl_ has joined #lisp
<mfiano> jackdaniel: Hmm, I could try that, but I have to POST other arguments with it that *should* be strings
<mfiano> Also not quite sure what to specify for those to get the behavior of the above curl argument
<mfiano> I am passing the Content-Type header of application/x-www-form-urlencoded
Bike has quit [Remote host closed the connection]
mindCrime has joined #lisp
Bike has joined #lisp
nanoz has quit [Ping timeout: 246 seconds]
flamebeard has quit []
<Xach> mfiano: hi
<mfiano> Xach: hello
<Xach> mfiano: there is no such thing as an http array! what you are sending via curl is a parameter named "items[0][plan]".
<Xach> if you send an alist with that as a key, it will work.
<mfiano> Xach: Indeed. This is how the API service receives the items: https://files.michaelfiano.com/images/screenshots/img-20190711105208.png
<Xach> Is the server expecting JSON or "classic" form data?
<Xach> From the curl it seems the latter.
<mfiano> It's actually expecting data as i posted by a form. The content type cannot be application/json
<mfiano> as if*
<Xach> mfiano: do you have an array on the lisp side?
<Xach> (or list)
<mfiano> Neither
<mfiano> I am trying to construct the proper string to send in the alist manually
chris4197 has joined #lisp
<Xach> mfiano: I think proper string may be (... ("items[0][plan]" . "plan_XXX") ...)
<mfiano> Well that is something I didn't try. I'll play around with that after lunch. Thanks for your help!
<LdBeth> How to manage several lisp programs that communicates via sockets?
<Xach> mfiano: i base this suggestion on my understanding of forms from long ago. many language environments choose to interpret keys as describing structure, but to http, they are just strings
v88m has quit [Ping timeout: 244 seconds]
Arcaelyx has joined #lisp
Inline has quit [Ping timeout: 264 seconds]
v88m has joined #lisp
<mfiano> As far as the value part of the alist, I'm still thinking of a good solution to convert lisp types to strings. like T -> "true", but done so in a way to work with aggregate types recursively
danielboston26 has quit [Read error: Connection reset by peer]
Bike has quit [Remote host closed the connection]
Bike has joined #lisp
krid has quit [Ping timeout: 246 seconds]
rippa has joined #lisp
varjag has joined #lisp
Inline has joined #lisp
krid has joined #lisp
cosimone has quit [Quit: WeeChat 2.4]
pygmypuppy has joined #lisp
pfdietz has joined #lisp
<Oladon_work> LdBeth: In what respect?
shka_ has joined #lisp
frgo_ has joined #lisp
femi has quit [Ping timeout: 248 seconds]
frgo has quit [Ping timeout: 272 seconds]
frgo_ has quit [Ping timeout: 248 seconds]
chipolux has quit [Quit: chipolux]
chipolux has joined #lisp
<Xach> Hmm, if you're creating a list of command-line arguments to call a shell command, and some of them might be optional key/value pairs (e.g. --worker-count 42) and some of them might be flags (e.g. --no-scrubs), and you have to inspect some stuff to decide what to include - would you use `(... ,@(unless scrubsp ,@(list "--no-scrubs")) ...) or something else?
<Xach> (mapcan #'identity (list (list "--worker-count" worker-count) (unless scrubsp (list "--no-scrubs")) ...))))?
frgo has joined #lisp
<Xach> I feel like I had an idiom for this that I liked, but forgot it.
frgo_ has joined #lisp
FreeBirdLjj has joined #lisp
frgo has quit [Ping timeout: 245 seconds]
frgo_ has quit [Ping timeout: 268 seconds]
pjb has quit [Remote host closed the connection]
pjb has joined #lisp
danielboston26 has joined #lisp
FreeBirdLjj has quit [Remote host closed the connection]
FreeBirdLjj has joined #lisp
<sjl_> Xach: (append `("--worker-count" ,worker-count) (unless scrubs? '("--no-scrubs"))) maybe?
hhdave has quit [Quit: hhdave]
FreeBirdLjj has quit [Ping timeout: 244 seconds]
<pfdietz> ,@(when <pred> (list <value>)) is the idiom I use for optional inclusion of something in a list I'm constructing.
<Xach> Ok.
orivej has joined #lisp
Lycurgus has joined #lisp
frgo has joined #lisp
<_death> Xach: not long ago I started on some project calling programs like that.. an example of what I came up with at the time: https://gist.github.com/death/9b2ee7cc0196bdf45427cca425631516
<Oladon_work> Question for you all — how many of you are open to (and/or have engaged in) CL contracting, and if so what's your typical rate?
<Xach> _death: i like it
karayan has quit [Ping timeout: 252 seconds]
<Xach> _death: so that removes NILs and flattens lists into a flat list of strings?
karayan has joined #lisp
<shka_> yo
<shka_> synonym for word rest?
<shka_> because cl:rest exists
<Xach> shka_: remaining
<Xach> shka_: sleep
<shka_> remainder?
<shka_> pretty long but ok
<shka_> thanks
FreeBirdLjj has joined #lisp
<shka_> Xach: i have something that is almost cl list in concept, but must be terminated properly
<_death> Xach: yes.. also prin1-to-string numbers.. it's recently developed, so can likely be further improved
<aeth> Oladon_work: That question might be better for a forum because the few who contract might not see it on IRC
<Xach> _death: thanks!
<dlowe> Oladon_work: you definitely might want to check https://reddit.com/r/lisp
<dlowe> heh. definitely might.
Jesin has quit [Quit: Leaving]
FreeBirdLjj has quit [Ping timeout: 245 seconds]
Jesin has joined #lisp
actuallybatman has joined #lisp
Arcaelyx has quit [Read error: Connection reset by peer]
varjag has quit [Remote host closed the connection]
varjag has joined #lisp
Arcaelyx has joined #lisp
Arcaelyx has quit [Read error: Connection reset by peer]
Arcaelyx has joined #lisp
Arcaelyx has quit [Read error: Connection reset by peer]
Arcaelyx has joined #lisp
<Oladon_work> aeth: Yeah, just getting a feel for now — and I know you guys a bit better than any of the fora
Arcaelyx has quit [Read error: Connection reset by peer]
<Oladon_work> dlowe: eww...
varjag has quit [Ping timeout: 245 seconds]
pankajgodbole has quit [Ping timeout: 272 seconds]
asdf_asdf_asdf has joined #lisp
<asdf_asdf_asdf> Hi. How on the Spoj.com my answer is incorrect, because Non-Zero Exit Code (NZEC)?
<asdf_asdf_asdf> [SBCL] [Common Lisp]
<pjb> (sb-ext:quit :status 0) or something like that?
<Xach> asdf_asdf_asdf: what does the code look like?
Arcaelyx has joined #lisp
Arcaelyx has quit [Read error: Connection reset by peer]
<dlowe> Oladon_work: most people here are also there :p
ggole has quit [Quit: Leaving]
<asdf_asdf_asdf> @pjb, #+sbcl(sb-ext:quit :unix-status 0). I setted it, but still NZEC.
<asdf_asdf_asdf> (setf explode1 (explode-3 (nth 0 (multiple-value-bind (a b) (read-line *standard-input*) (list a b)))))
<asdf_asdf_asdf> Line above correct or not?
<Bike> well, is explode-3 defined, and explode1 defined?
<asdf_asdf_asdf> Yes.
<Bike> what does explode-3 do?
<Bike> explode, perhaps?
<asdf_asdf_asdf> https://cpy.pt/54fSG7ET
<Xach> I beg you to use #\Space instead of #\
Arcaelyx has joined #lisp
<asdf_asdf_asdf> Xach, thanks - I changed it.
<pjb> asdf_asdf_asdf: perhaps it crashes before that exit? Try to issue a message just before it?
<pjb> asdf_asdf_asdf: it's equivalent to (setf explode1 (explode-3 (read-line *standard-input*))) so…
<asdf_asdf_asdf> @pjb, script not crashes. Return Non-Zero Exit Code, compiling without errors/warnings.
<pjb> asdf_asdf_asdf: it seems that explode1 is not defined, so it's no conforming code.
<Bike> parse-integer could signal an error
karayan has quit [Ping timeout: 244 seconds]
<asdf_asdf_asdf> Why?
<asdf_asdf_asdf> https://cpy.pt/q7pC9JaD
<asdf_asdf_asdf> Not signal error for me.
karayan has joined #lisp
<asdf_asdf_asdf> Not warning/error, why? Retrun NZEC, but none error/warning.
<Bike> i mean, depends on the string being entered.
<Bike> (parse-integer "foo") => error
<pjb> asdf_asdf_asdf: input?
<pjb> xu-2 is not defined, so this will signal an undefined function error.
<asdf_asdf_asdf> (h23 (read)) ; Input: 1 #\Newline 2 3
<asdf_asdf_asdf> pjb, I have defined xu-2.
<pjb> perhaps xu-2 signals an error?
<asdf_asdf_asdf> Not.
<Bike> is there like, a reason you keep not showing us the whole program
<Bike> we're not going to be able to understand anything if we don't even know what's happening, you know?
mindCrime has quit [Quit: Leaving]
<asdf_asdf_asdf> Bike, it is not valid, because all program compiled without errors/warnings, but in [u]the spoj.com[/u] return non-zero exit code.
Gaius_ is now known as gaius_
amerlyq has quit [Quit: amerlyq]
<pjb> asdf_asdf_asdf: works for me: https://pastebin.com/i4gjTM2e
<pjb> asdf_asdf_asdf: try my definition of xu-2 and see how it works for you.
<Bike> asdf_asdf_asdf: have you done this on your local machine?
Lycurgus has quit [Quit: Exeunt]
<Bike> asdf_asdf_asdf: it would be very unusual for sbcl to _run_ without printing errors or warnings and then exit as such. it seems more likely that whatever website that is is suppressing output.
<asdf_asdf_asdf> Is agressive compilation, that display all warnings and errros/
<asdf_asdf_asdf> ?
<Bike> runtime. RUNNING the program will print an error.
<Bike> you just need to do it in an environment that isn't some website.
<asdf_asdf_asdf> @Bike, yes. I test it on the local machine. On spoj.com I send solution, but wrong.
<Bike> what does it do on the local machine?
<asdf_asdf_asdf> Because non-zero exit code.
<Bike> does it have a nonzero exit code on your computer?
<asdf_asdf_asdf> On the local machine return nothing zero errors/warnings.
<Bike> okay. so the website sucks.
<Bike> it's suppressing output so you can't even tell what the problem is.
<Bike> or something.
<asdf_asdf_asdf> I compiled it on Windows under console CLI and GUI Emacs.
<asdf_asdf_asdf> Zero warnings/errors.
<asdf_asdf_asdf> Bike, I know probably, why not works. In spoj.com compiler is another version than I am in local machine. Thanks.
<asdf_asdf_asdf> Who check my code? I send whole.
<pjb> asdf_asdf_asdf: perhaps there's an error. Handle it and exit with status 0.
<asdf_asdf_asdf> pjb, but how compile it aggressive optimization? Which option in SBCL? I have zero errors/warnings.
<Bike> sbcl already signals all the compiler warnings it can. i don't think there's any way to make it stricter than it already is.
<Bike> the problem is probably something stupid like the website not giving sbcl enough memoryl
<Bike> rather than any actual issue with your program.
<pjb> Something like: https://pastebin.com/TYTQjP2j
krid has quit [Ping timeout: 248 seconds]
actuallybatman has left #lisp ["ERC (IRC client for Emacs 26.2)"]
rutyiraw has quit [Read error: Connection reset by peer]
random-nick has quit [Ping timeout: 246 seconds]
martylake has joined #lisp
NickBusey has joined #lisp
pygmypuppy has quit [Quit: Textual IRC Client: www.textualapp.com]
<asdf_asdf_asdf> Bike, pjb - https://cpy.pt/G4TY6fJt
rsawrecht has quit [Read error: Connection reset by peer]
warweasle has quit [Quit: going home...]
mindCrime has joined #lisp
gareppa has joined #lisp
sjl_ has quit [Quit: WeeChat 2.3-dev]
FennecCode has joined #lisp
<manualcrank> your program prolly returns a nonzero exit code because it encountered an exception
sjl_ has joined #lisp
sjl_ has quit [Client Quit]
sjl_ has joined #lisp
sjl_ has quit [Client Quit]
sjl_ has joined #lisp
<manualcrank> unless you run it on the same test data as spoj (not possible; this data is not available), you can't say it works correctly at home
sjl_ has quit [Client Quit]
sjl_ has joined #lisp
<manualcrank> what's the URL of the problem @ spoj?
lnostdal has quit [Quit: "Fascism, Nazism, Communism and Socialism are only superficial variations of the same monstrous theme—collectivism." -- Ayn Rand]
<Xach> cl+ssl's preference for the macports ssl dylib is causing problems today.
random-nick has joined #lisp
cosimone has joined #lisp
gravicappa has quit [Ping timeout: 244 seconds]
martylake has quit [Quit: Quit]
martylake has joined #lisp
Ricchi has joined #lisp
cosimone has quit [Quit: WeeChat 2.4]
buffergn0me has joined #lisp
<manualcrank> can't read polish. Also, it's a hidden problem. A hidden problem is a waste of time. It means an admin decided "it has incorrect language version or invalid test data, or description of the problem is not clear."
martylake has quit [Remote host closed the connection]
martylake has joined #lisp
martylake has quit [Read error: Connection reset by peer]
t58_ has joined #lisp
t58 has quit [Ping timeout: 258 seconds]
Lycurgus has joined #lisp
t58_ is now known as t58
gareppa has quit [Quit: Leaving]
mindthelion has quit [Remote host closed the connection]
mindthelion has joined #lisp
mindthelion has quit [Remote host closed the connection]
mindthelion has joined #lisp
mindthelion has quit [Remote host closed the connection]
mindthelion has joined #lisp
mindthelion has quit [Remote host closed the connection]
techquila has joined #lisp
xkapastel has quit [Quit: Connection closed for inactivity]
aeth has quit [Ping timeout: 258 seconds]
rsawrecht has joined #lisp
aeth has joined #lisp
Oladon_work has quit [Remote host closed the connection]
krid has joined #lisp
FennecCode has quit [Quit: ERC (IRC client for Emacs 26.2)]
FennecCode has joined #lisp
seok has quit [Remote host closed the connection]
mindCrime has quit [Ping timeout: 244 seconds]
Inline has quit [Quit: Leaving]
notzmv has joined #lisp
vlatkoB has quit [Remote host closed the connection]
Bike has quit [Remote host closed the connection]
shka_ has quit [Ping timeout: 268 seconds]
rsawrecht has left #lisp ["Using Circe, the loveliest of all IRC clients"]
akoana has joined #lisp
asdf_asdf_asdf has quit [Remote host closed the connection]
asdf_asdf_asdf has joined #lisp
Lycurgus has quit [Quit: Exeunt]
rsawrecht has joined #lisp
teej has joined #lisp
andrei-n has quit [Remote host closed the connection]
rippa has quit [Quit: {#`%${%&`+'${`%&NO CARRIER]
xkapastel has joined #lisp
moei has quit [Quit: Leaving...]
Bike has joined #lisp
zhlyg has quit [Ping timeout: 272 seconds]
rsawrecht has left #lisp ["[exit]"]
rsawrecht has joined #lisp
random-nick has quit [Ping timeout: 244 seconds]
rsawrecht has left #lisp ["exit"]
rsawrecht has joined #lisp
chris4197 has quit [Remote host closed the connection]
lucasb has quit [Quit: Connection closed for inactivity]
asdf_asdf_asdf has quit [Remote host closed the connection]
t58 has quit [Read error: Connection reset by peer]
akoana has quit [Ping timeout: 258 seconds]
techquila has quit [Remote host closed the connection]
pfdietz has quit [Remote host closed the connection]
Tristam has quit [Ping timeout: 246 seconds]
Tristam has joined #lisp
techquila has joined #lisp
techquila has quit [Max SendQ exceeded]
techquila has joined #lisp
techquila has quit [Max SendQ exceeded]
techquila has joined #lisp
techquila has quit [Remote host closed the connection]
techquila has joined #lisp
techquila has quit [Remote host closed the connection]
libertyprime has joined #lisp
dddddd has quit [Ping timeout: 246 seconds]
gaius_ is now known as gaius