Move most of the compiler
collection to compiler-lib
.
This commit is contained in:
parent
d54c1e4e49
commit
3ad009070e
|
@ -5,5 +5,6 @@
|
|||
"compatibility-lib"
|
||||
"pconvert-lib"
|
||||
"sandbox-lib"
|
||||
"compiler-lib"
|
||||
"gui-lib"
|
||||
"racket-doc"))
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
(module compiler racket/base
|
||||
(require racket/unit)
|
||||
|
||||
(require "sig.rkt")
|
||||
(require compiler/sig)
|
||||
|
||||
(require dynext/compile-sig)
|
||||
(require dynext/link-sig)
|
||||
|
@ -13,7 +13,7 @@
|
|||
|
||||
(require "option.rkt")
|
||||
|
||||
(require "compiler-unit.rkt")
|
||||
(require compiler/compiler-unit)
|
||||
|
||||
(define-values/invoke-unit/infer compiler@)
|
||||
|
|
@ -21,7 +21,7 @@
|
|||
|
||||
(error-print-width 512)
|
||||
|
||||
(require (prefix-in compiler:option: "option.rkt")
|
||||
(require (prefix-in compiler:option: compiler/option)
|
||||
"compiler.rkt")
|
||||
|
||||
;; Read argv array for arguments and input file name
|
|
@ -1,8 +1,8 @@
|
|||
(module option racket/base
|
||||
(require racket/unit)
|
||||
|
||||
(require "sig.rkt"
|
||||
"option-unit.rkt")
|
||||
(require compiler/sig
|
||||
compiler/option-unit)
|
||||
|
||||
(define-values/invoke-unit/infer compiler:option@)
|
||||
|
|
@ -2,7 +2,7 @@
|
|||
|
||||
(require dynext/compile
|
||||
setup/dirs
|
||||
(prefix-in xform: "private/xform.rkt"))
|
||||
(prefix-in xform: compiler/private/xform))
|
||||
|
||||
(provide xform)
|
||||
|
3
pkgs/compiler-lib/info.rkt
Normal file
3
pkgs/compiler-lib/info.rkt
Normal file
|
@ -0,0 +1,3 @@
|
|||
#lang setup/infotab
|
||||
|
||||
(define deps '("base"))
|
|
@ -3,6 +3,7 @@
|
|||
(define collection 'multi)
|
||||
|
||||
(define deps '("data-lib"
|
||||
"compiler-lib"
|
||||
"base"
|
||||
"compatibility-lib"
|
||||
"draw-lib"
|
||||
|
|
|
@ -4,5 +4,6 @@
|
|||
|
||||
(define scribblings '(("make.scrbl" (multi-page) (tool-library))))
|
||||
(define deps '("base"
|
||||
"compiler-lib"
|
||||
"compatibility-lib"))
|
||||
(define build-deps '("scribble-lib"))
|
||||
|
|
|
@ -6,6 +6,7 @@
|
|||
"compatibility-lib"
|
||||
"net-lib"
|
||||
"sandbox-lib"
|
||||
"compiler-lib"
|
||||
"scribble-lib"
|
||||
"racket-index"))
|
||||
(define build-deps '("at-exp-lib"
|
||||
|
|
|
@ -11,6 +11,7 @@
|
|||
"rackunit-lib"
|
||||
"slideshow-lib"
|
||||
"base"
|
||||
"compiler-lib"
|
||||
"compatibility-lib"
|
||||
"data-lib"
|
||||
"draw-lib"
|
||||
|
|
|
@ -5,6 +5,7 @@
|
|||
(define build-deps '("base"
|
||||
"compatibility-lib"
|
||||
"rackunit-lib"
|
||||
"compiler-lib"
|
||||
"redex"
|
||||
"sandbox-lib"
|
||||
"unstable"))
|
||||
|
|
|
@ -25,7 +25,7 @@
|
|||
(file-position (current-output-port) (cdar m))
|
||||
(write-bytes path-bytes)
|
||||
(write-byte 0))
|
||||
'update))))
|
||||
#:exists 'update))))
|
||||
|
||||
(define (get-current-dll-dir dest)
|
||||
(with-input-from-file dest
|
||||
|
|
Loading…
Reference in New Issue
Block a user