Skip to content

Instantly share code, notes, and snippets.

View AeroNotix's full-sized avatar
💭
🇺🇦

Aaron France AeroNotix

💭
🇺🇦
View GitHub Profile
(ubic@localhost)1> {ok, Data} = file:read_file("/home/xeno/Downloads/eeprom").
{ok,<<0,21,109,191,240,232,2,21,109,191,240,232,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,...>>}
(ubic@localhost)2> ubic_device_eeprom:decode(Data).
{error,invalid_eeprom_signature}
(ubic@localhost)3>
CQLCL> (time (hermetic:hash "test"))
Evaluation took:
0.641 seconds of real time
0.643333 seconds of total run time (0.626667 user, 0.016666 system)
[ Run times consist of 0.087 seconds GC time, and 0.557 seconds non-GC time. ]
100.31% CPU
45 lambdas converted
1,532,595,630 processor cycles
114,129,888 bytes consed
(defpackage :example
(:use :cl)
(:export :use-t :new-t))
(defclass t ()
(field :accessor field :initform :lolz))
(defun use-t (a-t)
(field a-t)) ;; => returns :lolz
WEBKIT_API WebKitSettings *
webkit_settings_new_with_settings (const gchar *first_setting_name,
...);
WEBKIT_API gboolean
webkit_settings_get_enable_javascript (WebKitSettings *settings);
WEBKIT_API void
webkit_settings_set_enable_javascript (WebKitSettings *settings,
gboolean enabled);
LISPKIT> (macroexpand '(WITH-GDK-EVENT-SLOTS (window) (first (all-events))
(print window)))
(LET ((WINDOW (FUNCALL #'|GDK:GDK-EVENT-KEY-WINDOW| (FIRST (ALL-EVENTS)))))
(PRINT WINDOW))
T
LISPKIT> (eval (macroexpand '(WITH-GDK-EVENT-SLOTS (window) (first (all-events))
(print window))))
; in:
; LET ((WINDOW (FUNCALL #'|GDK:GDK-EVENT-KEY-WINDOW| (FIRST (ALL-EVENTS)))))
interactive(
"subreddit",
"Go to a specific subreddit.",
function(I) {
subreddit = (yield I.minibuffer.read($prompt = "Subreddit: "));
find_url_new_buffer("https://reddit.com/r/" + subreddit);
});
define_key(default_global_keymap, "C-x r", "subreddit");
;; -*- mode: common-lisp -*-
;;; The following lines added by ql:add-to-init-file:
#-quicklisp
(let ((quicklisp-init (merge-pathnames ".quicklisp/setup.lisp"
(user-homedir-pathname))))
(when (probe-file quicklisp-init)
(load quicklisp-init)))
(eval-after-load 'erlang-mode
'(progn
(define-key 'erlang-mode-map (kbd "C-x C-a d b") 'erlang--binaries-to-defines)
(define-key 'erlang-mode-map (kbd "C-x C-a c s") 'erlang--cycle-string-like)
(define-key 'erlang-mode-map (kbd "C-x C-a s e") 'erlang--split-exports)))
[ 12.311]
X.Org X Server 1.15.2
Release Date: 2014-06-27
[ 12.312] X Protocol Version 11, Revision 0
[ 12.312] Build Operating System: Linux 3.15.1-1-ARCH x86_64
[ 12.312] Current Operating System: Linux xenocorp 3.10.49-2-lts310 #1 SMP Mon Jul 21 22:52:04 CEST 2014 x86_64
[ 12.312] Kernel command line: BOOT_IMAGE=../vmlinuz-linux-lts310 root=/dev/sda1 rw initrd=../initramfs-linux-lts310.img
[ 12.312] Build Date: 27 June 2014 07:32:26PM
[ 12.312]
[ 12.312] Current version of pixman: 0.32.6
~ xrandr --output LVDS1 --auto --output VGA1 --auto --output HDMI1 --auto --verbose
crtc 0: 1600x900 60.06 +0+0 "LVDS1"
crtc 1: 1920x1080 60.00 +1600+0 "HDMI1"
crtc 2: 1280x1024 75.02 +0+0 "VGA1"
xrandr: Configure crtc 2 failed
crtc 0: disable
crtc 1: disable
crtc 2: disable
crtc 3: disable
screen 0: revert