[plt-scheme] REQUIRE breaks on graphical files during setup-plt

Hi everyone,


I have a file saved in graphical format: during setup-plt, the compilation 
fails since the compilation manager load handler isn't graphically aware:

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

setup-plt: Error during Compiling .zos for DivaScheme 
(/home/dyoo/work/divascheme)
setup-plt:   load-handler: expected a `module' declaration for 
`sample-file-with-snip' in 
#<path:/home/dyoo/work/divascheme/sample-file-with-snip.ss>, but found 
something else
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


I understand that one issue is that 'TEXT-EDITOR-LOAD-HANDLER' isn't in 
place because we're using mzscheme rather than mred.  But even if we 
substitute the call to 'mzscheme' with 'mred' within the setup-plt binary, 
things still break because.


I've been staring at the code in cm.ss's 
make-compilation-manager-load/use-compiled/handler/table; it looks like 
it's not using the proper CURRENT-LOAD within COMPILE-ZO, but is instead 
doing something more primitive with moddep.s's 
MODDEP-CURRENT-OPEN-INPUT-FILE, which isn't sensitive to the graphical 
nature of files.


I'm not sure what the right fix for this is, yet.  Would it be possible 
for mred's setup to include a paramterization of moddep's 
MODDEP-CURRENT-OPEN-INPUT-FILE to the correct OPEN-INPUT-GRAPHICAL-FILE in 
mred?  Otherwise, this restricts the kind of files that one can include in 
compilable modules to pure text files.


Thanks!