# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1499790317 -7200
# Node ID c6af25dffe8d9adb9d290fafb7bb55ac6479de32
# Parent  73aa16ebc8896b0dc49a1e4a64466d5b2f14a354
#REFACTORING by cg
class: CharacterArray
added: #asPackageId

diff -r 73aa16ebc889 -r c6af25dffe8d CharacterArray.st
--- a/CharacterArray.st	Tue Jul 11 16:14:01 2017 +0200
+++ b/CharacterArray.st	Tue Jul 11 18:25:17 2017 +0200
@@ -345,6 +345,7 @@
     "Created: 3.8.1997 / 18:16:40 / cg"
 ! !
 
+
 !CharacterArray class methodsFor:'cleanup'!
 
 lowSpaceCleanup
@@ -606,6 +607,7 @@
     "
 ! !
 
+
 !CharacterArray class methodsFor:'pattern matching'!
 
 matchEscapeCharacter
@@ -1011,6 +1013,7 @@
     ^ Unicode32String
 ! !
 
+
 !CharacterArray methodsFor:'Compatibility-ANSI'!
 
 addLineDelimiters
@@ -3628,6 +3631,16 @@
     "
 !
 
+asPackageId
+    "given a package-string as receiver, return a packageId object.
+     packageIds hide the details of module/directory handling inside the path.
+     See PackageId for the required format of those strings."
+
+    ^ PackageId from: self string
+
+    "Created: / 11-07-2017 / 18:24:47 / cg"
+!
+
 asSingleByteStringIfPossible
     "if possible, return the receiver converted to a 'normal' string.
      It is only possible, if there are no characters with codePoints above 255 in the receiver.
@@ -4918,6 +4931,8 @@
 ! !
 
 
+
+
 !CharacterArray methodsFor:'matching - glob expressions'!
 
 compoundMatch:aString
@@ -6387,6 +6402,7 @@
     "Modified: 17.4.1997 / 12:50:23 / cg"
 ! !
 
+
 !CharacterArray methodsFor:'special string converting'!
 
 asUnixFilenameString
@@ -7429,6 +7445,7 @@
     "
 ! !
 
+
 !CharacterArray methodsFor:'substring searching'!
 
 findRangeOfString:subString
@@ -8237,6 +8254,7 @@
     ^ aVisitor visitString:self with:aParameter
 ! !
 
+
 !CharacterArray class methodsFor:'documentation'!
 
 version