Description:
Discussion about LISP.
|
|
|
Using the NST testing framework from a REPL other than Allegro's?
|
| |
Hello everyone,
I've written some unit tests by using NST. Now, I can't find a way to run them
from the REPL. It seems to me that the NST manuals only documents how to run
tests from Allegro's REPL and ASDF.
(ql:quickload :nst)
(nst:def-test-group my-test-group ()
(nst:def-test my-test (:equal "my string") "my string"))... more »
|
|
|
a debugging macro on setf to detect race conditions
|
| |
I am trying to write a macro setf* that works like setf but will call a function to check if the necessary locks are acquired if the value to set has a certain form, namely (setf* (<accessor> <object>) <value>) and the accessor has a certain attribute. If this work, I can use the function (check-locking <sym>) when setting the accessor of a slot of a class and automatically make the program check for race conditions. Unfortunately, I can't get it to work.... more »
|
|
|
Racket v5.3.5
|
| |
Racket version 5.3.5 is now available from
[link]
This is a special-purpose release to match the arrival of "Realm of
Racket" in bookstores. Racket v.5.3.5 adds a single `realm'
collection to the v5.3.4 release. The new collection contains the
source code that readers of Realm may wish to use for experiments.... more »
|
|
|
CLISP/Clozure signal error where SBCL runs fine
|
| |
I have stumbled upon a peculiar difference of SBCL behavior compared
with Clozure and CLISP. The following code runs fine in SBCL but throws
an error in Clozure and CLISP.
(defgeneric render (obj &rest args))
(defmethod render ((obj t) &key)
(print obj))
(defmethod render ((obj list) &rest args)... more »
|
|
|
Solving Shift/Reduce conflict
|
| |
I'm trying to solve a shift/reduce conflict (an occurrence of the "dangling else" situation, I believe) in a toy parser made with cl-yacc.
From some googling, I tried to add
(:precedence ((:left :elseif)
(:left :else) ))... more »
|
|
|
Problems in redirecting output to /bin/more
|
| |
I want to use pager /bin/more (or /usr/bin/less) internally in my
program so that certain output text is automatically written to the
pager program. Can't make it work, though. I thought the following code
should work but it doesn't:
;;; test.lisp (using SBCL)
(let ((out (sb-ext:process-input... more »
|
|
|
adding slots to locks?
|
| |
I am trying to add a new slot to the lock class. This is useful because I have a lot of locks in a hierarchy and if I store that parent lock for every lock it becomes easier to detect problems while debugging.
Unfortunately, this apparently can't be done with the ensure-class function. I can add slots to 'process, but not to 'lock, because it is listed as a built-in-class.... more »
|
|
|
Error while installing aserve(AllegroServe)
|
| |
Hi everyone, I am new to lisp (and to programming in general) and am learning lisp with the book Practical Common Lisp. Accordng to chapter 26 I need to build a web application with the web server AllegroServe.
So I downloaded the software from GitHub and try (load "directory-name/load.cl") in my REPL. An error occured:... more »
|
|
|
Moving between headers in message-mode
|
| |
Hello all. I wrote this tonight. The purpose is defined in the
docstring. It is supposed to be used in message-mode. I haven't
done much testing but it seems to work. If you have any
suggestions how to make it better, please tell me. Cheers.
;; separator
(setq mail-header-separator "---")
(set-face-attribute 'message-separator nil :foreground "black")... more »
|
|
|
