[Enh]: CSV - As *Order Preserving* Dictionaries

seandenigris · Nov 8, 2023 · 753b70c · 753b70c
1 parent 0c6ae06
commit 753b70c
Showing 1 changed file with 11 additions and 0 deletions.
diff --git a/src/ResourcesLive/RlCSV.class.st b/src/ResourcesLive/RlCSV.class.st
@@ -24,6 +24,17 @@ RlCSV >> asDictionaries [
 			upToEnd ].
 ]
 
+{ #category : #accessing }
+RlCSV >> asOrderPreservingDictionaries [
+	"Requires a header, the columns of which will become the dictionary keys"
+
+	^ self neoCSVReaderDo: [ :rdr |
+		rdr
+			namedColumnsConfiguration;
+			recordClass: OrderPreservingDictionary;
+			upToEnd ].
+]
+
 { #category : #accessing }
 RlCSV >> dataFrame [
 	^ #DataFrame asClass readFromCsv: self file