Skip to content

Instantly share code, notes, and snippets.

View andrzejsliwa's full-sized avatar

Andrzej Śliwa andrzejsliwa

View GitHub Profile
@andrzejsliwa
andrzejsliwa / p3.erl
Created February 16, 2014 13:35 — forked from jj1bdx/p3.erl
%%% Prime number sieve code with lazy evaluation by Joe Armstrong
%%% (very slightly modified for syntax check)
%%% http://erlang.org/pipermail/erlang-questions/1999-March/000176.html
-module(p3).
-export([from/1,filter/2,sift/2,sieve/1,primes/0, first/1]).
%% This generates a lazy sequence starting from K.
%% from(K) ->

Installation of Erlang R16B03-1 and 17.0-rc2 to OS X 10.9.2 with Xcode and wxWidgets 3.0.0

Installing wxWidgets

@andrzejsliwa
andrzejsliwa / gist:9267961
Created February 28, 2014 09:23
wx erlang homebrew
https://gist.github.com/dch/9267866
```
brew update
brew install wxmac --disable-monolithic
brew install --with-wx --no-docs -v --devel erlang
```
(ns tiexample.core)
(defn ^{:export dbg} dbg [s]
(js* "Titanium.API.debug(~{s})"))
;;stolen from another gist I saw
(defn make-js-map
"makes a javascript map from a clojure one"
[cljmap]
(let [out (js-obj)]
(defvar personal-dir (file-name-directory load-file-name)
"The root dir of the emacs configuration.")
(defvar personal-vendor-dir (expand-file-name "vendor" personal-dir)
"This directory houses packages that are not yet available in ELPA (or MELPA).")
(defvar personal-savefile-dir (expand-file-name "savefile" personal-dir)
"This folder stores all the automatically generated save/history-files.")
(unless (file-exists-p personal-savefile-dir)
(make-directory personal-savefile-dir))
;; +--------------------------------------------------------------------------+
;; | CTRL - C
;; +--------------------------------------------------------------------------+
(global-set-key (kbd "C-c f") 'projectile-find-file)
(global-set-key (kbd "C-c F") 'projectile-find-file-other-window)
(global-set-key (kbd "C-c d") 'projectile-find-dir)
(global-set-key (kbd "C-c D") 'projectile-find-dir-other-window)
(global-set-key (kbd "C-c C-c d") 'projectile-dired)
(global-set-key (kbd "C-c b") 'projectile-switch-to-buffer)
# Set the prefix to ^z
# unbind-key C-b
unbind C-b
set -g prefix C-a
bind-key C-a send-prefix
unbind-key " "
bind-key " " last-window
unbind-key n
(global-set-key (kbd "C-c p f") 'projectile-find-file)
(global-set-key (kbd "C-c p F") 'projectile-find-file-other-window)
(global-set-key (kbd "C-c p d") 'projectile-find-dir)
(global-set-key (kbd "C-c p D") 'projectile-find-dir-other-window)
(global-set-key (kbd "C-c C-c d") 'projectile-dired)
(global-set-key (kbd "C-c p b") 'projectile-switch-to-buffer)
(global-set-key (kbd "C-c p a") 'projectile-ag)
(global-set-key (kbd "C-c p i") 'projectile-invalidate-cache)
(global-set-key (kbd "C-c p k") 'projectile-kill-buffers)
(global-set-key (kbd "C-c p p") 'projectile-switch-project)
(global-set-key (kbd "C-c p f") 'projectile-find-file)
(global-set-key (kbd "C-c p F") 'projectile-find-file-other-window)
(global-set-key (kbd "C-c p d") 'projectile-find-dir)
(global-set-key (kbd "C-c p D") 'projectile-find-dir-other-window)
(global-set-key (kbd "C-c C-c d") 'projectile-dired)
(global-set-key (kbd "C-c p b") 'projectile-switch-to-buffer)
(global-set-key (kbd "C-c p a") 'projectile-ag)
(global-set-key (kbd "C-c p i") 'projectile-invalidate-cache)
(global-set-key (kbd "C-c p k") 'projectile-kill-buffers)
(global-set-key (kbd "C-c p p") 'projectile-switch-project)
(global-set-key (kbd "C-c p f") 'projectile-find-file)
(global-set-key (kbd "C-c p F") 'projectile-find-file-other-window)
(global-set-key (kbd "C-c p d") 'projectile-find-dir)
(global-set-key (kbd "C-c p D") 'projectile-find-dir-other-window)
(global-set-key (kbd "C-c C-c d") 'projectile-dired)
(global-set-key (kbd "C-c p b") 'projectile-switch-to-buffer)
(global-set-key (kbd "C-c p a") 'projectile-ag)
(global-set-key (kbd "C-c p i") 'projectile-invalidate-cache)
(global-set-key (kbd "C-c p k") 'projectile-kill-buffers)
(global-set-key (kbd "C-c p p") 'projectile-switch-project)