ponkore
ponkore
/ freebsd-zfs-memo.txt
Last active
January 3, 2016 18:39
FreeBSD 9.2 RELEASE を zfs boot でいれたときのメモ。installer から shell で入って、順次作業していく。
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| gpart create -s gpt da0 | |
| gpart add -s 64K -t freebsd-boot da0 | |
| gpart add -s 4G -t freebsd-swap -l swap0 da0 | |
| gpart add -t freebsd-zfs -l disk0 da0 | |
| gpart bootcode -b /boot/pmbr -p /boot/gptzfsboot -i 1 da0 | |
| kldload /boot/kernel/opensolaris.ko | |
| kldload /boot/kernel/zfs.ko | |
| gnop create -S 4096 /dev/gpt/disk0 |
ponkore
/ random-docs.clj
Created
January 2, 2014 14:47
clojure.core の関数の doc-string をランダムに表示 (random-docs)
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (defn get-doc-string | |
| [ns sym] | |
| (let [wrt (java.io.StringWriter.)] | |
| (binding [*out* wrt] | |
| (->> (ns-resolve ns sym) | |
| (meta) | |
| (#'clojure.repl/print-doc))) | |
| (.toString wrt))) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| let fact n = | |
| let rec f n acc = if n <= 0 then acc else f (n - 1) (acc * n) | |
| f n 1;; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| # pkg set -o shells/bash-static:shells/bash |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (defproject sandbox "0.1.0-SNAPSHOT" | |
| :description "FIXME: write description" | |
| :url "http://example.com/FIXME" | |
| :license {:name "Eclipse Public License" | |
| :url "http://www.eclipse.org/legal/epl-v10.html"} | |
| :dependencies [[org.clojure/clojure "1.5.1"]] | |
| :resource-paths ["lib/sikuli-api-1.0.2-standalone.jar"]) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| # | |
| # QGIS 1.8 では Shapefile 読み書き時に文字コード変換が変にかかってしまうので、 | |
| # 環境変数 SHAPE_ENCODING を空白にして、QGIS システム内では文字コード変換を | |
| # させずに、ダイアログにて明示的に指定する。 | |
| # | |
| bash$ export SHAPE_ENCODING="" | |
| bash$ open -a qgis | |
| # 自分の自宅環境(OSX Lion) だと上記で動かなかった。MacPorts の python (2.7.3) だとダメで |
ponkore
/ emacs-24.3.txt
Created
March 14, 2013 13:22
Emacs-24.3 に update したらいろいろと `obsolete` ってたwww
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Loading /Users/masao/.emacs.d/functions/convenience.el (source)...done | |
| Loading /Users/masao/.emacs.d/functions/local.el (source)...done | |
| Loading /Users/masao/.emacs.d/config/builtins.el (source)... | |
| Loading /Users/masao/.emacs.d/config/builtins/diff-mode.el (source)...done | |
| Loading /Users/masao/.emacs.d/config/builtins/text-mode.el (source)...done | |
| Loading /Users/masao/.emacs.d/config/builtins/cc-mode.el (source)...done | |
| Loading /Users/masao/.emacs.d/config/builtins/emacs-lisp-mode.el (source)...done | |
| Loading /Users/masao/.emacs.d/config/builtins.el (source)...done | |
| Loading /Users/masao/.emacs.d/config/packages.el (source)... | |
| `flet' is an obsolete macro (as of 24.3); use either `cl-flet' or `cl-letf'. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Scanning dependencies of target sagittarius--ffi | |
| [ 41%] Building C object build/ext/ffi/CMakeFiles/sagittarius--ffi.dir/sagittarius-ffi.c.o | |
| [ 41%] Building C object build/ext/ffi/CMakeFiles/sagittarius--ffi.dir/ffi_stub.c.o | |
| Linking C shared module ../../sagittarius--ffi.so | |
| Undefined symbols for architecture x86_64: | |
| "_ffi_call", referenced from: | |
| _internal_ffi_call in sagittarius-ffi.c.o | |
| "_ffi_prep_cif_machdep", referenced from: | |
| _ffi_prep_cif in liblibffi.a(prep_cif.c.o) | |
| "_ffi_prep_closure_loc", referenced from: |
ponkore
/ private.xml
Created
February 27, 2013 15:00
Mac Book Pro の JIS キーボードを KeyRemap4MacBook 8.0.0 で英字配列にして使うとき、Backquote(`) と Tilde(~) がアサインされなくなってしまうので、￥記号を Backquote(`) に割り当てる(SHIFT+￥で Tilde(~) になる)。 ~/Library/Application Support/KeyRemap4MacBook/private.xml
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| <?xml version="1.0"?> | |
| <root> | |
| <appdef> | |
| <appname>Modify Yen Mark Key</appname> | |
| <equal>com.github.ponkore</equal> | |
| </appdef> | |
| <item> | |
| <name>Modify Yen Mark Key</name> | |
| <item> |
ponkore
/ camel-to-dash.clj
Last active
December 13, 2015 17:09
CamelCase を dash-connected な string に変換する(日本語の取扱が今一つとか他にもバグあり)
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (defn camel-to-dash | |
| "convert `CamelCase` string to dash-connected string." | |
| [s] | |
| (->> (re-seq #"[A-Z]+[^A-Z]+|[a-z]+[^a-z]+" s) | |
| (map str/lower-case) | |
| (interpose "-") | |
| str/join)) |