Browse Source

* the TNewModeInfo record type moved to the implementation part of the graph
unit. It is extremely unlikely that this type was ever used by programs,
because:
1) the newModeInfo structure of this type is in the implementation part of
the unit
2) none of the graph unit procedures and functions use this type either as a
parameter or as a function result

git-svn-id: trunk@25724 -

nickysn 12 years ago
parent
commit
6d1663fdc5
2 changed files with 8 additions and 7 deletions
  1. 8 0
      packages/graph/src/inc/graph.inc
  2. 0 7
      packages/graph/src/inc/graphh.inc

+ 8 - 0
packages/graph/src/inc/graph.inc

@@ -113,6 +113,14 @@ var
   ArcCall: ArcCoordsType;   { Information on the last call to Arc or Ellipse }
   ArcCall: ArcCoordsType;   { Information on the last call to Arc or Ellipse }
 
 
 
 
+type
+  TNewModeInfo = record
+    modeInfo: array[lowNewDriver..highNewDriver] of PModeInfo;
+    loHiModeNr: array[lowNewDriver..highNewDriver] of record
+      lo,hi: smallint;
+    end;
+  end;
+
 var
 var
 
 
   { ******************** HARDWARE INFORMATION ********************* }
   { ******************** HARDWARE INFORMATION ********************* }

+ 0 - 7
packages/graph/src/inc/graphh.inc

@@ -647,13 +647,6 @@ TYPE
       next: PModeInfo;
       next: PModeInfo;
     end;
     end;
 
 
-    TNewModeInfo = record
-      modeInfo: array[lowNewDriver..highNewDriver] of PModeInfo;
-      loHiModeNr: array[lowNewDriver..highNewDriver] of record
-        lo,hi: smallint;
-      end;
-    end;
-
 
 
 
 
 VAR
 VAR