Commit de2f6e78 authored by sewardj's avatar sewardj
Browse files

[project @ 2000-01-12 14:47:27 by sewardj]

readScripts(), combined mode: minor hack so that current eval module
is Prelude rather than PrelHugs, once the Prelude is loaded.
parent 47ef1f6c
......@@ -9,8 +9,8 @@
* included in the distribution.
*
* $RCSfile: hugs.c,v $
* $Revision: 1.35 $
* $Date: 2000/01/11 14:21:43 $
* $Revision: 1.36 $
* $Date: 2000/01/12 14:47:27 $
* ------------------------------------------------------------------------*/
#include <setjmp.h>
......@@ -1260,6 +1260,11 @@ Int n; { /* loading everything after and */
{ Int m = namesUpto-1;
Text mtext = findText(scriptInfo[m].modName);
/* Hack to avoid starting up in PrelHugs */
if (mtext == findText("PrelHugs")) mtext = findText("Prelude");
/* Commented out till we understand what
* this is trying to do.
* Problem, you cant find a module till later.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment