sbcl

Where does “Your Kitten of Death awaits” come from? [closed]

大憨熊 提交于 2019-12-08 15:48:46
问题 Closed. This question is off-topic. It is not currently accepting answers. Want to improve this question? Update the question so it's on-topic for Stack Overflow. Closed 8 years ago . If you run SBCL (at least on Windows, I use CLISP at home), you get the message, "Your Kitten of Death awaits." I suspect that this has something to do with some form of inside joke (like Super Cow Powers). I've tried Googling and I have found nothing particularly useful (I suppose that it is mentioned elsewhere

Problems installing Common Lisp Sketch into Windows 10

戏子无情 提交于 2019-12-08 08:28:42
问题 I had trouble getting through errors for missing SDL DLL's and an FFI.H file while installing sketch with quicklisp. Posting my solution for this Windows 10 specific trouble, maybe there are other solutions too. I ended up using Chocolatey and Cmder for my mingw64 environment. 回答1: This is what I had to do in order to get through several errors for missing SDL DLL's and FFI.H header. 1. Install Cmder using Chocolatey: https://chocolatey.org/packages/Cmder 2. Download and copy all the SDL, SDL

Matrix-multiplication using BLAS from Common Lisp

拜拜、爱过 提交于 2019-12-08 06:45:51
问题 Let's say I have two matrices (in the form of a Common Lisp array) foo and bar such that: (defvar foo #2A((2 1 6) (7 3 4))) (defvar bar #2A((3 1) (6 5) (2 3))) I would like to perform a matrix multiplication using BLAS without using wrappers such as Matlisp, GSLL, LLA, & co. so that I get an array with the result: #2A((24 25) (47 34)) Which steps should I take to perform such operation? My understanding is that I should call the BLAS matrix multiplication function from the REPL and pass it my

Problems installing Common Lisp Sketch into Windows 10

感情迁移 提交于 2019-12-07 09:15:30
I had trouble getting through errors for missing SDL DLL's and an FFI.H file while installing sketch with quicklisp. Posting my solution for this Windows 10 specific trouble, maybe there are other solutions too. I ended up using Chocolatey and Cmder for my mingw64 environment. This is what I had to do in order to get through several errors for missing SDL DLL's and FFI.H header. 1. Install Cmder using Chocolatey: https://chocolatey.org/packages/Cmder 2. Download and copy all the SDL, SDL_image and SDL_ttf DLL's to SBCL's .exe folder: a. https://www.libsdl.org/download-2.0.php b. https://www

how to turn off the debugger in sbcl

狂风中的少年 提交于 2019-12-06 20:24:43
问题 I'm trying to learn common lisp currently and I've been using sbcl (I hope that's a decent implementation choice.) Coming from ruby and irb I find the automatic moved to a debugger on every mistake a little annoying at this time. Is there a way to turn it off temporarily when I'm playing around. 回答1: Common Lisp has a variable *debugger-hook*, which can be bound/set to a function. * (aref "123" 10) debugger invoked on a SB-INT:INVALID-ARRAY-INDEX-ERROR: Index 10 out of bounds for (SIMPLE

no mouse-wheel event when shift key is down (shift+mouse-wheel events?)

守給你的承諾、 提交于 2019-12-06 04:37:14
问题 I'm trying to manage some events in lisp with lispbuilder-sdl . Thus far I got this. ;; Load package : (ql:quickload "lispbuilder-sdl") ;; main definition: (defun main (argv) (defparameter *ticks* 0) (sdl:with-init () (sdl:window 100 100 :title-caption "test") (sdl:with-events () (setf (sdl:frame-rate) 60) (:quit-event () (progn (sdl:quit-image) (exit) t)) (:mouse-button-down-event (:button button :x x :y y) (format t "~&LSHIFT: ~a RSHIFT: ~a BUTTON: ~a X: ~d Y: ~d" (sdl:get-key-state :sdl

Do property lists in Common Lisp refer to some global state?

三世轮回 提交于 2019-12-06 03:36:09
问题 The code below has z as a local variable, yet it behaves as if it is a global: (defun foo (m) (let ((z '(stuff nil))) (push m (getf z 'stuff)) (print z))) (foo 1) (foo 2) (foo 3) I would expect the output to be (STUFF (1)) (STUFF (2)) (STUFF (3)) T but when running it with SBCL I see (STUFF (1)) (STUFF (2 1)) (STUFF (3 2 1)) T Why is this the case? Is this behaviour peculiar to property lists? 回答1: In foo , z is bound to the literal expression '(stuff nil) . The function destructively alters

CFFI Not Loading Dependent Libraries?

依然范特西╮ 提交于 2019-12-05 19:50:28
I am trying to use the BLAS/LAPACK libraries from SBCL (specifically trying to get the LLA package running). I was having a lot of troubles getting the BLAS shared library to load; eventually I discovered that it wasn't able to load its dependent libraries. Eventually I was able to load BLAS by loaded all of its dependencies manually: (setq cffi::*foreign-library-directories* '("C:/cygwin64/bin/" "C:/cygwin64/lib/lapack/")) (CFFI:LOAD-FOREIGN-LIBRARY "CYGWIN1.DLL") (CFFI:LOAD-FOREIGN-LIBRARY "CYGGCCC_S-SEH-1.DLL") [..etc..] (CFFI:LOAD-FOREIGN-LIBRARY "CYGBLAS-0.dll") As a workaround this isn't

why defun is not the same as (setq <name> <lambda>)?

杀马特。学长 韩版系。学妹 提交于 2019-12-05 12:44:20
问题 I'm confused about how defun macro works, because (defun x () "hello") will create function x, but symbol x still will be unbound. If I'll bind some lambda to x then x will have a value, but it will not be treated by interpreter as function in form like this: (x) I think that it is related to the fact that defun should define function in global environment, but I'm not sure what does it exactly mean. Why can't I shadow it in the current environment? Is there any way to force interpreter treat

This is a bug in sbcl?

故事扮演 提交于 2019-12-05 11:28:32
Why happen this in sbcl? Maybe a bug? (defclass myclass () ((s1 :initform '((a . 1) (b . 2))) (s2 :initform '((a . 1) (b . 2))))) (defparameter ins (make-instance 'myclass)) (setf (cdr (assoc 'a (slot-value ins 's1))) 43) ;; change only slot s1 ;; here my problem (slot-value ins 's1) ;; => ((a . 44) (b . 2))) (slot-value ins 's2) ;; => ((a . 44) (b . 2))) But if change :initform to : (defclass myclass () ((s1 :initform '((a . 1) (b . 2))) (s2 :initform '((a . 1) (b . 3))))) The problem disappears I test this in sbcl 1.4.3 and 1.4.11 . In clisp it seems that the problem does not arise. No. You