dleslie

(test-group "records"
            ;; Define a record type with setters for each field
            (define-record test (setter bit) (setter byte) (setter nibble) (setter bytes))
            ;; Define a 'bits' conversion function
            (define test-bits
              (make-bits
               (bit test-bit)         ;  1 bit
               (byte test-byte)       ;  8 bits
               (nibble test-nibble)   ;  4 bits
               (bytes 2 test-bytes))) ; 16 bits

dleslie

#PgUp
"xvkbd -xsendev -text "\[Prior]""
    m:0x8 + c:111
    Alt + Up 

#PgDown
"xvkbd -xsendev -text "\[Next]""
    m:0x8 + c:116
    Alt + Down 

dleslie

What I saw in the Xerox PARC technology was the caveman interface, 
you point and you grunt. A massive winding down, regressing away 
from language, in order to address the technological nervousness 
of the user. Users wanted to be infantilized, to return to a 
pre-linguistic condition in the using of computers, and the Xerox 
PARC technology`s primary advantage was that it allowed users to 
address computers in a pre-linguistic way. This was to my mind a 
terribly socially retrograde thing to do, and I have not changed 
my mind about that.

dleslie

git config --global alias.lg "log --color --graph --pretty=format:'%C(auto)%h%Creset -%C(auto)%d%Creset %s %Cgreen(%cr)%C(bold blue)<%an>%Creset' --abbrev-commit"

dleslie

name of display: :0.0
display: :0  screen: 0
direct rendering: Yes
server glx vendor string: SGI
server glx version string: 1.4
server glx extensions:
    GLX_ARB_create_context, GLX_ARB_create_context_profile, 
    GLX_ARB_fbconfig_float, GLX_ARB_framebuffer_sRGB, GLX_ARB_multisample, 
    GLX_EXT_create_context_es2_profile, GLX_EXT_framebuffer_sRGB, 
    GLX_EXT_import_context, GLX_EXT_texture_from_pixmap, GLX_EXT_visual_info, 

dleslie

(defun override-theme (arg)
  "Disables all enabled themes and then loads the provided theme."
  (interactive
    (list
      (intern (completing-read "Load custom theme: "
                               (mapcar 'symbol-name (custom-available-themes))))))
  (while custom-enabled-themes
    (disable-theme (car custom-enabled-themes)))
  (load-theme arg t))

dleslie

-*- mode: compilation; default-directory: "~/Workspace/code/dleslie/monad-egg/" -*-
Compilation started at Sat May  2 07:58:01

chicken-install -test
retrieving ...
checking platform for `monad' ...
checking dependencies for `monad' ...
mapped (srfi-1 srfi-1) to ()
install order:
("monad")

dleslie

-*- mode: compilation; default-directory: "~/Workspace/code/dleslie/monad-egg/" -*-
Compilation started at Sat May  2 07:59:56

chicken-install -test
retrieving ...
checking platform for `monad' ...
checking dependencies for `monad' ...
mapped (srfi-1 srfi-1) to ()
install order:
("monad")

dleslie

(defun revert-all-buffers ()
  "Reverts all buffers that are visiting a file."
  (interactive)
  (mapcar
   (lambda (buf)
     (with-current-buffer buf
       (when (buffer-file-name)
         (revert-buffer t t t))))
   (buffer-list)))

dleslie

I loved season 19 of South Park. It ended about as well as I could have hoped.

For those wondering: no, the overall theme of this season was /not/ that
fighting for social justice is wrong. On the contrary, it affirmed that seeking
to improve society is a laudable goal. Where it drew a line was where it was
reasonable; the point at which one's belief in their own righteousness has
allowed them to overlook their own faults and poor behaviour.

IMHO, what South Park primarily attempted to convey is that something to be
concerned about is the manner in which media and advertising wields our concerns