Browse Source

* fixed uninited var

peter 24 years ago
parent
commit
38305e0a1a
1 changed files with 5 additions and 1 deletions
  1. 5 1
      compiler/assemble.pas

+ 5 - 1
compiler/assemble.pas

@@ -157,6 +157,7 @@ var
   asfound : boolean;
   asfound : boolean;
   UtilExe  : string;
   UtilExe  : string;
 begin
 begin
+  asfound:=false;
   UtilExe:=AddExtension(target_asm.asmbin,source_os.exeext);
   UtilExe:=AddExtension(target_asm.asmbin,source_os.exeext);
   if lastas<>ord(target_asm.id) then
   if lastas<>ord(target_asm.id) then
    begin
    begin
@@ -601,7 +602,10 @@ end;
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.11  2001-02-05 20:46:59  peter
+  Revision 1.12  2001-02-09 23:06:17  peter
+    * fixed uninited var
+
+  Revision 1.11  2001/02/05 20:46:59  peter
     * support linux unit for ver1_0 compilers
     * support linux unit for ver1_0 compilers
 
 
   Revision 1.10  2001/01/21 20:32:45  marco
   Revision 1.10  2001/01/21 20:32:45  marco