d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Fix: got into infinite loop

Browse source
This commit is contained in:
ceriel 1995-05-02 12:23:28 +00:00
parent 15d2949b88
commit a0bd098f98
1 changed files with 9 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lang/m2/comp/enter.c
View file

@ -254,7 +254,15 @@ ImportEffects(idef, scope, flag)
register t_def *df = idef;
register t_type *tp;
while (df->df_kind & D_IMPORTED) {
while ((df->df_kind & D_IMPORTED) && df->imp_def != df) {
/* The second condition could occur on some (erroneous and
obscure) input such as:
IMPLEMENTATION MODULE Test;
FROM X IMPORT XType, XType;
END Test.
when X does not exist.
*/
df = df->imp_def;
}