LANGREITER.COM plain, simple | |||||||
START INDEX | |||||||
(import py) (def u2 (py.import 'urllib2)) (def (http-get url) (let* ((c (u2.urlopen url)) (p (c.read))) (c.close) (py.toe7 p))) (py.import 'objc) (def AppKit (py.import 'AppKit)) (((AppKit.NSSound.alloc).initWithContentsOfFile_byReference_ "/System/Library/Sounds/Basso.aiff" 1).play) bugs (def (fac x) (if (= x 1) 1 (* x (fac (- x 1))))) (fac 2000) # segfaults (import path) (path.files ".") # segfaults (set a (vector)) a[1] # bus error (eval ''()) # segfaults issues - osx: term.app: disable "delete key sends backspace" for backspace to work (thanks gavin!) - missing unquote? wanna-haves repl: output cut-off repl: should work with standard keys ootb (backspace, alt-left/right; might be an osx issue) fibench (def (fib x) (if (< x 2) x (+ (fib (- x 1)) (fib (- x 2))))) (fib 32) # real: ~15sec better? # iota: vector of asc ints (def (iota n) (let ((v (vector size:n fill:0))) (begin (for i in n (set v[i] i) v)))) (def (iota n) (vector init:(range n))) (def (fviota x) (fvlinear x 0 x)) # but sum takes 7secs ... build # to use fink pcre and gmm on osx export CPPFLAGS=-I/sw/include/ export LDFLAGS=-L/sw/lib/ |
SEARCH
GET YOUR MOVE ON ALMOST ALL ABOUT YOU So log in, fella — or finally get your langreiter.com account. You always wanted one. Nearby in the temporal dimension: Nobody. ... and 22 of the anonymous kind. Click on for a moderate dose of lcom-talk. This will probably not work in Lynx and other browser exotica. BACKLINKS e7 RECENT EDITS (MORE) films-seen Blood Stone y!kes wet towel B Studio Pilcrow News Nastassja Kinski 2011-10-06-steve 2011-10-06 comment-2011-08-04-1 POWERED BY &c. GeoURL RSS 0.92 FRIENDLY SHOPS Uncut Games bei Gameware OFFEN! Offenlegung gem. §25 MedienG: Christian Langreiter, Langkampfen See also: Privacy policy. |