gabriel-laddel

;; http://cincyisit.com/events-and-learning
;; https://www.cintrifuse.com/cintrifuse-role-for-greater-cincinnati/
(defvar metaprogamming-systems
  '(:anaphora :cl-ppcre :optima :fare-quasiquote :named-readtables :fare-utils
    :fare-utils :optima.ppcre :FARE-QUASIQUOTE-OPTIMA :FARE-QUASIQUOTE-readtable
    :sb-introspect))

(defvar graphics-systems
  '(:mcclim :mcclim-bezier :mcclim-bezier-clx :mcclim-clx-fb :clim-widgets
    :climacs :clouseau :clim-listener))

gabriel-laddel

(in-package #:mm)

(sb-ext:restrict-compiler-policy 'debug 3)

(setq mm::*system-information* nil)

;;; interface to the SynPS/2 Synaptics TouchPad
;;; ============================================================================

(defun touchpad-id ()

gabriel-laddel

---------- Forwarded message ----------

From: Mark S. Miller <erights@google.com>
Date: Tue, Nov 16, 2010 at 3:44 PM
Subject: "Future of Javascript" doc from our internal "JavaScript Summit"
last week
To: javascript-standard@google.com

gabriel-laddel

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; masamune customization
;;;
;;; there are two types of customizations that must be taken into account, and
;;; eventually, one. the first, Emacs customizations, the second, for lisp.
;;; the corresponding files emacs-customizations.el and lisp-customizations.lisp
;;; get loaded at the end of the init process. think of it as a replacement
;;; for your .emacs and .sbclrc files.

(in-package #:mm)

gabriel-laddel

http://siliconvalleyredneck.typepad.com/siliconvalleyredneck/2012/02/whatever-became-of-ilkka-kokkarinen.html

what happened to the wingnut musings?

gabriel-laddel

(defun char-utf-8-byte-length (char)
  (let ((code (char-code char)))
    (cond ((< code 128) 1)
	  ((< code 2048) 2)
	  ((< code 65536) 3)
	  (t 4))))

(defmacro as-utf-8-bytes (char writer)
  "Given a character, calls the writer function for every byte in the
encoded form of that character."

gabriel-laddel

(defvar *masamune-pathnames*
  '("~/.conkerorrc"
    "~/.emacs"
    "~/.masamune/emacs-desktop-state/"
    "~/.mozrepl-conkeror.js"
    "~/.sbclrc"
    "~/.swank.lisp"
    "~/Pictures/screenshots/"
    "~/algol/"
    "~/lisp/"

gabriel-laddel

http://bobblum.com/ESSAYS/COMPSCI/EUV.html
http://en.wikipedia.org/wiki/Parser_combinator
http://www.gibiansky.com/

gabriel-laddel

	Modified   init.el
diff --git a/init.el b/init.el
index ee76573..ac5f03f 100755
--- a/init.el
+++ b/init.el
@@ -146,7 +146,7 @@
       slime-protocol-version 'ignore
       ;; TODO 2014-10-22T20:21:26-07:00 Gabriel Laddel
       ;; specific to nixos
-      inferior-lisp-program (car (split-string (subseq (shell-command-to-string "whereis sbcl") 5)  " " t nil))

gabriel-laddel

(defun* save-desktop ()
  (interactive)
  (desktop-save "~/.masamune/emacs-desktop-state/"))

(defun* load-desktop ()
  (interactive)
  (desktop-read "~/.masamune/emacs-desktop-state/"))

(add-hook 'org-mode-hook #'abbrev-mode)
(add-hook 'org-mode-hook #'flyspell-mode)