Fix typo.

Author: martijnlaan

Projects/Compil32.dpr

@@ -203,7 +203,7 @@ end;
 
 begin
   {$IFNDEF STATICCOMPILER}
-  if ISCmplrLibary = 0 then begin
+  if ISCmplrLibrary = 0 then begin
     MessageBox(0, PChar(Format('Could not load %s.', [ISCmplrDLL])), nil, MB_OK or MB_ICONSTOP);
     Halt(3);
   end;

Projects/ISCC.dpr

@@ -561,7 +561,7 @@ begin
   end;
 
   {$IFNDEF STATICCOMPILER}
-  if ISCmplrLibary = 0 then begin
+  if ISCmplrLibrary = 0 then begin
     WriteStdErr(Format('Could not load %s.', [ISCmplrDLL]), True);
     Halt(1);
   end;

Projects/Src/Shared.CompilerInt.pas

@@ -18,7 +18,7 @@ interface
   ISCmplrDLL = 'ISCmplr.dll';
 
 var
-  ISCmplrLibary: HMODULE;
+  ISCmplrLibrary: HMODULE;
 
 { The ISDllCompileScript function begins compilation of a script. See the above
   description of the TCompileScriptParams record. Return value is one of the
@@ -39,13 +39,13 @@ implementation
 initialization
   var FileName := AddBackslash(PathExtractPath(ParamStr(0))) + ISCmplrDLL;
   if TrustedFile(FileName) then begin
-    ISCmplrLibary := SafeLoadLibrary(PChar(FileName), SEM_NOOPENFILEERRORBOX);
-    if ISCmplrLibary <> 0 then begin
-      ISDllCompileScript := GetProcAddress(ISCmplrLibary, 'ISDllCompileScriptW');
-      ISDllGetVersion := GetProcAddress(ISCmplrLibary, 'ISDllGetVersion');
+    ISCmplrLibrary := SafeLoadLibrary(PChar(FileName), SEM_NOOPENFILEERRORBOX);
+    if ISCmplrLibrary <> 0 then begin
+      ISDllCompileScript := GetProcAddress(ISCmplrLibrary, 'ISDllCompileScriptW');
+      ISDllGetVersion := GetProcAddress(ISCmplrLibrary, 'ISDllGetVersion');
       if not Assigned(ISDllCompileScript) or not Assigned(ISDllGetVersion) then begin
-        FreeLibrary(ISCmplrLibary);
-        ISCmplrLibary := 0;
+        FreeLibrary(ISCmplrLibrary);
+        ISCmplrLibrary := 0;
         ISDllCompileScript := nil;
         ISDllGetVersion := nil;
       end;