Changeset 86 for Generics/TemplateGenerics/Specialized/SpecializedList.pas

Timestamp:

Oct 31, 2010, 9:30:56 PM (14 years ago)

Author:

george

Message:

• Modified: In all files include directive changed to shorter form {$I 'file.inc'}.
• Fixed: Export directory Generic as include dir.

File:

• Generics/TemplateGenerics/Specialized/SpecializedList.pas (modified) (14 diffs)

Generics/TemplateGenerics/Specialized/SpecializedList.pas

@@ -18 +18 @@
 {$DEFINE TGListStringConverter := TListIntegerStringConverter}
 {$DEFINE INTERFACE}
-{$INCLUDE '..\Generic\GenericList.inc'}
+{$I 'GenericList.inc'}
 
 // TListSmallInt<Integer, SmallInt>
@@ -27 +27 @@
 {$DEFINE TGListStringConverter := TListSmallIntStringConverter}
 {$DEFINE INTERFACE}
-{$INCLUDE '..\Generic\GenericList.inc'}
+{$I 'GenericList.inc'}
 
 // TListDouble<Integer, Double>
@@ -45 +45 @@
 {$DEFINE TGListStringConverter := TListPointerStringConverter}
 {$DEFINE INTERFACE}
-{$INCLUDE '..\Generic\GenericList.inc'}
+{$I 'GenericList.inc'}
 
 // TListString<Integer, string>
@@ -54 +54 @@
 {$DEFINE TGListStringConverter := TListStringStringConverter}
 {$DEFINE INTERFACE}
-{$INCLUDE '..\Generic\GenericList.inc'}
+{$I 'GenericList.inc'}
 
 // TListByte<Integer, Byte>
@@ -63 +63 @@
 {$DEFINE TGListStringConverter := TListByteStringConverter}
 {$DEFINE INTERFACE}
-{$INCLUDE '..\Generic\GenericList.inc'}
-
-
+{$I 'GenericList.inc'}
 
 // TListChar<Integer, Char>
@@ -74 +72 @@
 {$DEFINE TGListStringConverter := TListStringConverterChar}
 {$DEFINE INTERFACE}
-{$INCLUDE '..\Generic\GenericList.inc'}
+{$I 'GenericList.inc'}
 
 { TListChar }
@@ -90 +88 @@
 
 {$DEFINE IMPLEMENTATION_USES}
-{$INCLUDE '..\Generic\GenericList.inc'}
+{$I 'GenericList.inc'}
 
 // TListInteger<Integer, Integer>
@@ -99 +97 @@
 {$DEFINE TGListStringConverter:=TListIntegerStringConverter}
 {$DEFINE IMPLEMENTATION}
-{$INCLUDE '..\Generic\GenericList.inc'}
+{$I 'GenericList.inc'}
 
 // TListSmallInt<Integer, SmallInt>
@@ -108 +106 @@
 {$DEFINE TGListStringConverter:=TListSmallIntStringConverter}
 {$DEFINE IMPLEMENTATION}
-{$INCLUDE '..\Generic\GenericList.inc'}
+{$I 'GenericList.inc'}
 
 // TListDouble<Integer, Double>
@@ -117 +115 @@
 {$DEFINE TGListStringConverter := TListDoubleStringConverter}
 {$DEFINE IMPLEMENTATION}
-{$INCLUDE '..\Generic\GenericList.inc'}
+{$I 'GenericList.inc'}
 
 // TListPointer<Integer, Pointer>
@@ -126 +124 @@
 {$DEFINE TGListStringConverter := TListPointerStringConverter}
 {$DEFINE IMPLEMENTATION}
-{$INCLUDE '..\Generic\GenericList.inc'}
+{$I 'GenericList.inc'}
 
 // TListString<Integer, string>
@@ -135 +133 @@
 {$DEFINE TGListStringConverter := TListStringStringConverter}
 {$DEFINE IMPLEMENTATION}
-{$INCLUDE '..\Generic\GenericList.inc'}
+{$I 'GenericList.inc'}
 
 // TListByte<Integer, Byte>
@@ -144 +142 @@
 {$DEFINE TGListStringConverter := TListByteStringConverter}
 {$DEFINE IMPLEMENTATION}
-{$INCLUDE '..\Generic\GenericList.inc'}
+{$I 'GenericList.inc'}
 
 // TListByte<Integer, Char>
@@ -153 +151 @@
 {$DEFINE TGListStringConverter := TListStringConverterChar}
 {$DEFINE IMPLEMENTATION}
-{$INCLUDE '..\Generic\GenericList.inc'}
+{$I 'GenericList.inc'}
 
 { TListChar }