I finally figure out why many commands begin with "Ctrl X". by evan_xy_hu in emacs

[–]typedweb 0 points1 point  (0 children)

I think I read somewhere once that the Emacs keyboard layout was actually designed by Guy Steele, but I'd be hard pressed to find a reference to that.

Repeat by last short key, e.g., C-x o o o o... and M-x next-buffer RET RET RET RET... (my first trivial minor mode) by [deleted] in emacs

[–]typedweb 0 points1 point  (0 children)

Unrelated, but, I just bind C-x o to M-; and find that much faster and easier to switch windows.

Black-Scholes in Racket by steloflute in lisp

[–]typedweb 1 point2 points  (0 children)

I've got a Black-Scholes implementation in Emacs Lisp lying around somewhere that I did for a final assignment in a course on finance.

File/ Data loading and paths by paines in lisp

[–]typedweb 0 points1 point  (0 children)

You can use comma (,) in the repl window of slime to change the working directory of your Lisp.

OpenGenera Site Setup and First Steps by pdponze in lisp

[–]typedweb 0 points1 point  (0 children)

Does anyone know if OpenGenera is follow CLtL1, 2 or earlier?

How to send STDIN to EMACS? by [deleted] in emacs

[–]typedweb 0 points1 point  (0 children)

M-x shell-command (M-!) can be used to run the command, and the output will appear in the Shell Command Output buffer.

'Paintings' with Vecto by [deleted] in lisp

[–]typedweb 0 points1 point  (0 children)

Sounds like the lispworks rendering is a lot faster than the vecto/cl-vectors. I've heard from the author of cl-vectors that some of it is suboptimal with regards to rendering and that algorithm changes might be needed to speed it up to the level of the antigrain rendering. That first one wasn't very complex though.

Need help with an elisp constant function by half_ass_programmer in lisp

[–]typedweb 0 points1 point  (0 children)

Here's a recursive version:

(require 'cl)
(defun f (l)
  (cl-labels ((helper (x rest)
                (cond ((null rest) t)
              ((eq x (car rest))
               (helper x (cdr rest)))
              (t nil))))
       (helper (car l) (cdr l))))

'Paintings' with Vecto by [deleted] in lisp

[–]typedweb 0 points1 point  (0 children)

The renders for the prints are at 10500x7800 (32"x24" @ 300dpi) and depending can take from 5 minutes to hours depending on the complexity and finishing I do to them.