expander: remove unused require of racket/fasl

This commit is contained in:
Matthew Flatt 2018-11-21 08:50:10 -07:00
parent 13fa23e79a
commit 701854a404
2 changed files with 1 additions and 7 deletions

View File

@ -1,6 +1,5 @@
#lang racket/base
(require racket/fasl
"../common/contract.rkt"
(require "../common/contract.rkt"
"../host/linklet.rkt"
"write-linklet.rkt")

View File

@ -26644,11 +26644,6 @@ static const char *startup_source =
"(make-struct-field-accessor -ref_0 10 'post-compiled-in-memorys)"
"(make-struct-field-accessor -ref_0 11 'namespace-scopes)"
"(make-struct-field-accessor -ref_0 12 'purely-functional?))))"
"(define-values(fasl-small-integer-start) 100)"
"(define-values(fasl-lowest-small-integer) -10)"
"(define-values(fasl-highest-small-integer)(- 255(- fasl-small-integer-start fasl-lowest-small-integer) 1))"
" (define-values (fasl-prefix) #\"racket/fasl:\")"
"(define-values(fasl-prefix-length)(bytes-length fasl-prefix))"
"(define-values(version-bytes$1)(string->bytes/utf-8(version)))"
"(define-values(vm-bytes$1)(1/linklet-virtual-machine-bytes))"
"(define-values"