Skip to content

Instantly share code, notes, and snippets.

View samth's full-sized avatar

Sam Tobin-Hochstadt samth

385 followers · 114 following
View GitHub Profile
@samth
samth / gvec.rkt
Created January 24, 2019 22:03
#lang racket/base
(require racket/match racket/vector racket/unsafe/ops)
(struct gvec ([v #:mutable] [len #:mutable]) #:authentic)
(define (resize! g)
(define old-v (gvec-v g))
(define size (* 2 (vector-length old-v)))
(define new-v (make-vector size))
(for ([i (in-range (gvec-len g))])
(vector-set! new-v i (vector-ref old-v i)))
@samth
samth / log.pypylog
Created January 17, 2019 01:10
[19c473e15553] {jit-backend-dump
BACKEND x86_64
SYS_EXECUTABLE python
CODE_DUMP @7fe7c97fa000 +0 48894D58488945604889556848895D70488975784889BD800000004C8985880000004C898D900000004C8995980000004C89A5A00000004C89ADA80000004C89B5B00000004C89BDB8000000584889452058488945104889E84C8BBC24880000004C8BB424800000004C8B6C24784C8B642470488B5C2468488B6C24604881C498000000C3
[19c473e25f71] jit-backend-dump}
[19c473e2c5ce] {jit-backend-dump
BACKEND x86_64
SYS_EXECUTABLE python
CODE_DUMP @7fe7c97fa085 +0 48894D58488945604889556848895D70488975784889BD800000004C8985880000004C898D900000004C8995980000004C89A5A00000004C89ADA80000004C89B5B00000004C89BDB8000000488B1C2508E6150348C7042500E615030000000048C7042508E615030000000048895D38584889452058488945104889E84C8BBC24880000004C8BB424800000004C8B6C24784C8B642470488B5C2468488B6C24604881C498000000C3
[19c473e2ecc8] jit-backend-dump}
@samth
samth / logfile
Created December 19, 2018 17:12
This file has been truncated, but you can view the full file.
[2acb49e5837b07] {jit-backend-dump
BACKEND x86_64
SYS_EXECUTABLE ??
CODE_DUMP @7f02ad95f000 +0 48894D50488945584889556048895D684889757048897D784C8985800000004C898D880000004C8995900000004C89A5980000004C89ADA00000004C89B5A80000004C89BDB00000008F45208F4510488B9424B0000000488B842498000000488942384889E848BB08A96E4CBC55000048832B104C8BBC24880000004C8BB424800000004C8B6C24784C8B642470488B5C2468488B6C24604881C4B8000000C3
[2acb49e586d87a] jit-backend-dump}
[2acb49e5889834] {jit-backend-dump
BACKEND x86_64
SYS_EXECUTABLE ??
CODE_DUMP @7f02ad95f0b0 +0 48894D50488945584889556048895D684889757048897D784C8985800000004C898D880000004C8995900000004C89A5980000004C89ADA00000004C89B5A80000004C89BDB000000049BBE8CFF34CBC550000498B1B49C743F80000000049C7030000000048895D388F45208F4510488B9424B0000000488B842498000000488942384889E848BB08A96E4CBC55000048832B104C8BBC24880000004C8BB424800000004C8B6C24784C8B642470488B5C2468488B6C24604881C4B8000000C3
[2acb49e588b9a6] jit-backend-dump}
@samth
samth / logfile
Created December 19, 2018 17:11
This file has been truncated, but you can view the full file.
[2acb49e5837b07] {jit-backend-dump
BACKEND x86_64
SYS_EXECUTABLE ??
CODE_DUMP @7f02ad95f000 +0 48894D50488945584889556048895D684889757048897D784C8985800000004C898D880000004C8995900000004C89A5980000004C89ADA00000004C89B5A80000004C89BDB00000008F45208F4510488B9424B0000000488B842498000000488942384889E848BB08A96E4CBC55000048832B104C8BBC24880000004C8BB424800000004C8B6C24784C8B642470488B5C2468488B6C24604881C4B8000000C3
[2acb49e586d87a] jit-backend-dump}
[2acb49e5889834] {jit-backend-dump
BACKEND x86_64
SYS_EXECUTABLE ??
CODE_DUMP @7f02ad95f0b0 +0 48894D50488945584889556048895D684889757048897D784C8985800000004C898D880000004C8995900000004C89A5980000004C89ADA00000004C89B5A80000004C89BDB000000049BBE8CFF34CBC550000498B1B49C743F80000000049C7030000000048895D388F45208F4510488B9424B0000000488B842498000000488942384889E848BB08A96E4CBC55000048832B104C8BBC24880000004C8BB424800000004C8B6C24784C8B642470488B5C2468488B6C24604881C4B8000000C3
[2acb49e588b9a6] jit-backend-dump}
@samth
samth / loop.rkt
Created December 15, 2018 17:49
#lang pycket
(define N 1000000)
(let countdown1 ([n N]) (if (< n 0) 1 (countdown1 (- n 1))))
#;#;#;
(require racket/linklet)
(define l
(compile-linklet
`(linklet
()
@samth
samth / pycket-inst2
Created December 14, 2018 03:03
instantiating linklet : /home/samth/sw/pycket/pypy/../expander.rktl.linklet
instantiating linklet : /home/samth/sw/pycket/pypy/../fasl.rktl.linklet
instantiating linklet : data
instantiating linklet : decl
instantiating linklet : data
instantiating linklet : decl
instantiating linklet : data
instantiating linklet : decl
instantiating linklet : data
instantiating linklet : decl
@samth
samth / all-instantiate
Created December 14, 2018 02:58
[1544754539.04] instantiating linklet : /home/samth/sw/pycket/pypy/../expander.rktl.linklet
[1544754561.11] instantiating linklet : /home/samth/sw/pycket/pypy/../fasl.rktl.linklet
[1544754590.89] instantiating linklet : data
[1544754591.60] instantiating linklet : decl
[1544754595.40] instantiating linklet : data
[1544754595.44] instantiating linklet : decl
[1544754595.50] instantiating linklet : data
[1544754595.57] instantiating linklet : decl
[1544754595.66] instantiating linklet : data
[1544754595.74] instantiating linklet : decl
@samth
samth / provide-transform2.rkt
Created December 2, 2018 02:40
(module provide-transform '#%kernel
(define-values (identifier?) (lambda (stx) (symbol? (syntax-e stx))))
(#%provide expand-export pre-expand-export
make-provide-transformer
make-provide-pre-transformer)
(define-values (prop:provide-pre-transformer provide-pre-transformer? provide-pre-transformer-get-proc)
(make-struct-type-property 'provide-pre-transformer))
@samth
samth / provide-transform2.rkt
Created December 2, 2018 02:07
(module provide-transform '#%kernel
(#%require "private/stxcase-scheme.rkt"
"private/stx.rkt"
"private/define-struct.rkt"
"private/small-scheme.rkt"
"private/define.rkt")
(#%provide expand-export pre-expand-export
make-provide-transformer prop:provide-transformer provide-transformer?
make-provide-pre-transformer prop:provide-pre-transformer provide-pre-transformer?
@samth
samth / t.rkt
Created November 30, 2018 02:17
(module t '#%kernel
(#%require '#%linklet)
(define-values (datum->correlated) (hash-ref (primitive-table '#%kernel) 'datum->syntax #f))
(define-values (s) 'the-symbol)
(define-values (sexp)
(list
'linklet
'()
(list (list (datum->correlated '#f s) 'x))
(datum->correlated