Skip to content

Instantly share code, notes, and snippets.

View darrenldl's full-sized avatar

Darren Li darrenldl

View GitHub Profile
@darrenldl
darrenldl / profile.txt
Created July 16, 2018 07:03
ocaml-reed-solomon-erasure : pure ocaml profile
Flat profile:
Each sample counts as 0.01 seconds.
% cumulative self self total
time seconds seconds calls ms/call ms/call name
74.00 10.93 10.93 camlReed_solomon_erasure__Galois__mul_slice_xor_pure_ocaml_inner_5708
14.22 13.03 2.10 1900021475 0.00 0.00 camlPervasives__char_of_int_1125
4.60 13.71 0.68 345 1.97 1.97 camlPervasives__$5e_1117
4.13 14.32 0.61 camlReed_solomon_erasure__Galois__mul_slice_pure_ocaml_inner_5701
1.49 14.54 0.22 12582912 0.00 0.00 camlRandom__intaux_1238
@darrenldl
darrenldl / compile-test-log
Created March 18, 2017 08:16
Racket megaparsack compile test log
standard-module-name-resolver: collection not found
for module path: racket/match/gen-match
collection: "racket/match"
in collection directories:
context...:
show-collection-err
standard-module-name-resolver
#%embedded:g2732:curly-fn-transformer: [running expand-time body]
get-sym
/usr/share/racket/collects/racket/promise.rkt:58:10
@darrenldl
darrenldl / compile-test.rkt
Created March 18, 2017 08:11
Racket megaparsack compile test code
#lang racket
(require megaparsack megaparsack/text)
(module+ main
(displayln
(with-handlers ([exn:fail:read:megaparsack? (λ(x) #f)])
(parse-result!
(parse-string integer/p "123"))))
)