Browse Source

* Changed use_excepions to useexceptions

michael 27 years ago
parent
commit
6a28735427
2 changed files with 13 additions and 7 deletions
  1. 5 2
      rtl/objpas/math.pp
  2. 8 5
      rtl/objpas/sysutils.pp

+ 5 - 2
rtl/objpas/math.pp

@@ -39,7 +39,7 @@ unit math;
 
   interface
 
-{$ifdef USE_EXCEPIONS}
+{$ifdef USE_EXCEPTIONS}
     uses
        sysutils;
 {$endif}
@@ -614,7 +614,10 @@ end.
 
 {
     $Log$
-    Revision 1.3  1998-09-09 15:29:05  peter
+    Revision 1.4  1998-09-18 23:57:27  michael
+    * Changed use_excepions to useexceptions
+
+    Revision 1.3  1998/09/09 15:29:05  peter
       * removed some warnings
 
     Revision 1.2  1998/07/29 15:44:34  michael

+ 8 - 5
rtl/objpas/sysutils.pp

@@ -46,7 +46,7 @@ interface
           lo,hi : byte;
        end;
 
-{$ifdef USE_EXCEPIONS}
+{$ifdef USE_EXCEPTIONS}
        { exceptions }
        exception = class(tobject)
         private
@@ -71,7 +71,7 @@ interface
        eintoverflow = class(einterror);
 
        ematherror = class(exception);
-{$endif USE_EXCEPIONS}
+{$endif USE_EXCEPTIONS}
 
   { Read date & Time function declarations }
   {$i datih.inc}
@@ -106,7 +106,7 @@ interface
   { Read pchar handling functions implementation }
   {$i syspch.inc}
 
-{$ifdef USE_EXCEPIONS}
+{$ifdef USE_EXCEPTIONS}
     constructor exception.create(const msg : string);
 
       begin
@@ -129,13 +129,16 @@ interface
          inherited create;
          {!!!!!}
       end;
-{$endif USE_EXCEPIONS}
+{$endif USE_EXCEPTIONS}
 
 end.
 
 {
     $Log$
-    Revision 1.7  1998-09-16 14:34:38  pierre
+    Revision 1.8  1998-09-18 23:57:26  michael
+    * Changed use_excepions to useexceptions
+
+    Revision 1.7  1998/09/16 14:34:38  pierre
       * go32v2 did not compile
       * wrong code in systr.inc corrected