Skip to content

Instantly share code, notes, and snippets.

View patrickdlogan's full-sized avatar

Patrick Logan patrickdlogan

View GitHub Profile
@patrickdlogan
patrickdlogan / workspace.st
Last active September 27, 2026 16:34 — forked from StefanKrecher/workspace.st
simple workspace for GNU Smalltalk on Android
PackageLoader fileInPackage: 'Android'.
| layout event droid samples |
droid := Android new.
layout := '<?xml version="1.0" encoding="utf-8"?>
<LinearLayout xmlns:android="http://schemas.android.com/apk/res/android"
android:id="@+id/background"
android:orientation="vertical"
android:layout_width="match_parent"
android:layout_height="wrap_content"
@patrickdlogan
patrickdlogan / plet.clj
Created November 2, 2012 19:57 — forked from fogus/plet.clj
(defmacro letp
[bindings & exprs]
(let [bindings (partition 2 bindings)
vars (->> bindings (map first) vec)
values (->> bindings (map second))]
`((fn ~vars ~@exprs)
~@values)))
(def a 7)
(def y 2)
@patrickdlogan
patrickdlogan / example output
Created January 31, 2011 05:10 — forked from lukaszkorecki/example output
phantomjs testrunner for qunit
[10:44][~/dev/Mikrob.chrome master]: phantomjs testrunner.js file://`pwd`/test.html
Running tests
file:///Users/optimor/dev/Mikrob.chrome/test/collection_store_test.js:71 Clearing localStorage
Passed: 14, Failed: 1 Total: 15
[10:44][~/dev/Mikrob.chrome master]: echo $?
1