fixed the ordering of the hack that chooses the main module to load

svn: r121
This commit is contained in:
Jono Spiro 2004-08-02 14:41:16 +00:00
parent 437da77c98
commit e641ac9b24

View File

@ -508,7 +508,7 @@ Find a way to bind to the result of ananonymous expression: here->(add1 2)
(set-debug-client-process! client process)
(set-debug-client-line-col->pos! client (line-col->pos filename))
(set-debug-process-clients! process
(cons client (debug-process-clients process)))
(append (list client) (debug-process-clients process)))
client))))