Skip to content

Instantly share code, notes, and snippets.

View cmoore's full-sized avatar
🆑

Clint Moore cmoore

🆑
View GitHub Profile
[04:13:40 INFO]: hydo: Opped hydo
[04:13:48 INFO]: hydo issued server command: /gm c
[04:13:52 INFO]: hydo issued server command: /time set 1000
[04:14:00 INFO]: hydo issued server command: /weather clear
[04:14:41 INFO]: hydo issued server command: /npc create Bob The Builder
[04:14:56 INFO]: hydo issued server command: /trait builder
[04:17:43 INFO]: hydo issued server command: /builder load kataphane
[04:18:07 INFO]: hydo issued server command: /builder origin
[04:18:13 INFO]: hydo issued server command: /builder build
[04:18:13 ERROR]: null
(defvar *previous-readtables* nil)
(defmacro enable-toml-syntax ()
'(eval-when (:compile-toplevel :load-toplevel :execute)
(push *readtable* *previous-readtables*)
(setq *readtable* (copy-readtable))
(set-macro-character #\[ 'read-left-bracket)
; more calls to (set-macro-character)
...))
;; The model macro
;;
;; Requires
;; - Postmodern
;; - A running Postgreql server.
;;
;; Package requirements
;; - Postmodern
;; - local-time
;; - cl-postgres+local-time
(--->
op "clone"
id "19"
)
(<-
id "19"
new-session "c82858e6-6033-4cc4-b07d-00abc3f86355"
session "03205e3c-324f-423a-ab8c-3bc3ab23f2dc"
status ("done")
)
@cmoore
cmoore / out.txt
Created October 15, 2015 12:54
zeromq windows
0MQ Socket Properties
get socket option (Pair): FAIL (0.03s)
*** Failed! Exception: 'ZMQError { errno = 22, source = "getIntOpt", message = "Invalid argument" }' (after 5 tests):
Filedesc (-1)
Use --quickcheck-replay '4 TFGenR 000000159B0C43ED00000000001E8480000000000000DFDE00000003A3529440 0 31 5 0' to reproduce.
get socket option (Pub): FAIL
*** Failed! Exception: 'ZMQError { errno = 22, source = "getIntOpt", message = "Invalid argument" }' (after 1 test):
Filedesc 1
Use --quickcheck-replay '0 TFGenR 000000159B0C43ED00000000001E8480000000000000DFDE00000003A3529440 0 2 2 0' to reproduce.
get socket option (Sub): FAIL
@cmoore
cmoore / errors.md
Last active October 19, 2015 14:23
stack funkiness in here.

This is the difference between a stack with edIncludes in Installed.hs commented out, and not.

Just to show the paths that are, I assume, inserted into --extra-include-dirs and friends.

C:\projects\stack>stack install
Setting codepage to UTF-8 (65001) to ensure correct output from GHC
binary-tagged-0.1.1.0: unregistering (flags changed from ["--extra-include-dirs=C:\\Users\\clint\\AppData\\Local\\Programs\\stack\\x86_64-windows\\msys2-20150512\\mingw32\\include","--extra-include-dirs=C:\\Users\\clint\\AppData\\Local\\Programs\\stack\\x86_64-windows\\msys2-20150512\\mingw64\\include","--extra-lib-dirs=C:\\Users\\clint\\AppData\\Local\\Programs\\stack\\x86_64-windows\\msys2-20150512\\mingw32\\lib","--extra-lib-dirs=C:\\Users\\clint\\AppData\\Local\\Programs\\stack\\x86_64-windows\\msys2-20150512\\mingw64\\lib"] to ["--extra-lib-dirs=C:\\Users\\clint\\AppData\\Local\\Programs\\stack\\x86_64-windows\\msys2-20150512\\mingw32\\lib","--extra-lib-dirs=C:\\Users\\clint\\AppData\\Local\\Programs\\stack\\x86_64-
@cmoore
cmoore / react.lisp
Last active December 20, 2015 02:00
An example of the syntax.
(define-easy-handler (react-stuff :uri "/react/all") ()
(send-react
(defvar panel (defreact
(json display-name "Panel"
component-will-mount (lambda ()
;; (->) is (ps:chain) and (.>) bind()s 'this' to the block.
(something-with-a-callback (.> (lambda (x) (-> this (do-something)))))
render (lambda ()
(rce "div" (json class-name "col-md-6")
(rce "div" (json class-name "panel panel-default panel-borders")
<script src="//pricescouter.net/pricescouter.js">
<input type="hidden" name="pricescouter-price" value="40.63">
<input type="hidden" name="pricescouter-unique" value="4B1956H-STD">
<input type="hidden" name="pricescouter-manufacturer" value="Acme">
<!--
Optimally, "pricescouter-unique" will be a SKU, part number, or
model number. The more specific, the better.
-->
<div style="display:none;" id="pricescouter-pricetable"></div>