Polymorphy for converting FileDirectory to FSReference

j4yk · j4yk · commit b951d288e790 · 2019-02-24T19:21:07.000+01:00
diff --git a/src/FS-FileDirectory-Adapters.package/FSReference.extension/instance/asFSReference.st b/src/FS-FileDirectory-Adapters.package/FSReference.extension/instance/asFSReference.st
@@ -0,0 +1,3 @@
+*FS-FileDirectory-Adapters-converting
+asFSReference
+	^ self
diff --git a/src/FS-FileDirectory-Adapters.package/FSReference.extension/methodProperties.json b/src/FS-FileDirectory-Adapters.package/FSReference.extension/methodProperties.json
@@ -0,0 +1,5 @@
+{
+	"class" : {
+		 },
+	"instance" : {
+		"asFSReference" : "jr 1/1/2019 16:55" } }
diff --git a/src/FS-FileDirectory-Adapters.package/FSReference.extension/properties.json b/src/FS-FileDirectory-Adapters.package/FSReference.extension/properties.json
@@ -0,0 +1,2 @@
+{
+	"name" : "FSReference" }

Original file line number	Diff line number	Diff line change
`@@ -0,0 +1,3 @@`
	`1`	`+*FS-FileDirectory-Adapters-converting`
	`2`	`+asFSReference`
	`3`	`+ ^ self`