Browse Source

* -dlogging no longer required to fuction correctly
* some typo's fixed

Jonas Maebe 26 years ago
parent
commit
5edf8b5488
2 changed files with 20 additions and 9 deletions
  1. 11 4
      rtl/inc/graph/graph.inc
  2. 9 5
      rtl/inc/graph/vesa.inc

+ 11 - 4
rtl/inc/graph/graph.inc

@@ -1732,10 +1732,12 @@ const CrtAddress: word = 0;
 {$endif logging}
      if VGADetected then
        begin
-{$ifdef logging}
          SaveVideoState := SaveStateVGA;
+{$ifdef logging}
          LogLn('Setting VGA SaveVideoState to '+strf(longint(SaveVideoState)));
+{$endif logging}
          RestoreVideoState := RestoreStateVGA;
+{$ifdef logging}
          LogLn('Setting VGA RestoreVideoState to '+strf(longint(RestoreVideoState)));
 {$endif logging}
 
@@ -1925,12 +1927,13 @@ const CrtAddress: word = 0;
          { otherwise, if we use the VGA BIOS only function  }
          { there might be a crash under DPMI, such as in the}
          { ATI Mach64                                       }
-{$ifdef logging}
          SaveVideoState := SaveStateVESA;
+{$ifdef logging}
          LogLn('Setting SaveVideoState to '+strf(longint(SaveVideoState)));
+{$endif logging}
          RestoreVideoState := RestoreStateVESA;
+{$ifdef logging}
          LogLn('Setting RestoreVideoState to '+strf(longint(RestoreVideoState)));
-{$endif logging}
          { now check all supported modes...}
          if SearchVESAModes(m320x200x32k) then
            begin
@@ -2622,7 +2625,11 @@ const CrtAddress: word = 0;
 
 {
 $Log$
-Revision 1.15  1999-09-22 13:13:34  jonas
+Revision 1.16  1999-09-23 14:00:41  jonas
+  * -dlogging no longer required to fuction correctly
+  * some typo's fixed
+
+Revision 1.15  1999/09/22 13:13:34  jonas
   * renamed text.inc -> gtext.inc to avoid conflict with system unit
   * fixed textwidth
   * isgraphmode now gets properly updated, so mode restoring works

+ 9 - 5
rtl/inc/graph/vesa.inc

@@ -837,7 +837,7 @@ end;
                    end;
                  dec(VLength,l+1);
                  {$ifdef logging}
-                 LogLn('Offset is now '+hexstr(offs,8)+', length left: '+strf(hlength));
+                 LogLn('Offset is now '+hexstr(offs,8)+', length left: '+strf(vlength));
                  {$endif logging}
                Until VLength = 0;
              End;
@@ -865,7 +865,7 @@ end;
                    end;
                  dec(VLength,l+1);
                  {$ifdef logging}
-                 LogLn('Offset is now '+hexstr(offs,8)+', length left: '+strf(hlength));
+                 LogLn('Offset is now '+hexstr(offs,8)+', length left: '+strf(vlength));
                  {$endif logging}
                Until VLength = 0;
              End;
@@ -893,7 +893,7 @@ end;
                    end;
                  dec(VLength,l+1);
                  {$ifdef logging}
-                 LogLn('Offset is now '+hexstr(offs,8)+', length left: '+strf(hlength));
+                 LogLn('Offset is now '+hexstr(offs,8)+', length left: '+strf(vlength));
                  {$endif logging}
                Until VLength = 0;
              End;
@@ -921,7 +921,7 @@ end;
                    end;
                  dec(VLength,l+1);
                  {$ifdef logging}
-                 LogLn('Offset is now '+hexstr(offs,8)+', length left: '+strf(hlength));
+                 LogLn('Offset is now '+hexstr(offs,8)+', length left: '+strf(vlength));
                  {$endif logging}
                Until VLength = 0;
              End;
@@ -1921,7 +1921,11 @@ end;
 
 {
 $Log$
-Revision 1.13  1999-09-20 09:34:30  florian
+Revision 1.14  1999-09-23 14:00:42  jonas
+  * -dlogging no longer required to fuction correctly
+  * some typo's fixed
+
+Revision 1.13  1999/09/20 09:34:30  florian
   * conflicts solved
 
 Revision 1.12  1999/09/18 22:21:11  jonas