cmoore

(ql:quickload '(:jsown
                :json-mop))

(defpackage :geojson
  (:use :cl
        :json-mop))

(in-package :geojson)

cmoore

(in-package :efl)

#+ (or freebsd darwin)
(progn
  (include "time.h")
  (include "sys/time.h"))

(cc-flags #+freebsd "-I/usr/local/include -I/usr/local/include/elementary-1 -I/usr/local/include/efl-1 -I/usr/local/include/eina-1/eina -I/usr/local/include/eina-1 -I/usr/local/include/eet-1 -I/usr/local/include/emile-1 -I/usr/local/include/evas-1 -I/usr/local/include/eo-1 -I/usr/local/include/ecore-1 -I/usr/local/include/ecore-evas-1 -I/usr/local/include/ecore-con-1 -I/usr/local/include/ecore-file-1 -I/usr/local/include/ecore-imf-1 -I/usr/local/include/ecore-input-1 -I/usr/local/include/ecore-x-1 -I/usr/local/include/edje-1 -I/usr/local/include/eldbus-1 -I/usr/local/include/efreet-1 -I/usr/local/include/ethumb-1 -I/usr/local/include/ethumb-client-1")

cmoore

rm -f *~ *.bak *.orig \#*\# .\#* texput.log *.fasl
rm -rf sbcl asdf version "docstrings/"
rm -f  sbcl.html asdf.html
rm -f contrib-docs.texi-temp
rm -f package-locks.texi-temp
rm -f variables.texinfo
rm -f sbcl.ps asdf.ps sbcl.pdf asdf.pdf html-stamp tempfiles-stamp
rm -f asdf.aux asdf.cp asdf.cps asdf.fn asdf.fns asdf.ky asdf.log asdf.pg asdf.toc asdf.tp asdf.tps asdf.vr asdf.vrs sbcl.aux sbcl.cp sbcl.cps sbcl.fn sbcl.fns sbcl.ky sbcl.log sbcl.pg sbcl.toc sbcl.tp sbcl.tps sbcl.vr sbcl.vrs 
rm -f sbcl.info sbcl.info-* asdf.info
rm -rf *.include *.info *.pdf *~ *.cp *.fn *.ky *.log *.pg *.toc \

cmoore

lx := ZnClient new.

json_data := Array with:
	(NeoJSONReader fromString: (lx get: 'https://api.github.com/users/cmoore')).

sheet := SpreadsheetGridMorph new
			hResizing: #spaceFill;
			vResizing: #spaceFill;
			yourself.

cmoore

<div style="display:none;" id="pricescouter-pricetable"></div>

cmoore

<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.
-->
   

cmoore

<script src="//pricescouter.net/pricescouter.js">

cmoore

(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")

cmoore

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

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