fixed the ordering of the hack that chooses the main module to load
svn: r121
This commit is contained in:
parent
437da77c98
commit
e641ac9b24
|
@ -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-process! client process)
|
||||||
(set-debug-client-line-col->pos! client (line-col->pos filename))
|
(set-debug-client-line-col->pos! client (line-col->pos filename))
|
||||||
(set-debug-process-clients! process
|
(set-debug-process-clients! process
|
||||||
(cons client (debug-process-clients process)))
|
(append (list client) (debug-process-clients process)))
|
||||||
|
|
||||||
client))))
|
client))))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user