Skip to content

Instantly share code, notes, and snippets.

View gabriel-laddel's full-sized avatar

Gabriel Laddel gabriel-laddel

View GitHub Profile
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; masamune customization
(in-package #:mm)
(sb-ext:restrict-compiler-policy 'debug 3)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; interface to the SynPS/2 Synaptics TouchPad
(defun touchpad-id ()
(defun touchpad-id ()
"XXX asssumes a single touchpad"
(->> "xinput --list"
(shell-command-to-string)
(downcase)
(s-split "\n")
(some (lambda (s) (when (s-contains? "touchpad" s) s)))
(s-split "id=")
(cadr)
(s-split " ")
Creating filelist for quicklisp
Categorizing files.
Finding a working MD5 command....
Found a working MD5 command.
Computing results.
SLOC Directory SLOC-by-Language (Sorted)
4678 quicklisp lisp=4678
Creating filelist for asdf
Categorizing files.
Finding a working MD5 command....
Found a working MD5 command.
Computing results.
SLOC Directory SLOC-by-Language (Sorted)
8077 asdf lisp=8057,sh=20
SLOC Directory SLOC-by-Language (Sorted)
70145 automake-1.14 sh=57736,perl=11756,pascal=644,ansic=9
43219 libtool-2.4.2 sh=37653,ansic=5240,pascal=131,cpp=121,f90=37,fortran=37
30900 make-4.0 ansic=26371,sh=3352,perl=1135,lisp=26,sed=16
6904 autoconf-2.61a.265-feef9 sh=3527,perl=3273,lisp=104
Totals grouped by language (dominant language first):
sh: 102268 (67.65%)
ansic: 31620 (20.92%)
Error compiling vertex-shader:
0:5(1): error: syntax error, unexpected NEW_IDENTIFIER
#version 130
layout(location = 0) in vec3 fk_vert_position;
layout(location = 1) in vec4 fk_vert_color;
Error compiling vertex-shader:
0:1(10): error: GLSL 3.30 is not supported. Supported versions are: 1.10, 1.20, 1.30, 1.00 ES, and 3.00 ES
#version 330
layout(location = 0) in vec4 position;
uniform vec4 offset;
SDL Error (#<SDL-GLCONTEXT {#X00000000}>): Could not create GL context
[Condition of type SDL2::SDL-RC-ERROR]
Restarts:
0: [RETRY] Retry SLIME REPL evaluation request.
1: [*ABORT] Return to SLIME's top level.
2: [ABORT] Abort thread (#<THREAD "repl-thread" RUNNING {1005C83313}>)
Backtrace:
0: (SDL2:GL-CREATE-CONTEXT #<SDL2-FFI:SDL-WINDOW {#X7FFFEC0592B0}>)
;; To use library Synonyms, you will need the Moby Thesaurus II file,
;; `mthesaur.txt', available here:
;; ftp://ibiblio.org/pub/docs/books/gutenberg/etext02/mthes10.zip
;; Put this in your initialization file (~/.emacs):
;; ;; The file names are absolute, not relative, locations
;; ;; - e.g. /foobar/mthesaur.txt.cache, not mthesaur.txt.cache
;; (setq synonyms-file <name & location of mthesaur.txt>)
;; (setq synonyms-cache-file <name & location of your cache file>)
;; (require 'synonyms)
@gabriel-laddel
gabriel-laddel / gist:e05be6497ead58605d83
Created May 19, 2014 19:01
Old emacs clojure configuration
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; clojure + clojurescript
;; (remove-hook 'clojure-mode-hook (lambda () (if (= "styles.clj" (buffer-name)) (rainbow-mode))))
;; (remove-hook 'clojure-mode-hook (lambda () (clojure-project-mode t)))
(add-to-list 'auto-mode-alist '("\.cljd$" . clojure-mode))
(add-to-list 'auto-mode-alist '("\.clj$" . clojure-mode))
(add-to-list 'auto-mode-alist '("\.dtm$" . jure-mode))