LispForum

First of all, I know nothing about Common Lisp or any kind of Lisp. I am just begining to learn. So I downloaded LispIDE in order to have an environment in which I can experiment. I wrote a very simple program: (* 2 (cos 0) (+ 4 6)) which, according to this website, should print out 20.0. Well, I'm...

So far I could replicate any macro by using (eval) in a function. I have to add quotes when I call the function though, but I feel like I've began to understand macros and now I am back at square 1. Could anyone give me an example of a macro where eval won't work? Ultimately a macro is just a funct...

(loop named <name> ...) Unless I forgot more LOOP than I thought I did, this only names the loop block and allows a named RETURN, and does not allow execution of clauses in a different LOOP context. Oh, just read the heading and the first paragraph...you're right, you can't do that "collect in...

That is only one of many reasons I prefer iterate, which provides this exact feature . Unless the code walker somehow gets tangled. (loop named <name> ...) FWIW, you don't need two loops: (defun print-2d-array-as-table (array) (loop for i below (array-total-size array) do (if (zerop (mod i (array-d...

amachina wrote:Thanks. That allows me to move forward. As you said, all of these are equivalent:

Code: Select all

(let ((a 0) b)
 
(let ((a 0)
      (b nil))

(let ((a 0)
      (b))

I like the middle one because it "follows the rules".

They all "follow the rules"...

Hello. I recently installed "Ready Lisp" for mac which is consisted with aquamacs, sbcl, and slime. When I typed open bracket, closing bracket appeared automatically. Does anyone have an idea to get rid of this annoying automatic closing parenthesis completion? M-x local-set-key ENTER ( s...

(defun serialize-hmm-model-to-file (file &rest kwords &key &allow-other-keys) (let ((s (apply #'open (append (list file :direction :output) kwords)))) (serialize-hmm-model s) (close s))) I know you now know you can just use with-open-file, but if you did want to do something like the ab...

yesimthetaxman wrote:turns out that the answer is actually quite simple:

(defun and-nl (a b) (and a b))

since arguments are evaluated before they are passed to the routine body we have an AND that forces the evaluation of both arguments to AND.

Fourth post in this thread

Thank you, but I rather meant something different. I'd like, on the contrary, to help to narrow down the possible selection options. I.e. here's an example: ;; I don't want to eventually set the value in the hash table ;; to something that I potentially won't be able to serialize later ;; so, amf-v...

I've written this: (defun set-alarm (m h d mo y) (loop if (equal (encode-universal-time 0 m h d mo y) (get-universal-time)) return "wake up!")) However, I would like to just have the user input minute and hour. Is there any functions like this: get-current-day, get-current-month, get-curr...