Convert readline to Racket
Also lighten package dependencies by removing scheme-lib and compatibility-lib.
This commit is contained in:
parent
399e9a25b0
commit
1b4bcd1e2c
|
@ -1,9 +1,7 @@
|
|||
#lang info
|
||||
|
||||
(define collection 'multi)
|
||||
(define deps '("scheme-lib"
|
||||
"base"
|
||||
"compatibility-lib"))
|
||||
(define deps '("base"))
|
||||
|
||||
(define pkg-desc "implementation (no documentation) part of \"readline\"")
|
||||
|
||||
|
|
|
@ -1,4 +1,4 @@
|
|||
#lang scheme
|
||||
#lang racket
|
||||
|
||||
(require "rep.rkt")
|
||||
(provide (all-from-out "rep.rkt"))
|
||||
|
|
|
@ -1,6 +1,6 @@
|
|||
#lang scheme/base
|
||||
#lang racket/base
|
||||
|
||||
(require mzlib/foreign (only-in '#%foreign ffi-obj)) (unsafe!)
|
||||
(require ffi/unsafe (only-in '#%foreign ffi-obj))
|
||||
(provide readline readline-bytes
|
||||
add-history add-history-bytes
|
||||
history-length history-get history-delete
|
||||
|
|
|
@ -1,3 +1,3 @@
|
|||
(module readline mzscheme
|
||||
(module readline racket/base
|
||||
(require "mzrl.rkt")
|
||||
(provide (all-from "mzrl.rkt")))
|
||||
(provide (all-from-out "mzrl.rkt")))
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
;; This module initializes readline unconditionally, "rep.rkt" uses it if we're
|
||||
;; using a `terminal-port?' for input.
|
||||
|
||||
#lang scheme/base
|
||||
#lang racket/base
|
||||
|
||||
(require "pread.rkt")
|
||||
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
;; This is a wrapper around "rep-start.rkt" -- use it if we're using a terminal
|
||||
#lang scheme/base
|
||||
#lang racket/base
|
||||
|
||||
(require scheme/runtime-path scheme/file)
|
||||
(require racket/runtime-path racket/file)
|
||||
|
||||
(define-runtime-path rep-start "rep-start.rkt")
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user