resolve interreference between (picrin user) and (scheme *)
This commit is contained in:
parent
527217e94a
commit
912d1237bc
|
@ -16,6 +16,23 @@
|
|||
(define (add-history str)
|
||||
#f))))
|
||||
|
||||
(eval
|
||||
'(import (scheme base)
|
||||
(scheme load)
|
||||
(scheme process-context)
|
||||
(scheme read)
|
||||
(scheme write)
|
||||
(scheme file)
|
||||
(scheme inexact)
|
||||
(scheme cxr)
|
||||
(scheme lazy)
|
||||
(scheme time)
|
||||
(picrin macro)
|
||||
(picrin dictionary)
|
||||
(picrin array)
|
||||
(picrin library))
|
||||
'(picrin user))
|
||||
|
||||
(define (repl)
|
||||
(let loop ((buf ""))
|
||||
(let ((line (readline (if (equal? buf "") "> " "* "))))
|
||||
|
|
|
@ -7,6 +7,4 @@ list(APPEND PICLIB_SCHEME_LIBS
|
|||
${PROJECT_SOURCE_DIR}/piclib/picrin/experimental/lambda.scm
|
||||
${PROJECT_SOURCE_DIR}/piclib/picrin/syntax-rules.scm
|
||||
${PROJECT_SOURCE_DIR}/piclib/picrin/test.scm
|
||||
|
||||
${PROJECT_SOURCE_DIR}/piclib/picrin/user.scm
|
||||
)
|
||||
|
|
|
@ -1,17 +0,0 @@
|
|||
; the default repl environment
|
||||
|
||||
(define-library (picrin user)
|
||||
(import (scheme base)
|
||||
(scheme load)
|
||||
(scheme process-context)
|
||||
(scheme read)
|
||||
(scheme write)
|
||||
(scheme file)
|
||||
(scheme inexact)
|
||||
(scheme cxr)
|
||||
(scheme lazy)
|
||||
(scheme time)
|
||||
(picrin macro)
|
||||
(picrin dictionary)
|
||||
(picrin array)
|
||||
(picrin library)))
|
Loading…
Reference in New Issue