Browse Source

* typo errors corrected

pierre 25 years ago
parent
commit
9e1ba97b6d
1 changed files with 4 additions and 4 deletions
  1. 4 4
      compiler/utils/postwin32.pp

+ 4 - 4
compiler/utils/postwin32.pp

@@ -167,12 +167,12 @@ p:=pos('.',dllversion);
 if p=0 then
   begin
     dllminor:=0;
-    val(dllversion,ddlmajor,code);
+    val(dllversion,dllmajor,code);
   end
 else
   begin
-    val(copy(dllversion,1,p-1),ddlmajor,code);
-    val(copy(dllversion,p+1,255),ddlminor,code);
+    val(copy(dllversion,1,p-1),dllmajor,code);
+    val(copy(dllversion,p+1,255),dllminor,code);
   end;
 
 isDll:=GetSwitchValue('--type','-t','exe',['exe','dll'])='dll';
@@ -183,4 +183,4 @@ isDll:=GetSwitchValue('--type','-t','exe',['exe','dll'])='dll';
 l.init;
 l.PostProcessExecutable(fn,isdll);
 
-end.
+end.