suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

When constructing code, use the `object-name' of the input port *only*

Browse Source 
if it's coming from a file -- not when it's a string.  In that case, use
`#f' for the name, so other code (specifically, `input->code') will use
'program.

svn: r17987
This commit is contained in:
Eli Barzilay 2010-02-05 03:22:23 +00:00
parent a4954b774d
commit 2cc4429c62
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/scheme/sandbox.ss
View File

@ -430,8 +430,8 @@
(define (input->port inp) (define (input->port inp)
;; returns #f when it can't create a port ;; returns #f when it can't create a port
(cond [(input-port? inp) inp] (cond [(input-port? inp) inp]
[(string? inp) (open-input-string inp)] [(string? inp) (open-input-string inp #f)]
[(bytes? inp) (open-input-bytes inp)] [(bytes? inp) (open-input-bytes inp #f)]
[(path? inp) (open-input-file inp)] [(path? inp) (open-input-file inp)]
[else #f])) [else #f]))