mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-30 06:50:31 +02:00
* boot-9.scm (eval-string): Function deleted; it was already
implemented in C, so there's no point in making a divergable copy here.
This commit is contained in:
parent
e1cd56f9d3
commit
3a3e9e09b8
1 changed files with 0 additions and 9 deletions
|
@ -778,15 +778,6 @@
|
|||
;;; Scheme code based on the argument list. This page contains help
|
||||
;;; functions for the code it generates.
|
||||
|
||||
(define (eval-string string)
|
||||
(call-with-input-string
|
||||
string
|
||||
(lambda (port)
|
||||
(let loop ()
|
||||
(let ((expr (read port)))
|
||||
(if (eof-object? expr) #f
|
||||
(begin (eval expr) (loop))))))))
|
||||
|
||||
(define (command-line) (program-arguments))
|
||||
|
||||
(define (load-user-init)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue