Browse Source

* halt removed in do_lowhigh

pierre 26 years ago
parent
commit
f5d21809d7
1 changed files with 6 additions and 6 deletions
  1. 6 6
      compiler/tcinl.pas

+ 6 - 6
compiler/tcinl.pas

@@ -89,10 +89,8 @@ implementation
                   disposetree(p);
                   disposetree(p);
                   p:=hp;
                   p:=hp;
                end;
                end;
-             arraydef:
-               begin
-                  halt;
-               end;
+           else
+             internalerror(87);
            end;
            end;
         end;
         end;
 
 
@@ -1126,7 +1124,10 @@ implementation
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.49  1999-08-28 15:34:21  florian
+  Revision 1.50  1999-09-07 14:05:11  pierre
+   * halt removed in do_lowhigh
+
+  Revision 1.49  1999/08/28 15:34:21  florian
     * bug 519 fixed
     * bug 519 fixed
 
 
   Revision 1.48  1999/08/23 23:41:04  pierre
   Revision 1.48  1999/08/23 23:41:04  pierre
@@ -1324,4 +1325,3 @@ end.
     * splitted pass_1
     * splitted pass_1
 
 
 }
 }
-