diff --git a/repository/BaselineOfGrease.package/.filetree b/repository/BaselineOfGrease.package/.filetree index 57a67973..8998102c 100644 --- a/repository/BaselineOfGrease.package/.filetree +++ b/repository/BaselineOfGrease.package/.filetree @@ -1,5 +1,4 @@ { - "separateMethodMetaAndSource" : false, "noMethodMetaData" : true, - "useCypressPropertiesFile" : true -} \ No newline at end of file + "separateMethodMetaAndSource" : false, + "useCypressPropertiesFile" : true } diff --git a/repository/BaselineOfGrease.package/BaselineOfGrease.class/instance/baseline..st b/repository/BaselineOfGrease.package/BaselineOfGrease.class/instance/baseline..st index 1b847881..85d1e925 100644 --- a/repository/BaselineOfGrease.package/BaselineOfGrease.class/instance/baseline..st +++ b/repository/BaselineOfGrease.package/BaselineOfGrease.class/instance/baseline..st @@ -17,7 +17,7 @@ baseline: spec group: 'default' with: #('Slime') ]. spec - for: #'squeak5.x' + for: #( #'squeak5.x' ) do: [ spec package: 'Grease-Core' @@ -32,6 +32,22 @@ baseline: spec with: [ spec requires: #('Grease-Tests-Squeak-Core') ]. self slimeForSqueakPharo1xPharo2x: spec ]. + spec + for: #( #'squeak6.x' ) + do: [ + spec + package: 'Grease-Core' + with: [ spec includes: #('Grease-Squeak6-Core') ]; + package: 'Grease-Tests-Core' + with: [ spec requires: #('Grease-Squeak6-Core'); includes: #('Grease-Tests-Squeak-Core' 'Grease-Tests-Squeak6-Core') ]; + package: 'Grease-Squeak6-Core' + with: [ spec requires: #('Grease-Core') ]; + package: 'Grease-Tests-Squeak-Core' + with: [ spec requires: #('Grease-Tests-Core') ]; + package: 'Grease-Tests-Squeak6-Core' + with: [ spec requires: #('Grease-Tests-Squeak-Core') ]. + self slimeForSqueakPharo1xPharo2x: spec ]. + spec for: #'pharo3.x' do: [ diff --git a/repository/BaselineOfGrease.package/BaselineOfGrease.class/methodProperties.json b/repository/BaselineOfGrease.package/BaselineOfGrease.class/methodProperties.json index 65e4b419..bf12b606 100644 --- a/repository/BaselineOfGrease.package/BaselineOfGrease.class/methodProperties.json +++ b/repository/BaselineOfGrease.package/BaselineOfGrease.class/methodProperties.json @@ -2,6 +2,6 @@ "class" : { }, "instance" : { - "baseline:" : "JohanBrichau 7/23/2017 19:28", + "baseline:" : "topa 11/15/2017 17:33", "initializeLatin1ToUtf8Encodings" : "JohanBrichau 10/19/2014 10:00", "slimeForSqueakPharo1xPharo2x:" : "JohanBrichau 02/16/2014 03:49" } } diff --git a/repository/BaselineOfGrease.package/BaselineOfGrease.class/properties.json b/repository/BaselineOfGrease.package/BaselineOfGrease.class/properties.json index 0260395f..8a39c621 100644 --- a/repository/BaselineOfGrease.package/BaselineOfGrease.class/properties.json +++ b/repository/BaselineOfGrease.package/BaselineOfGrease.class/properties.json @@ -1,11 +1,14 @@ { - "commentStamp" : "", - "super" : "BaselineOf", "category" : "BaselineOfGrease", - "classinstvars" : [ ], - "pools" : [ ], - "classvars" : [ ], - "instvars" : [ ], + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "", + "instvars" : [ + ], "name" : "BaselineOfGrease", - "type" : "normal" -} \ No newline at end of file + "pools" : [ + ], + "super" : "BaselineOf", + "type" : "normal" } diff --git a/repository/BaselineOfGrease.package/monticello.meta/categories.st b/repository/BaselineOfGrease.package/monticello.meta/categories.st index 3687f0b2..aad806f8 100644 --- a/repository/BaselineOfGrease.package/monticello.meta/categories.st +++ b/repository/BaselineOfGrease.package/monticello.meta/categories.st @@ -1 +1 @@ -SystemOrganization addCategory: #'BaselineOfGrease'! +SystemOrganization addCategory: #BaselineOfGrease! diff --git a/repository/BaselineOfGrease.package/monticello.meta/version b/repository/BaselineOfGrease.package/monticello.meta/version index 37cb9c7d..e5118db6 100644 --- a/repository/BaselineOfGrease.package/monticello.meta/version +++ b/repository/BaselineOfGrease.package/monticello.meta/version @@ -1,2 +1,2 @@ -(name 'BaselineOfGrease-dkh.1496564072' message 'merged by GitFileTree-MergeDriver' id 'a721b096-25cd-455c-a419-2fac8a9331c7' date '23 July 2017' time '11:33:54.267473 am' author 'dkh' ancestors ((name 'BaselineOfGrease-dkh.19' message 'merged by GitFileTree-MergeDriver' id 'b05179de-cbe6-4b80-824b-f6220d2c9252' date '25 May 2017' time '11:41:41.478907 am' author 'dkh' ancestors ((name 'BaselineOfGrease-dkh.17' message 'eliminate some seaside.gemstone.com references' id '01c1cf6a-4d84-47d2-97f0-b9c4d7fffd58' date '28 February 2017' time '1:54:50 pm' author 'dkh' ancestors ((name 'BaselineOfGrease-dkh.16' message 'merged by GitFileTree-MergeDriver' id '644ab134-dd42-4b9f-948b-c277cd963d5d' date '26 August 2016' time '5:20:50 am' author 'dkh' ancestors ((name 'BaselineOfGrease-dkh.15' message 'merged by GitFileTree-MergeDriver' id '86b6f4f6-f95f-4bd7-9224-f31c5460e354' date '4 April 2016' time '9:40:53 am' author 'dkh' ancestors () stepChildren ())(name 'BaselineOfGrease-dkh.15' message 'merged by GitFileTree-MergeDriver' id '415af41c-2c3d-40a8-9f75-d9e8de921224' date '26 August 2016' time '2:19:29 am' author 'dkh' ancestors ((name 'BaselineOfGrease-dkh.10' message 'update for GemStone 3.4 ...' id 'ad7f9331-d83f-4976-bf57-1d1e81111fc6' date '21 December 2015' time '3:07:11 pm' author 'dkh' ancestors () stepChildren ())(name 'BaselineOfGrease-JohanBrichau.14' message 'Ensure Squeak5 tests package is loaded in Squeak5' id 'abde1bd6-a8d6-45fc-a922-bcf63ec38f03' date '27 February 2016' time '1:47:23 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.13' message 'Forked Grease-Tests-Pharo-Core into Grease-Tests-Squeak5-Core' id '3a01ebbc-8859-45db-ae5a-e5de8073d3a4' date '27 February 2016' time '1:40:18 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.12' message 'added Pharo-Tests to Squeak5 load' id 'ffe11ade-e4f1-496d-ae59-74543cfad134' date '27 February 2016' time '1:21:56 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.11' message 'added pharo5 platform to baseline' id '5c0332e9-ef4c-43cd-9066-7c9fe9ed6506' date '27 February 2016' time '12:12:12 pm' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.10' message 'added squeak 5 platform' id '18f9d568-869f-4550-804a-b0ba101f33f3' date '13 December 2015' time '8:36:25 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-dkh.9' message 'Update baseline for GemStone 3.3' id 'af9364dd-14bc-4e5e-9fc7-0abe08732ab2' date '26 May 2015' time '11:46:07 am' author 'dkh' ancestors ((name 'BaselineOfGrease-JohanBrichau.8' message 'separate package for Squeak' id '91c019c7-2b8b-40c3-97d9-2047a69512a7' date '22 March 2015' time '12:01:37 pm' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.7' message 'included Pharo 4 and did some baseline formatting' id '3722041d-d4b5-4496-a25a-0e891fe9a945' date '8 November 2014' time '9:28:01 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.6' message 'added initializeLatin1ToUtf8Encodings' id '4d976044-1aa9-44b6-bab0-b66ac758b3cd' date '19 October 2014' time '10:05:25 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.6' message 'added initializeLatin1ToUtf8Encodings' id 'b4ac5766-d472-4557-beff-59e5b733bce0' date '19 October 2014' time '10:04:55 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-dkh.5' message 'typoe' id '93eb3230-7956-4a6e-85dc-243f3dd895a1' date '4 June 2014' time '3:13:26 pm' author 'dkh' ancestors ((name 'BaselineOfGrease-dkh.4' message 'woops specified the package branch incorrectly ... I think I got it right this time...' id '3003ee31-9d17-4dd1-9b9a-f8a80e4f0ba1' date '4 June 2014' time '3:12:31 pm' author 'dkh' ancestors ((name 'BaselineOfGrease-dkh.3' message 'add Grease-Tests-GemStone-Core.v32 to baseline' id '26f128ca-b62e-4295-9a58-a9758b670c37' date '4 June 2014' time '2:57:48 pm' author 'dkh' ancestors ((name 'BaselineOfGrease-JohanBrichau.2' message 'forgotten methods' id '38758da9-c922-4530-a19e-f8783900e787' date '16 February 2014' time '3:50:22 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.1' message 'first baseline' id 'b89398df-14c6-4b6a-a2ba-91ad806bb07f' date '16 February 2014' time '1:49:46 am' author 'JohanBrichau' ancestors () stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())(name 'BaselineOfGrease-JohanBrichau.18' message 'Pharo 6 compatibility' id 'd2d614aa-b80c-0d00-b4b6-ae9900bfc9db' date '25 May 2017' time '12:46:04.246978 pm' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.17' message 'Added pharo6' id '52335469-982c-483b-a975-4518820b9bcf' date '25 May 2017' time '11:20:35.004053 am' author 'JohanBrichau' ancestors ((id '644ab134-dd42-4b9f-948b-c277cd963d5d')) stepChildren ())) stepChildren ())) stepChildren ())(name 'BaselineOfGrease-JohanBrichau.1496564071' message 'Fixed dependency of Grease-Tests-Core on the platform packages for GRDynamicVariableTest' id '6dd3612c-6111-0d00-8806-761908c307d1' date '23 July 2017' time '7:29:11.347398 pm' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.1496564070' message '- Removed pharo1.x and 2.x from the baseline since no longer supported. - Fixed dependency of Grease-Tests-Core on the platform packages for GRDynamicVariableTest' id 'd3220dff-6011-0d00-8805-b8f708c307d1' date '23 July 2017' time '7:16:30.82261 pm' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.1496564069' message 'Updated load snippets [ci skip] -' id '26eaf907-cb05-504d-b251-ce1bcf3132ec' date '4 June 2017' time '10:14:29 am' author 'JohanBrichau' ancestors () stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ()) \ No newline at end of file +(name 'BaselineOfGrease-topa.1496564074' message 'Splice out Squeak6' id '1f990177-0195-46d7-b815-43ff320f8900' date '15 November 2017' time '5:36:47.836067 pm' author 'topa' ancestors ((name 'BaselineOfGrease-topa.1496564073' message 'Add Squeak6 (current trunk)' id 'c284dcef-9b71-4069-94b7-a2e8c42b6c0a' date '8 November 2017' time '11:59:28.059517 am' author 'topa' ancestors ((name 'BaselineOfGrease-dkh.1496564072' message 'merged by GitFileTree-MergeDriver' id 'a721b096-25cd-455c-a419-2fac8a9331c7' date '23 July 2017' time '11:33:54.267473 am' author 'dkh' ancestors ((name 'BaselineOfGrease-dkh.19' message 'merged by GitFileTree-MergeDriver' id 'b05179de-cbe6-4b80-824b-f6220d2c9252' date '25 May 2017' time '11:41:41.478907 am' author 'dkh' ancestors ((name 'BaselineOfGrease-dkh.17' message 'eliminate some seaside.gemstone.com references' id '01c1cf6a-4d84-47d2-97f0-b9c4d7fffd58' date '28 February 2017' time '1:54:50 pm' author 'dkh' ancestors ((name 'BaselineOfGrease-dkh.16' message 'merged by GitFileTree-MergeDriver' id '644ab134-dd42-4b9f-948b-c277cd963d5d' date '26 August 2016' time '5:20:50 am' author 'dkh' ancestors ((name 'BaselineOfGrease-dkh.15' message 'merged by GitFileTree-MergeDriver' id '86b6f4f6-f95f-4bd7-9224-f31c5460e354' date '4 April 2016' time '9:40:53 am' author 'dkh' ancestors () stepChildren ())(name 'BaselineOfGrease-dkh.15' message 'merged by GitFileTree-MergeDriver' id '415af41c-2c3d-40a8-9f75-d9e8de921224' date '26 August 2016' time '2:19:29 am' author 'dkh' ancestors ((name 'BaselineOfGrease-dkh.10' message 'update for GemStone 3.4 ...' id 'ad7f9331-d83f-4976-bf57-1d1e81111fc6' date '21 December 2015' time '3:07:11 pm' author 'dkh' ancestors () stepChildren ())(name 'BaselineOfGrease-JohanBrichau.14' message 'Ensure Squeak5 tests package is loaded in Squeak5' id 'abde1bd6-a8d6-45fc-a922-bcf63ec38f03' date '27 February 2016' time '1:47:23 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.13' message 'Forked Grease-Tests-Pharo-Core into Grease-Tests-Squeak5-Core' id '3a01ebbc-8859-45db-ae5a-e5de8073d3a4' date '27 February 2016' time '1:40:18 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.12' message 'added Pharo-Tests to Squeak5 load' id 'ffe11ade-e4f1-496d-ae59-74543cfad134' date '27 February 2016' time '1:21:56 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.11' message 'added pharo5 platform to baseline' id '5c0332e9-ef4c-43cd-9066-7c9fe9ed6506' date '27 February 2016' time '12:12:12 pm' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.10' message 'added squeak 5 platform' id '18f9d568-869f-4550-804a-b0ba101f33f3' date '13 December 2015' time '8:36:25 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-dkh.9' message 'Update baseline for GemStone 3.3' id 'af9364dd-14bc-4e5e-9fc7-0abe08732ab2' date '26 May 2015' time '11:46:07 am' author 'dkh' ancestors ((name 'BaselineOfGrease-JohanBrichau.8' message 'separate package for Squeak' id '91c019c7-2b8b-40c3-97d9-2047a69512a7' date '22 March 2015' time '12:01:37 pm' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.7' message 'included Pharo 4 and did some baseline formatting' id '3722041d-d4b5-4496-a25a-0e891fe9a945' date '8 November 2014' time '9:28:01 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.6' message 'added initializeLatin1ToUtf8Encodings' id '4d976044-1aa9-44b6-bab0-b66ac758b3cd' date '19 October 2014' time '10:05:25 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.6' message 'added initializeLatin1ToUtf8Encodings' id 'b4ac5766-d472-4557-beff-59e5b733bce0' date '19 October 2014' time '10:04:55 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-dkh.5' message 'typoe' id '93eb3230-7956-4a6e-85dc-243f3dd895a1' date '4 June 2014' time '3:13:26 pm' author 'dkh' ancestors ((name 'BaselineOfGrease-dkh.4' message 'woops specified the package branch incorrectly ... I think I got it right this time...' id '3003ee31-9d17-4dd1-9b9a-f8a80e4f0ba1' date '4 June 2014' time '3:12:31 pm' author 'dkh' ancestors ((name 'BaselineOfGrease-dkh.3' message 'add Grease-Tests-GemStone-Core.v32 to baseline' id '26f128ca-b62e-4295-9a58-a9758b670c37' date '4 June 2014' time '2:57:48 pm' author 'dkh' ancestors ((name 'BaselineOfGrease-JohanBrichau.2' message 'forgotten methods' id '38758da9-c922-4530-a19e-f8783900e787' date '16 February 2014' time '3:50:22 am' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.1' message 'first baseline' id 'b89398df-14c6-4b6a-a2ba-91ad806bb07f' date '16 February 2014' time '1:49:46 am' author 'JohanBrichau' ancestors () stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())(name 'BaselineOfGrease-JohanBrichau.18' message 'Pharo 6 compatibility' id 'd2d614aa-b80c-0d00-b4b6-ae9900bfc9db' date '25 May 2017' time '12:46:04.246978 pm' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.17' message 'Added pharo6' id '52335469-982c-483b-a975-4518820b9bcf' date '25 May 2017' time '11:20:35.004053 am' author 'JohanBrichau' ancestors ((id '644ab134-dd42-4b9f-948b-c277cd963d5d')) stepChildren ())) stepChildren ())) stepChildren ())(name 'BaselineOfGrease-JohanBrichau.1496564071' message 'Fixed dependency of Grease-Tests-Core on the platform packages for GRDynamicVariableTest' id '6dd3612c-6111-0d00-8806-761908c307d1' date '23 July 2017' time '7:29:11.347398 pm' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.1496564070' message '- Removed pharo1.x and 2.x from the baseline since no longer supported. - Fixed dependency of Grease-Tests-Core on the platform packages for GRDynamicVariableTest' id 'd3220dff-6011-0d00-8805-b8f708c307d1' date '23 July 2017' time '7:16:30.82261 pm' author 'JohanBrichau' ancestors ((name 'BaselineOfGrease-JohanBrichau.1496564069' message 'Updated load snippets [ci skip] +' id '26eaf907-cb05-504d-b251-ce1bcf3132ec' date '4 June 2017' time '10:14:29 am' author 'JohanBrichau' ancestors () stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ()) \ No newline at end of file diff --git a/repository/BaselineOfGrease.package/properties.json b/repository/BaselineOfGrease.package/properties.json index 6f31cf5a..f037444a 100644 --- a/repository/BaselineOfGrease.package/properties.json +++ b/repository/BaselineOfGrease.package/properties.json @@ -1 +1,2 @@ -{ } \ No newline at end of file +{ + } diff --git a/repository/Grease-Core.package/GRPackage.class/instance/resolveWith..st b/repository/Grease-Core.package/GRPackage.class/instance/resolveWith..st index 21b09d23..f32d4c2a 100644 --- a/repository/Grease-Core.package/GRPackage.class/instance/resolveWith..st +++ b/repository/Grease-Core.package/GRPackage.class/instance/resolveWith..st @@ -19,4 +19,6 @@ resolveWith: aDictionary aDictionary at: (each copyReplaceAll: '-Pharo-' with: '-Squeak-') ifAbsent: [ "try -Squeak5-" aDictionary at: (each copyReplaceAll: '-Pharo-' with: '-Squeak5-') ifAbsent: [ - self error: self name printString , ' depends on unknown package ' , each printString ] ] ] ] ] ] ] ] ] ] \ No newline at end of file + "try -Squeak6-" + aDictionary at: (each copyReplaceAll: '-Pharo-' with: '-Squeak6-') ifAbsent: [ + self error: self name printString , ' depends on unknown package ' , each printString ] ] ] ] ] ] ] ] ] ] ] \ No newline at end of file diff --git a/repository/Grease-Core.package/GRPackage.class/methodProperties.json b/repository/Grease-Core.package/GRPackage.class/methodProperties.json index 784ba29c..1c09356e 100644 --- a/repository/Grease-Core.package/GRPackage.class/methodProperties.json +++ b/repository/Grease-Core.package/GRPackage.class/methodProperties.json @@ -1,29 +1,26 @@ { + "class" : { + "grPackages" : "JohanBrichau 12/15/2013 18:27", + "greaseCore" : "pmm 9/12/2013 16:00" }, "instance" : { + "addDependenciesTo:" : "lr 9/5/2009 18:35", + "addDependency:" : "merged 10/20/2008 09:33", + "allDependencies" : "lr 2/17/2010 15:18", "dependencies" : "jf 3/15/2009 17:00", - "license:" : "obi 10/8/2009 07:51", + "description" : "merged 10/20/2008 09:23", + "description:" : "lr 10/25/2009 11:26", + "greaseUrl" : "pmm 9/12/2013 15:57", "initialize" : "lr 2/17/2010 15:06", + "isLGPL" : "lr 10/25/2009 15:19", + "isMIT" : "lr 10/25/2009 15:19", "license" : "lr 2/10/2010 11:18", + "license:" : "obi 10/8/2009 07:51", "name" : "lr 2/17/2010 15:18", - "description:" : "lr 10/25/2009 11:26", - "seasideUrl" : "pmm 9/12/2013 15:58", - "allDependencies" : "lr 2/17/2010 15:18", - "isLGPL" : "lr 10/25/2009 15:19", - "seasideLGPLUrl" : "pmm 9/12/2013 15:59", - "greaseUrl" : "pmm 9/12/2013 15:57", "name:" : "lr 10/25/2009 11:26", - "description" : "merged 10/20/2008 09:23", + "printOn:" : "merged 10/20/2008 09:24", + "resolveWith:" : "topa 11/15/2017 17:31", "seasideAddonsUrl" : "pmm 9/12/2013 15:59", - "resolveWith:" : "JohanBrichau 5/26/2017 15:56", - "addDependency:" : "merged 10/20/2008 09:33", + "seasideLGPLUrl" : "pmm 9/12/2013 15:59", + "seasideUrl" : "pmm 9/12/2013 15:58", "url" : "lr 2/10/2010 11:18", - "printOn:" : "merged 10/20/2008 09:24", - "addDependenciesTo:" : "lr 9/5/2009 18:35", - "url:" : "lr 2/17/2010 15:18", - "isMIT" : "lr 10/25/2009 15:19" - }, - "class" : { - "greaseCore" : "pmm 9/12/2013 16:00", - "grPackages" : "JohanBrichau 12/15/2013 18:27" - } -} \ No newline at end of file + "url:" : "lr 2/17/2010 15:18" } } diff --git a/repository/Grease-Core.package/GRPackage.class/properties.json b/repository/Grease-Core.package/GRPackage.class/properties.json index 8801d64b..cbe1dc62 100644 --- a/repository/Grease-Core.package/GRPackage.class/properties.json +++ b/repository/Grease-Core.package/GRPackage.class/properties.json @@ -1,17 +1,18 @@ { - "commentStamp" : "pmm 9/14/2013 15:53", - "super" : "GRObject", "category" : "Grease-Core", - "classinstvars" : [ ], - "pools" : [ ], - "classvars" : [ ], + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "pmm 9/14/2013 15:53", "instvars" : [ "name", "description", "dependencies", "license", - "url" - ], + "url" ], "name" : "GRPackage", - "type" : "normal" -} \ No newline at end of file + "pools" : [ + ], + "super" : "GRObject", + "type" : "normal" } diff --git a/repository/Grease-Core.package/GRPlatform.class/methodProperties.json b/repository/Grease-Core.package/GRPlatform.class/methodProperties.json index 61863299..ebf27bf4 100644 --- a/repository/Grease-Core.package/GRPlatform.class/methodProperties.json +++ b/repository/Grease-Core.package/GRPlatform.class/methodProperties.json @@ -1,47 +1,44 @@ { + "class" : { + "current" : "jgf 1/25/2009 12:06", + "current:" : "jf 1/21/2009 17:08", + "select" : "jf 9/30/2009 00:19", + "unselect" : "jf 9/30/2009 00:19" }, "instance" : { - "localNameOf:" : "pmm 8/19/2014 10:10", - "stackDepth" : "jf 1/22/2009 02:11", - "versionString" : "jf 2/9/2010 00:57", - "semaphoreClass" : "jf 1/22/2009 02:10", - "reducedConflictDictionary" : "jf 1/22/2009 02:39", + "addToShutDownList:" : "jf 1/22/2009 02:11", + "addToStartUpList:" : "jf 1/22/2009 02:10", + "asMethodReturningByteArray:named:" : "jf 1/22/2009 02:11", + "base64Decode:" : "pmm 8/27/2011 15:12", + "bindingOf:" : "pmm 8/23/2014 11:42", + "compile:into:classified:" : "jf 1/22/2009 02:11", + "contentsOfFile:binary:" : "jf 1/22/2009 02:11", + "convertToSmalltalkNewlines:" : "lr 4/15/2010 19:15", + "deprecationExceptionSet" : "pmm 9/6/2014 12:17", "directoriesIn:" : "NickAger 3/9/2012 11:29", "doTransaction:" : "lr 7/25/2011 19:51", - "terminateProcess:" : "jf 2/6/2009 16:00", + "ensureExistenceOfFolder:" : "pmm 2/5/2011 09:54", + "fileExists:" : "JohanBrichau 10/3/2014 20:02", + "fileStreamOn:do:binary:" : "JohanBrichau 10/3/2014 20:00", + "filesIn:" : "pmm 2/5/2011 09:54", + "isProcessTerminated:" : "jf 2/6/2009 16:00", + "label" : "jf 2/9/2010 00:57", + "localNameOf:" : "pmm 8/19/2014 10:10", + "newRandom" : "jf 9/25/2009 16:40", + "newline" : "lr 4/15/2010 19:13", "openDebuggerOn:" : "jf 1/22/2009 02:11", - "bindingOf:" : "pmm 8/23/2014 11:42", - "convertToSmalltalkNewlines:" : "lr 4/15/2010 19:15", - "writeCharacterStreamOn:" : "pmm 8/26/2011 09:45", "pathSeparator" : "pmm 2/5/2011 09:53", - "compile:into:classified:" : "jf 1/22/2009 02:11", - "weakDictionaryOfSize:" : "jf 1/22/2009 02:11", - "write:toFile:inFolder:" : "pmm 8/19/2014 10:11", - "base64Decode:" : "pmm 8/27/2011 15:12", + "readWriteByteStream" : "lr 7/25/2011 19:51", + "readWriteCharacterStream" : "lr 7/25/2011 19:51", + "reducedConflictDictionary" : "jf 1/22/2009 02:39", "removeFromShutDownList:" : "jf 1/22/2009 02:11", "removeFromStartUpList:" : "jf 1/22/2009 02:11", - "isProcessTerminated:" : "jf 2/6/2009 16:00", - "label" : "jf 2/9/2010 00:57", - "addToShutDownList:" : "jf 1/22/2009 02:11", - "newRandom" : "jf 9/25/2009 16:40", - "ensureExistenceOfFolder:" : "pmm 2/5/2011 09:54", - "version" : "JohanBrichau 5/25/2017 17:46", - "contentsOfFile:binary:" : "jf 1/22/2009 02:11", - "addToStartUpList:" : "jf 1/22/2009 02:10", "removeSelector:from:" : "jf 1/22/2009 02:11", "secureHashFor:" : "jf 1/22/2009 02:11", - "fileExists:" : "JohanBrichau 10/3/2014 20:02", - "filesIn:" : "pmm 2/5/2011 09:54", - "newline" : "lr 4/15/2010 19:13", - "readWriteCharacterStream" : "lr 7/25/2011 19:51", - "readWriteByteStream" : "lr 7/25/2011 19:51", - "deprecationExceptionSet" : "pmm 9/6/2014 12:17", - "asMethodReturningByteArray:named:" : "jf 1/22/2009 02:11", - "fileStreamOn:do:binary:" : "JohanBrichau 10/3/2014 20:00" - }, - "class" : { - "current" : "jgf 1/25/2009 12:06", - "unselect" : "jf 9/30/2009 00:19", - "current:" : "jf 1/21/2009 17:08", - "select" : "jf 9/30/2009 00:19" - } -} \ No newline at end of file + "semaphoreClass" : "jf 1/22/2009 02:10", + "stackDepth" : "jf 1/22/2009 02:11", + "terminateProcess:" : "jf 2/6/2009 16:00", + "version" : "JohanBrichau 5/25/2017 17:46", + "versionString" : "jf 2/9/2010 00:57", + "weakDictionaryOfSize:" : "jf 1/22/2009 02:11", + "write:toFile:inFolder:" : "pmm 8/19/2014 10:11", + "writeCharacterStreamOn:" : "pmm 8/26/2011 09:45" } } diff --git a/repository/Grease-Core.package/GRPlatform.class/properties.json b/repository/Grease-Core.package/GRPlatform.class/properties.json index 35cf678d..8947cf98 100644 --- a/repository/Grease-Core.package/GRPlatform.class/properties.json +++ b/repository/Grease-Core.package/GRPlatform.class/properties.json @@ -1,13 +1,14 @@ { - "commentStamp" : "jf 2/6/2009 16:05", - "super" : "GRObject", "category" : "Grease-Core", - "classinstvars" : [ ], - "pools" : [ ], + "classinstvars" : [ + ], "classvars" : [ - "Current" - ], - "instvars" : [ ], + "Current" ], + "commentStamp" : "jf 2/6/2009 16:05", + "instvars" : [ + ], "name" : "GRPlatform", - "type" : "normal" -} \ No newline at end of file + "pools" : [ + ], + "super" : "GRObject", + "type" : "normal" } diff --git a/repository/Grease-Core.package/monticello.meta/version b/repository/Grease-Core.package/monticello.meta/version index 52b5fdbb..0d56ba0b 100644 --- a/repository/Grease-Core.package/monticello.meta/version +++ b/repository/Grease-Core.package/monticello.meta/version @@ -1,4 +1,4 @@ -(name 'Grease-Core-pmm.108' message 'merged by GitFileTree-MergeDriver' id 'b20a4dcd-14ee-473d-b3bc-996004075c34' date '25 May 2017' time '2:20:17.202819 pm' author 'pmm' ancestors ((name 'Grease-Core-pmm.107' message '- revert SmallDictionary changes for now' id '32077c22-cc68-4a2f-a7f3-050277bd0b63' date '26 August 2016' time '3:59:50.285037 pm' author 'pmm' ancestors ((name 'Grease-Core-pmm.106' message '- add GRSmallOrderedSet' id 'e7933307-f87d-4929-9a43-ecb800b71ebf' date '25 August 2016' time '3:36:09.938199 pm' author 'pmm' ancestors ((name 'Grease-Core-pmm.105' message '- add new #keysAndAllValuesDo:' id 'b8c3f92f-2bc1-4e13-820b-3fc6c84eb5d8' date '25 August 2016' time '3:23:48.853034 pm' author 'pmm' ancestors ((name 'Grease-Core-pmm.104' message '- fix #greaseInteger +(name 'Grease-Core-topa.109' message 'Add Squeak6 to heurristic.' id 'ff22e846-1f80-4ad6-9587-db8ac931c309' date '15 November 2017' time '5:35:29.81457 pm' author 'topa' ancestors ((name 'Grease-Core-pmm.108' message 'merged by GitFileTree-MergeDriver' id 'b20a4dcd-14ee-473d-b3bc-996004075c34' date '25 May 2017' time '2:20:17.202819 pm' author 'pmm' ancestors ((name 'Grease-Core-pmm.107' message '- revert SmallDictionary changes for now' id '32077c22-cc68-4a2f-a7f3-050277bd0b63' date '26 August 2016' time '3:59:50.285037 pm' author 'pmm' ancestors ((name 'Grease-Core-pmm.106' message '- add GRSmallOrderedSet' id 'e7933307-f87d-4929-9a43-ecb800b71ebf' date '25 August 2016' time '3:36:09.938199 pm' author 'pmm' ancestors ((name 'Grease-Core-pmm.105' message '- add new #keysAndAllValuesDo:' id 'b8c3f92f-2bc1-4e13-820b-3fc6c84eb5d8' date '25 August 2016' time '3:23:48.853034 pm' author 'pmm' ancestors ((name 'Grease-Core-pmm.104' message '- fix #greaseInteger - add GRSmallOrderedSet' id '0cbaaf21-cd1f-4ec9-ae06-b5cd4b9f7d9a' date '25 August 2016' time '2:55:05.659616 pm' author 'pmm' ancestors ((name 'Grease-Core-pmm.103' message '- avoid association allocation in #addAll:' id '0c5392fa-dcef-4126-a29e-0ce5aaaa6ef7' date '25 August 2016' time '12:34:57.088428 pm' author 'pmm' ancestors ((name 'Grease-Core-pmm.102' message '- merge' id '145cda97-94f7-4983-9431-dbb190abaf5e' date '25 August 2016' time '12:22:52.508208 pm' author 'pmm' ancestors ((name 'Grease-Core-pmm.101' message '- lint fixes' id '4fb7fbee-57ad-4a6a-8995-fc771a1b550b' date '25 August 2016' time '11:31:09.647343 am' author 'pmm' ancestors ((name 'Grease-Core-pmm.100' message '- lint fixes' id 'aa8715ac-cb26-48fa-9848-844663b95a0a' date '25 August 2016' time '11:03:09.006107 am' author 'pmm' ancestors ((name 'Grease-Core-pmm.99' message 'Optimize GRSmallDictionary to a single array #875 - https://github.com/SeasideSt/Seaside/issues/875' id 'c93df209-d81b-4162-8f83-6e906d7cc04d' date '22 August 2016' time '12:39:19.148731 pm' author 'pmm' ancestors ((name 'Grease-Core-JohanBrichau.98' message 'Updated the Grease version method (forgot this a year ago... )' id '4b366145-692f-4fc1-a2ae-e67f5a121eb1' date '5 May 2016' time '12:56:41.101881 pm' author 'JohanBrichau' ancestors ((name 'Grease-Core-JohanBrichau.97' message 'Added resolve for Pharo5 in GRPackage resolveWith:' id '868988c3-e68d-41f6-8932-c172c82904fa' date '26 March 2016' time '3:55:55.690691 pm' author 'JohanBrichau' ancestors ((name 'Grease-Core-pmm.96' message '- empty merge commit' id '022a5a23-c294-437c-adc1-9a613ccbd2bb' date '12 July 2015' time '10:28:08 am' author 'pmm' ancestors ((name 'Grease-Core-pmm.95' message '- empty merge commit' id '9a9f3f50-c81b-4ed6-a41a-d0961b92c731' date '12 July 2015' time '10:26:31 am' author 'pmm' ancestors ((name 'Grease-Core-pmm.92' message '#820 Configurations should not hold on to classes' id 'd65501a6-b884-4310-881d-ec25dc7b0002' date '12 July 2015' time '10:23:24 am' author 'pmm' ancestors ((name 'Grease-Core-pmm.91' message '- lint fixes' id '6bbf6f41-4d71-47da-a07e-c7d630cfb445' date '19 August 2014' time '10:34:54 am' author 'pmm' ancestors ((name 'Grease-Core-pmm.90' message '- lint fixes' id '4c1849aa-9f03-4eca-8f9f-f3e98a70e0a3' date '19 August 2014' time '9:37:58 am' author 'pmm' ancestors ((name 'Grease-Core-JohanBrichau.89' message 'forgot the version number again...' id '6d882333-0356-45c9-851f-93312bce0b9e' date '20 July 2014' time '6:04:54.866362 pm' author 'JohanBrichau' ancestors ((name 'Grease-Core-JohanBrichau.88' message 'merged Grease-Core-JohanBrichau.87 and Grease-Core-StephanEggermont.87' id '8fc8f8bd-2317-4460-9abc-70752a9882b6' date '4 July 2014' time '10:54:46.225141 am' author 'JohanBrichau' ancestors ((name 'Grease-Core-JohanBrichau.87' message 'updated the version method' id '1fb6ae91-5efa-4517-bd7e-5a929c7d710f' date '11 June 2014' time '7:46:26.136116 am' author 'JohanBrichau' ancestors ((name 'Grease-Core-JohanBrichau.86' message 'merged Grease-Core-pmm.85 and Grease-Core-JohanBrichau.85' id '405a05a1-2041-4621-8412-9ff4b9842089' date '17 February 2014' time '6:51:26.464341 am' author 'JohanBrichau' ancestors ((name 'Grease-Core-JohanBrichau.85' message 'move GRCountingStream from Pharo-only package to Core' id 'ac4a44c6-5fdf-40b5-844a-eb61bc6cca48' date '16 February 2014' time '9:30:16.525052 pm' author 'JohanBrichau' ancestors ((name 'Grease-Core-pmm.84' message '- fix comment' id 'cfd4a0a1-464c-44f7-9ebf-8cad9f9ad388' date '1 February 2014' time '3:14:07 pm' author 'pmm' ancestors ((name 'Grease-Core-JohanBrichau.83' message 'Rename #packages to #grPackages (triggered to prevent a name collision in Pharo3.0)' id '33554268-7ad1-45f6-a0d9-4d0ed77d68d4' date '15 December 2013' time '6:30:54.565 pm' author 'JohanBrichau' ancestors ((name 'Grease-Core-pmm.82' message 'Issue 770: ScaledDecimal rendering support http://code.google.com/p/seaside/issues/detail?id=770 @@ -46,4 +46,4 @@ GRPlatform>>#directoriesIn: to support recursing sub-directories for file to load into a file library. Fix for: http://code.google.com/p/seaside/issues/detail?id=267' id '364dcb92-0613-4caf-8058-a8c25d65249c' date '9 March 2012' time '2:52:30 pm' author 'NickAger' ancestors ((id '0a3221fb-c5d8-4ce1-b139-0e6dc72481a2')) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())(name 'Grease-Core-pmm.85' message 'Issue 781: Also catch platform deprecation signals -- http://code.google.com/p/seaside/issues/detail?id=781' id '792050f8-aab9-4903-9d9d-64ef14554008' date '16 February 2014' time '11:16:53 pm' author 'pmm' ancestors ((id 'cfd4a0a1-464c-44f7-9ebf-8cad9f9ad388')) stepChildren ())) stepChildren ())) stepChildren ())(name 'Grease-Core-StephanEggermont.87' message 'Added resolve for Pharo4 in GRPackage resolveWith:' id 'fe861b91-7089-436d-98e4-06b764abe7fc' date '2 July 2014' time '7:03:08.283881 pm' author 'StephanEggermont' ancestors ((id '405a05a1-2041-4621-8412-9ff4b9842089')) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())(name 'Grease-Core-JohanBrichau.94' message 'additional file library methods' id '5283728c-3883-45c2-8b4a-0d99c65632ca' date '3 October 2014' time '8:07:43.645747 pm' author 'JohanBrichau' ancestors ((name 'Grease-Core-pmm.93' message 'Issue 827: GRPlatform >> #deprecationExceptionSet should use ExceptionSet' id '7e4068d6-301d-4e9f-a271-332e6c6adf21' date '6 September 2014' time '12:18:17 pm' author 'pmm' ancestors ((name 'Grease-Core-jok.92' message '' id '7e3bfc78-1fb0-8d43-b65f-050e9d1bf700' date '23 August 2014' time '11:02:48.249694 am' author 'jok' ancestors ((id '6bbf6f41-4d71-47da-a07e-c7d630cfb445')) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())(name 'Grease-Core-TravisCI.100' message 'h4x for Squeak' id '4ef84bab-74af-47fc-86ed-bc55367b9d2c' date '23 August 2016' time '11:02:57.719 am' author 'TravisCI' ancestors ((id 'c93df209-d81b-4162-8f83-6e906d7cc04d')) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())(id '4b366145-692f-4fc1-a2ae-e67f5a121eb1')) stepChildren ()) \ No newline at end of file +- http://code.google.com/p/seaside/issues/detail?id=781' id '792050f8-aab9-4903-9d9d-64ef14554008' date '16 February 2014' time '11:16:53 pm' author 'pmm' ancestors ((id 'cfd4a0a1-464c-44f7-9ebf-8cad9f9ad388')) stepChildren ())) stepChildren ())) stepChildren ())(name 'Grease-Core-StephanEggermont.87' message 'Added resolve for Pharo4 in GRPackage resolveWith:' id 'fe861b91-7089-436d-98e4-06b764abe7fc' date '2 July 2014' time '7:03:08.283881 pm' author 'StephanEggermont' ancestors ((id '405a05a1-2041-4621-8412-9ff4b9842089')) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())(name 'Grease-Core-JohanBrichau.94' message 'additional file library methods' id '5283728c-3883-45c2-8b4a-0d99c65632ca' date '3 October 2014' time '8:07:43.645747 pm' author 'JohanBrichau' ancestors ((name 'Grease-Core-pmm.93' message 'Issue 827: GRPlatform >> #deprecationExceptionSet should use ExceptionSet' id '7e4068d6-301d-4e9f-a271-332e6c6adf21' date '6 September 2014' time '12:18:17 pm' author 'pmm' ancestors ((name 'Grease-Core-jok.92' message '' id '7e3bfc78-1fb0-8d43-b65f-050e9d1bf700' date '23 August 2014' time '11:02:48.249694 am' author 'jok' ancestors ((id '6bbf6f41-4d71-47da-a07e-c7d630cfb445')) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())(name 'Grease-Core-TravisCI.100' message 'h4x for Squeak' id '4ef84bab-74af-47fc-86ed-bc55367b9d2c' date '23 August 2016' time '11:02:57.719 am' author 'TravisCI' ancestors ((id 'c93df209-d81b-4162-8f83-6e906d7cc04d')) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())(id '4b366145-692f-4fc1-a2ae-e67f5a121eb1')) stepChildren ())) stepChildren ()) \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/.filetree b/repository/Grease-Squeak6-Core.package/.filetree new file mode 100644 index 00000000..8998102c --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/.filetree @@ -0,0 +1,4 @@ +{ + "noMethodMetaData" : true, + "separateMethodMetaAndSource" : false, + "useCypressPropertiesFile" : true } diff --git a/repository/Grease-Squeak6-Core.package/Behavior.extension/instance/fullName.st b/repository/Grease-Squeak6-Core.package/Behavior.extension/instance/fullName.st new file mode 100644 index 00000000..6e09f0a2 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Behavior.extension/instance/fullName.st @@ -0,0 +1,5 @@ +*grease-squeak6-core +fullName + "In VW, will include the namespace" + + ^ self name \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/Behavior.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/Behavior.extension/methodProperties.json new file mode 100644 index 00000000..fe28fb35 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Behavior.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "fullName" : "lr 7/25/2011 19:45" } } diff --git a/repository/Grease-Squeak6-Core.package/Behavior.extension/properties.json b/repository/Grease-Squeak6-Core.package/Behavior.extension/properties.json new file mode 100644 index 00000000..37061187 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Behavior.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "Behavior" } diff --git a/repository/Grease-Squeak6-Core.package/BlockClosure.extension/instance/fixCallbackTemps.st b/repository/Grease-Squeak6-Core.package/BlockClosure.extension/instance/fixCallbackTemps.st new file mode 100644 index 00000000..f4a0f6b1 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/BlockClosure.extension/instance/fixCallbackTemps.st @@ -0,0 +1,2 @@ +*grease-squeak6-core +fixCallbackTemps \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/BlockClosure.extension/instance/valueWithPossibleArguments..st b/repository/Grease-Squeak6-Core.package/BlockClosure.extension/instance/valueWithPossibleArguments..st new file mode 100644 index 00000000..eec59324 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/BlockClosure.extension/instance/valueWithPossibleArguments..st @@ -0,0 +1,4 @@ +*grease-squeak6-core +valueWithPossibleArguments: anArray + + ^ self valueWithEnoughArguments: anArray \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/BlockClosure.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/BlockClosure.extension/methodProperties.json new file mode 100644 index 00000000..c0579c06 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/BlockClosure.extension/methodProperties.json @@ -0,0 +1,6 @@ +{ + "class" : { + }, + "instance" : { + "fixCallbackTemps" : "lr 4/8/2009 13:33", + "valueWithPossibleArguments:" : "topa 11/15/2017 16:19" } } diff --git a/repository/Grease-Squeak6-Core.package/BlockClosure.extension/properties.json b/repository/Grease-Squeak6-Core.package/BlockClosure.extension/properties.json new file mode 100644 index 00000000..1d6f4884 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/BlockClosure.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "BlockClosure" } diff --git a/repository/Grease-Squeak6-Core.package/ByteArray.extension/instance/greaseString.st b/repository/Grease-Squeak6-Core.package/ByteArray.extension/instance/greaseString.st new file mode 100644 index 00000000..c8affabf --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/ByteArray.extension/instance/greaseString.st @@ -0,0 +1,4 @@ +*grease-squeak6-core +greaseString + "ByteArrays should not automatically be converted to Strings. You should use a GRCodec for this." + ^ self printString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/ByteArray.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/ByteArray.extension/methodProperties.json new file mode 100644 index 00000000..add0c68e --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/ByteArray.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "greaseString" : "jf 9/30/2009 01:10" } } diff --git a/repository/Grease-Squeak6-Core.package/ByteArray.extension/properties.json b/repository/Grease-Squeak6-Core.package/ByteArray.extension/properties.json new file mode 100644 index 00000000..191a2eca --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/ByteArray.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "ByteArray" } diff --git a/repository/Grease-Squeak6-Core.package/Character.extension/instance/greaseInteger.st b/repository/Grease-Squeak6-Core.package/Character.extension/instance/greaseInteger.st new file mode 100644 index 00000000..136d5d0e --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Character.extension/instance/greaseInteger.st @@ -0,0 +1,4 @@ +*grease-squeak6-core +greaseInteger + "Answer an unicode code point of the receiver." + ^ self asUnicode \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/Character.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/Character.extension/methodProperties.json new file mode 100644 index 00000000..8a68c224 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Character.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "greaseInteger" : "topa 11/15/2017 17:25" } } diff --git a/repository/Grease-Squeak6-Core.package/Character.extension/properties.json b/repository/Grease-Squeak6-Core.package/Character.extension/properties.json new file mode 100644 index 00000000..7532e33e --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Character.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "Character" } diff --git a/repository/Grease-Squeak6-Core.package/Collection.extension/instance/any.st b/repository/Grease-Squeak6-Core.package/Collection.extension/instance/any.st new file mode 100644 index 00000000..f0ab3697 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Collection.extension/instance/any.st @@ -0,0 +1,3 @@ +*grease-squeak6-core +any + ^ self anyOne \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/Collection.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/Collection.extension/methodProperties.json new file mode 100644 index 00000000..3196464b --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Collection.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "any" : "jf 2/6/2010 00:41" } } diff --git a/repository/Grease-Squeak6-Core.package/Collection.extension/properties.json b/repository/Grease-Squeak6-Core.package/Collection.extension/properties.json new file mode 100644 index 00000000..93b0dc32 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Collection.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "Collection" } diff --git a/repository/Grease-Squeak6-Core.package/Duration.extension/class/milliseconds..st b/repository/Grease-Squeak6-Core.package/Duration.extension/class/milliseconds..st new file mode 100644 index 00000000..60a65d0c --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Duration.extension/class/milliseconds..st @@ -0,0 +1,3 @@ +*grease-squeak6-core +milliseconds: anInteger + ^ self milliSeconds: anInteger \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/Duration.extension/instance/asMilliseconds.st b/repository/Grease-Squeak6-Core.package/Duration.extension/instance/asMilliseconds.st new file mode 100644 index 00000000..14976605 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Duration.extension/instance/asMilliseconds.st @@ -0,0 +1,3 @@ +*grease-squeak6-core +asMilliseconds + ^ self asMilliSeconds \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/Duration.extension/instance/milliseconds.st b/repository/Grease-Squeak6-Core.package/Duration.extension/instance/milliseconds.st new file mode 100644 index 00000000..2952d5dc --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Duration.extension/instance/milliseconds.st @@ -0,0 +1,3 @@ +*grease-squeak6-core +milliseconds + ^ nanos quo: NanosInMillisecond \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/Duration.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/Duration.extension/methodProperties.json new file mode 100644 index 00000000..018f4c60 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Duration.extension/methodProperties.json @@ -0,0 +1,6 @@ +{ + "class" : { + "milliseconds:" : "jf 2/6/2010 00:12" }, + "instance" : { + "asMilliseconds" : "jf 2/5/2010 23:58", + "milliseconds" : "jf 2/6/2010 00:02" } } diff --git a/repository/Grease-Squeak6-Core.package/Duration.extension/properties.json b/repository/Grease-Squeak6-Core.package/Duration.extension/properties.json new file mode 100644 index 00000000..512e0f01 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Duration.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "Duration" } diff --git a/repository/Grease-Squeak6-Core.package/GRDelegatingStream.extension/instance/greaseNext.putAll.startingAt..st b/repository/Grease-Squeak6-Core.package/GRDelegatingStream.extension/instance/greaseNext.putAll.startingAt..st new file mode 100644 index 00000000..946a8627 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRDelegatingStream.extension/instance/greaseNext.putAll.startingAt..st @@ -0,0 +1,3 @@ +*grease-squeak6-core +greaseNext: anInteger putAll: aCollection startingAt: startIndex + stream greaseNext: anInteger putAll: aCollection startingAt: startIndex \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRDelegatingStream.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/GRDelegatingStream.extension/methodProperties.json new file mode 100644 index 00000000..4dd2cf88 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRDelegatingStream.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "greaseNext:putAll:startingAt:" : "pmm 12/28/2010 22:13" } } diff --git a/repository/Grease-Squeak6-Core.package/GRDelegatingStream.extension/properties.json b/repository/Grease-Squeak6-Core.package/GRDelegatingStream.extension/properties.json new file mode 100644 index 00000000..472cde09 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRDelegatingStream.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "GRDelegatingStream" } diff --git a/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/README.md b/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/README.md new file mode 100644 index 00000000..e69de29b diff --git a/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/class/default.st b/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/class/default.st new file mode 100644 index 00000000..28508572 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/class/default.st @@ -0,0 +1,3 @@ +accessing +default + ^ self defaultValue \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/class/defaultValue.st b/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/class/defaultValue.st new file mode 100644 index 00000000..b0275614 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/class/defaultValue.st @@ -0,0 +1,3 @@ +accessing +defaultValue + ^ nil \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/class/use.during..st b/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/class/use.during..st new file mode 100644 index 00000000..1e03f82f --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/class/use.during..st @@ -0,0 +1,5 @@ +accessing +use: anObject during: aBlock + ^ self + value: anObject + during: aBlock \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/methodProperties.json b/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/methodProperties.json new file mode 100644 index 00000000..07f78ce3 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/methodProperties.json @@ -0,0 +1,7 @@ +{ + "class" : { + "default" : "JB 7/23/2017 19:09", + "defaultValue" : "JB 7/23/2017 19:09", + "use:during:" : "MaxLeske 5/25/2017 15:27" }, + "instance" : { + } } diff --git a/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/properties.json b/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/properties.json new file mode 100644 index 00000000..f57ef2b1 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRDynamicVariable.class/properties.json @@ -0,0 +1,14 @@ +{ + "category" : "Grease-Squeak6-Core", + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "", + "instvars" : [ + ], + "name" : "GRDynamicVariable", + "pools" : [ + ], + "super" : "DynamicVariable", + "type" : "normal" } diff --git a/repository/Grease-Squeak6-Core.package/GRPackage.extension/class/greaseSqueak6Core.st b/repository/Grease-Squeak6-Core.package/GRPackage.extension/class/greaseSqueak6Core.st new file mode 100644 index 00000000..8882e111 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPackage.extension/class/greaseSqueak6Core.st @@ -0,0 +1,7 @@ +*grease-squeak6-core +greaseSqueak6Core + ^ self new + name: 'Grease-Squeak6-Core'; + addDependency: 'Grease-Core'; + url: #greaseUrl; + yourself \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPackage.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/GRPackage.extension/methodProperties.json new file mode 100644 index 00000000..03a126e6 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPackage.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + "greaseSqueak6Core" : "topa 11/15/2017 16:23" }, + "instance" : { + } } diff --git a/repository/Grease-Squeak6-Core.package/GRPackage.extension/properties.json b/repository/Grease-Squeak6-Core.package/GRPackage.extension/properties.json new file mode 100644 index 00000000..dd2faaf0 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPackage.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "GRPackage" } diff --git a/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/README.md b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/README.md new file mode 100644 index 00000000..f25fd5b5 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/README.md @@ -0,0 +1,7 @@ +A GRPharoConverterCodecStream is a WACodec stream around a TextConverter. It is always in text mode. + +Instance Variables + converter: + +converter + - the TextConverter used to do the encoding conversion diff --git a/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/class/on.converter..st b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/class/on.converter..st new file mode 100644 index 00000000..de8cd791 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/class/on.converter..st @@ -0,0 +1,3 @@ +instance creation +on: aStream converter: aConverter + ^ self basicNew initializeOn: aStream converter: aConverter \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/greaseNext.putAll.startingAt..st b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/greaseNext.putAll.startingAt..st new file mode 100644 index 00000000..8321e299 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/greaseNext.putAll.startingAt..st @@ -0,0 +1,3 @@ +streaming +greaseNext: anInteger putAll: aCollection startingAt: startIndex + self nextPutAll: (aCollection copyFrom: startIndex to: startIndex + anInteger - 1) \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/initializeOn.converter..st b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/initializeOn.converter..st new file mode 100644 index 00000000..c380485d --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/initializeOn.converter..st @@ -0,0 +1,4 @@ +initialization +initializeOn: aStream converter: aConverter + self initializeOn: aStream. + converter := aConverter \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/next..st b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/next..st new file mode 100644 index 00000000..ef51837b --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/next..st @@ -0,0 +1,8 @@ +streaming +next: anInteger + | writeStream | + writeStream := WriteStream on: (String new: anInteger). + anInteger timesRepeat: [ + writeStream nextPut: (self next + ifNil: [ ^ writeStream contents ]) ]. + ^ writeStream contents \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/next.st b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/next.st new file mode 100644 index 00000000..eee99a1a --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/next.st @@ -0,0 +1,6 @@ +streaming +next + | character | + character := converter nextFromStream: stream. + ^ character isNil + ifFalse: [ character asCharacter ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/nextPut..st b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/nextPut..st new file mode 100644 index 00000000..e65f56c4 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/nextPut..st @@ -0,0 +1,3 @@ +streaming +nextPut: aCharacter + converter nextPut: aCharacter asCharacter toStream: stream \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/nextPutAll..st b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/nextPutAll..st new file mode 100644 index 00000000..a30c4507 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/instance/nextPutAll..st @@ -0,0 +1,3 @@ +streaming +nextPutAll: aString + aString asString do: [ :each | self nextPut: each ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/methodProperties.json b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/methodProperties.json new file mode 100644 index 00000000..5fe65894 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/methodProperties.json @@ -0,0 +1,10 @@ +{ + "class" : { + "on:converter:" : "pmm 10/30/2010 18:58" }, + "instance" : { + "greaseNext:putAll:startingAt:" : "pmm 12/28/2010 22:12", + "initializeOn:converter:" : "pmm 10/30/2010 18:58", + "next" : "pmm 4/10/2010 13:32", + "next:" : "lr 2/7/2009 12:57", + "nextPut:" : "pmm 4/10/2010 13:30", + "nextPutAll:" : "lr 2/7/2009 12:54" } } diff --git a/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/properties.json b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/properties.json new file mode 100644 index 00000000..5188d099 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoConverterCodecStream.class/properties.json @@ -0,0 +1,14 @@ +{ + "category" : "Grease-Squeak6-Core", + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "pmm 9/14/2013 15:53", + "instvars" : [ + "converter" ], + "name" : "GRPharoConverterCodecStream", + "pools" : [ + ], + "super" : "GRCodecStream", + "type" : "normal" } diff --git a/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/README.md b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/README.md new file mode 100644 index 00000000..e69de29b diff --git a/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/class/basicForEncoding..st b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/class/basicForEncoding..st new file mode 100644 index 00000000..f6b18bd4 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/class/basicForEncoding..st @@ -0,0 +1,5 @@ +private +basicForEncoding: aString + (self supportsEncoding: aString) + ifFalse: [ self unsupportedEncoding: aString ]. + ^ self basicNew initializeWithName: aString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/class/codecs.st b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/class/codecs.st new file mode 100644 index 00000000..1ed0b26a --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/class/codecs.st @@ -0,0 +1,8 @@ +accessing +codecs + ^ (TextConverter allEncodingNames + select: [ :each | + "exclude UFT-8 which is handled by WAUtf8Codec" + self supportsEncoding: each ]) + collect: [ :each | + self basicForEncoding: each greaseString ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/class/supportedEncodingNames.st b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/class/supportedEncodingNames.st new file mode 100644 index 00000000..e6a8ceb0 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/class/supportedEncodingNames.st @@ -0,0 +1,8 @@ +private +supportedEncodingNames + "answers the names of the encodings supported by this class" + + ^ TextConverter allEncodingNames + removeAllFoundIn: GRPharoLatin1Codec supportedEncodingNames; + removeAllFoundIn: UTF8TextConverter encodingNames; + yourself \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/class/supportsEncoding..st b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/class/supportsEncoding..st new file mode 100644 index 00000000..43a27325 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/class/supportsEncoding..st @@ -0,0 +1,4 @@ +testing +supportsEncoding: aString + "Answer whether the the given encoding name is supported." + ^ self supportedEncodingNames includes: aString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/converter.st b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/converter.st new file mode 100644 index 00000000..02b8754b --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/converter.st @@ -0,0 +1,3 @@ +private +converter + ^ TextConverter newForEncoding: self name \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/decoderFor..st b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/decoderFor..st new file mode 100644 index 00000000..be53dfea --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/decoderFor..st @@ -0,0 +1,3 @@ +conversion +decoderFor: aStream + ^ self encoderFor: aStream \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/encoderFor..st b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/encoderFor..st new file mode 100644 index 00000000..94f2fc13 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/encoderFor..st @@ -0,0 +1,5 @@ +conversion +encoderFor: aStream + ^ GRPharoConverterCodecStream + on: aStream + converter: self converter \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/initializeWithName..st b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/initializeWithName..st new file mode 100644 index 00000000..fe95783c --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/initializeWithName..st @@ -0,0 +1,7 @@ +initialization +initializeWithName: aString + self initialize. + name := aString. + urlCodec := (#('iso-8859-15' 'cp-1252') includes: aString) + ifFalse: [ GRCodec forEncoding: 'utf-8' ] + ifTrue: [ self ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/name.st b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/name.st new file mode 100644 index 00000000..22077c20 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/name.st @@ -0,0 +1,3 @@ +accessing +name + ^ name \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/url.st b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/url.st new file mode 100644 index 00000000..232ad239 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/instance/url.st @@ -0,0 +1,5 @@ +accessing +url + "RFC 3986: When a new URI scheme defines a component that represents textual data consisting of characters from the Universal Character Set [UCS], the data should first be encoded as octets according to the UTF-8 character encoding." + + ^ urlCodec \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/methodProperties.json b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/methodProperties.json new file mode 100644 index 00000000..5a10058b --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/methodProperties.json @@ -0,0 +1,13 @@ +{ + "class" : { + "basicForEncoding:" : "pmm 6/28/2009 15:43", + "codecs" : "pmm 8/19/2014 10:04", + "supportedEncodingNames" : "lr 7/25/2011 19:46", + "supportsEncoding:" : "pmm 6/28/2009 16:43" }, + "instance" : { + "converter" : "lr 7/25/2011 19:51", + "decoderFor:" : "lr 2/7/2009 12:52", + "encoderFor:" : "jf 9/30/2009 00:46", + "initializeWithName:" : "pmm 8/16/2010 11:52", + "name" : "lr 2/7/2009 10:16", + "url" : "lr 2/7/2009 12:36" } } diff --git a/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/properties.json b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/properties.json new file mode 100644 index 00000000..ed667ed9 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoGenericCodec.class/properties.json @@ -0,0 +1,15 @@ +{ + "category" : "Grease-Squeak6-Core", + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "", + "instvars" : [ + "name", + "urlCodec" ], + "name" : "GRPharoGenericCodec", + "pools" : [ + ], + "super" : "GRCodec", + "type" : "normal" } diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/README.md b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/README.md new file mode 100644 index 00000000..3f437d62 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/README.md @@ -0,0 +1 @@ +A GRPharoLatin1Codec is a WACodec optimized for ISO-8859-1 (direct byte to character mapping). \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/class/basicForEncoding..st b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/class/basicForEncoding..st new file mode 100644 index 00000000..f6b18bd4 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/class/basicForEncoding..st @@ -0,0 +1,5 @@ +private +basicForEncoding: aString + (self supportsEncoding: aString) + ifFalse: [ self unsupportedEncoding: aString ]. + ^ self basicNew initializeWithName: aString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/class/codecs.st b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/class/codecs.st new file mode 100644 index 00000000..7a96b703 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/class/codecs.st @@ -0,0 +1,3 @@ +accessing +codecs + ^ Array with: (self basicForEncoding: 'iso-8859-1') \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/class/supportedEncodingNames.st b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/class/supportedEncodingNames.st new file mode 100644 index 00000000..e5dca068 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/class/supportedEncodingNames.st @@ -0,0 +1,3 @@ +private +supportedEncodingNames + ^ #('iso-8859-1' 'ISO-8859-1' 'latin-1' 'latin1') \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/class/supportsEncoding..st b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/class/supportsEncoding..st new file mode 100644 index 00000000..43a27325 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/class/supportsEncoding..st @@ -0,0 +1,4 @@ +testing +supportsEncoding: aString + "Answer whether the the given encoding name is supported." + ^ self supportedEncodingNames includes: aString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/decode..st b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/decode..st new file mode 100644 index 00000000..74b1f7bd --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/decode..st @@ -0,0 +1,5 @@ +conversion +decode: aStringOrByteArray + "Overridden for efficiency." + + ^ aStringOrByteArray asString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/decoderFor..st b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/decoderFor..st new file mode 100644 index 00000000..256dbac4 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/decoderFor..st @@ -0,0 +1,4 @@ +conversion +decoderFor: aReadStream + "wrap to avoid String vs ByteArray issues" + ^ GRPharoLatin1CodecStream on: aReadStream \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/encoderFor..st b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/encoderFor..st new file mode 100644 index 00000000..20102849 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/encoderFor..st @@ -0,0 +1,4 @@ +conversion +encoderFor: aWriteStream + "wrap to avoid String vs ByteArray issues" + ^ GRPharoLatin1CodecStream on: aWriteStream \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/initializeWithName..st b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/initializeWithName..st new file mode 100644 index 00000000..b0256973 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/initializeWithName..st @@ -0,0 +1,4 @@ +initialization +initializeWithName: aString + self initialize. + name := aString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/name.st b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/name.st new file mode 100644 index 00000000..22077c20 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/instance/name.st @@ -0,0 +1,3 @@ +accessing +name + ^ name \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/methodProperties.json b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/methodProperties.json new file mode 100644 index 00000000..92c046e8 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/methodProperties.json @@ -0,0 +1,12 @@ +{ + "class" : { + "basicForEncoding:" : "pmm 8/16/2010 00:36", + "codecs" : "lr 7/25/2011 19:46", + "supportedEncodingNames" : "lr 7/25/2011 19:46", + "supportsEncoding:" : "pmm 8/16/2010 00:36" }, + "instance" : { + "decode:" : "pmm 8/19/2014 10:00", + "decoderFor:" : "pmm 8/16/2010 00:32", + "encoderFor:" : "pmm 8/16/2010 00:32", + "initializeWithName:" : "pmm 9/1/2012 15:32", + "name" : "pmm 8/16/2010 00:32" } } diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/properties.json b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/properties.json new file mode 100644 index 00000000..2bba6f1e --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1Codec.class/properties.json @@ -0,0 +1,14 @@ +{ + "category" : "Grease-Squeak6-Core", + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "", + "instvars" : [ + "name" ], + "name" : "GRPharoLatin1Codec", + "pools" : [ + ], + "super" : "GRNullCodec", + "type" : "normal" } diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/README.md b/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/README.md new file mode 100644 index 00000000..e1c2471b --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/README.md @@ -0,0 +1 @@ +A GRPharoLatin1CodecStream is a WACodecStream optimized for ISO-8859-1 (direct byte to character mapping). \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/instance/next..st b/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/instance/next..st new file mode 100644 index 00000000..a734bc76 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/instance/next..st @@ -0,0 +1,3 @@ +streaming +next: anInteger + ^ (stream next: anInteger) asString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/instance/next.st b/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/instance/next.st new file mode 100644 index 00000000..766a570d --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/instance/next.st @@ -0,0 +1,3 @@ +streaming +next + ^ Character codePoint: stream next \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/methodProperties.json b/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/methodProperties.json new file mode 100644 index 00000000..c3e59bc2 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/methodProperties.json @@ -0,0 +1,6 @@ +{ + "class" : { + }, + "instance" : { + "next" : "pmm 9/14/2013 09:50", + "next:" : "lr 7/25/2011 19:50" } } diff --git a/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/properties.json b/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/properties.json new file mode 100644 index 00000000..bdc575a0 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoLatin1CodecStream.class/properties.json @@ -0,0 +1,14 @@ +{ + "category" : "Grease-Squeak6-Core", + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "", + "instvars" : [ + ], + "name" : "GRPharoLatin1CodecStream", + "pools" : [ + ], + "super" : "GRNullCodecStream", + "type" : "normal" } diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/README.md b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/README.md new file mode 100644 index 00000000..e71bb46d --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/README.md @@ -0,0 +1 @@ +A GRPharoPlatform is the Pharo implementation of GRPlatform, the Grease class that provides functionality that can not be implemented in a platform independent way. diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/class/initialize.st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/class/initialize.st new file mode 100644 index 00000000..0c86564c --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/class/initialize.st @@ -0,0 +1,5 @@ +class initialization +initialize + self initializeXmlTable. + self initializeUrlTable. + self select \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/class/initializeUrlTable.st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/class/initializeUrlTable.st new file mode 100644 index 00000000..9abf56b7 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/class/initializeUrlTable.st @@ -0,0 +1,7 @@ +class initialization +initializeUrlTable + UrlTable := ByteArray new: 256. + 1 to: 256 do: [ :index | + ('ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-_.~' includes: (Character codePoint: index - 1)) + ifTrue: [ UrlTable at: index put: 0 ] + ifFalse: [ UrlTable at: index put: 1 ] ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/class/initializeXmlTable.st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/class/initializeXmlTable.st new file mode 100644 index 00000000..830a5595 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/class/initializeXmlTable.st @@ -0,0 +1,7 @@ +class initialization +initializeXmlTable + XmlTable := ByteArray new: 256. + 1 to: 256 do: [ :index | + ('"<&>' includes: (Character codePoint: index - 1)) + ifTrue: [ XmlTable at: index put: 1 ] + ifFalse: [ XmlTable at: index put: 0 ] ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/class/unload.st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/class/unload.st new file mode 100644 index 00000000..4c8dd650 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/class/unload.st @@ -0,0 +1,3 @@ +class initialization +unload + self unselect \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/addToShutDownList..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/addToShutDownList..st new file mode 100644 index 00000000..f8d3ad5f --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/addToShutDownList..st @@ -0,0 +1,5 @@ +startup +addToShutDownList: anObject + "Add anObject to the shutdown-list of the system. On shutdown the message #shutDown will be sent to anObject." + + Smalltalk addToShutDownList: anObject \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/addToStartUpList..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/addToStartUpList..st new file mode 100644 index 00000000..ecbbe65e --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/addToStartUpList..st @@ -0,0 +1,5 @@ +startup +addToStartUpList: anObject + "Add anObject to the startup-list of the system. On startup the message #startUp will be sent to anObject." + + Smalltalk addToStartUpList: anObject \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/asMethodReturningByteArray.named..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/asMethodReturningByteArray.named..st new file mode 100644 index 00000000..ba4a0727 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/asMethodReturningByteArray.named..st @@ -0,0 +1,6 @@ +file library +asMethodReturningByteArray: aByteArrayOrString named: aSymbol + "Generates the source of a method named aSymbol that returns aByteArrayOrString as a ByteArray" + ^ self useByteArrayLiterals + ifTrue: [ self asMethodReturningByteArrayLiteral: aByteArrayOrString named: aSymbol ] + ifFalse: [ self asMethodReturningByteArrayWithCache: aByteArrayOrString named: aSymbol ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/asMethodReturningByteArrayLiteral.named..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/asMethodReturningByteArrayLiteral.named..st new file mode 100644 index 00000000..90bb405c --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/asMethodReturningByteArrayLiteral.named..st @@ -0,0 +1,10 @@ +private-file library +asMethodReturningByteArrayLiteral: aByteArrayOrString named: aSymbol + "Generates the source of a method named aSymbol that returns aByteArrayOrString as a byte array using VW/NewCompiler byte array literal syntax." + ^ String streamContents: [ :stream | + stream nextPutAll: aSymbol; nextPut: Character cr. + stream tab; nextPutAll: '^ #['. + aByteArrayOrString asByteArray + do: [ :each | each printOn: stream ] + separatedBy: [ stream space ]. + stream nextPutAll: ']' ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/asMethodReturningByteArrayWithCache.named..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/asMethodReturningByteArrayWithCache.named..st new file mode 100644 index 00000000..a1f9fe07 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/asMethodReturningByteArrayWithCache.named..st @@ -0,0 +1,10 @@ +private-file library +asMethodReturningByteArrayWithCache: aByteArrayOrString named: aSymbol + "Generates the source of a method named aSymbol that returns aByteArrayOrString as a byte array and caching this array in a literal array of size 1." + ^ String streamContents: [ :stream | + stream nextPutAll: aSymbol; nextPut: Character cr. + stream tab; nextPutAll: '^ #('. + aByteArrayOrString asByteArray + do: [ :each | each printOn: stream ] + separatedBy: [ stream space ]. + stream nextPutAll: ') asByteArray' ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/base64Decode..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/base64Decode..st new file mode 100644 index 00000000..382a7f83 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/base64Decode..st @@ -0,0 +1,3 @@ +encoding +base64Decode: aString + ^ (Base64MimeConverter mimeDecodeToChars: aString readStream) contents \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/bindingOf..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/bindingOf..st new file mode 100644 index 00000000..2c8a9b8d --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/bindingOf..st @@ -0,0 +1,4 @@ +bindings +bindingOf: aClass + "theoretically consider the environment of a class" + ^ aClass binding \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/compile.into.classified..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/compile.into.classified..st new file mode 100644 index 00000000..7fde3ad8 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/compile.into.classified..st @@ -0,0 +1,31 @@ +file library +compile: aString into: aClass classified: aSymbol + "The trick here is to be as silently a possible so that the package is not marked dirty when running WAFileLibrary test. + This also makes running tests much faster." + | methodNode compiledMethod selector methodAndNode | + methodNode := aClass compilerClass new + compile: aString + in: aClass + notifying: nil + ifFail: [ GRError signal: 'syntax error' ]. + selector := methodNode selector. + methodAndNode := CompiledMethodWithNode + generateMethodFromNode: methodNode + trailer: aClass defaultMethodTrailer. + compiledMethod := methodAndNode method. + compiledMethod + putSource: aString + fromParseNode: methodAndNode node + inFile: 2 + withPreamble: [ :file | + aClass + printCategoryChunk: aSymbol asString + on: file priorMethod: (aClass compiledMethodAt: selector ifAbsent: [ nil ]). + file cr ]. + aClass + addSelectorSilently: selector + withMethod: compiledMethod. + SystemChangeNotifier uniqueInstance doSilently: [ + aClass organization + classify: selector + under: aSymbol ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/contentsOfFile.binary..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/contentsOfFile.binary..st new file mode 100644 index 00000000..e9f9d30b --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/contentsOfFile.binary..st @@ -0,0 +1,12 @@ +file library +contentsOfFile: aString binary: aBoolean + | stream | + stream := aBoolean + ifTrue: [ (FileDirectory default oldFileNamed: aString) + binary; + yourself ] + ifFalse: [ (MultiByteFileStream oldFileNamed: aString) + ascii; + wantsLineEndConversion: true; + yourself ]. + ^ [ stream contents ] ensure: [ stream close ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/deprecationExceptionSet.st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/deprecationExceptionSet.st new file mode 100644 index 00000000..bb22f36e --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/deprecationExceptionSet.st @@ -0,0 +1,3 @@ +exceptions +deprecationExceptionSet + ^ Deprecation \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/directoriesIn..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/directoriesIn..st new file mode 100644 index 00000000..3357dd27 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/directoriesIn..st @@ -0,0 +1,9 @@ +file library +directoriesIn: aPathString + "Answer a collection of absolute paths for all the directories (no files) in the directory given by aPathString + must not include directory names that start with ." + | directory | + directory := FileDirectory default directoryNamed: aPathString. + ^ (directory directoryNames + reject: [ :each | each first = $. ]) + collect: [ :each | directory fullNameFor: each ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/doSilently..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/doSilently..st new file mode 100644 index 00000000..2a887759 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/doSilently..st @@ -0,0 +1,3 @@ +private +doSilently: aBlock + ^ SystemChangeNotifier uniqueInstance doSilently: aBlock \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/ensureExistenceOfFolder..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/ensureExistenceOfFolder..st new file mode 100644 index 00000000..27973d2b --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/ensureExistenceOfFolder..st @@ -0,0 +1,4 @@ +file library +ensureExistenceOfFolder: aString + "creates a folder named aString in the image directory" + FileDirectory default assureExistenceOfPath: aString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/fileExists..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/fileExists..st new file mode 100644 index 00000000..d558068e --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/fileExists..st @@ -0,0 +1,3 @@ +file library +fileExists: aString + ^ (FileDirectory on: aString) exists \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/fileStreamOn.do.binary..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/fileStreamOn.do.binary..st new file mode 100644 index 00000000..1aad81ef --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/fileStreamOn.do.binary..st @@ -0,0 +1,13 @@ +file library +fileStreamOn: aString do: aBlock binary: aBoolean + ^ aBoolean + ifTrue: [ + FileStream oldFileNamed: aString do: [ :stream | + stream binary. + aBlock value: stream ] ] + ifFalse: [ + MultiByteFileStream oldFileNamed: aString do: [ :stream | + stream + ascii; + wantsLineEndConversion: true. + aBlock value: stream ] ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/filesIn..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/filesIn..st new file mode 100644 index 00000000..89667dbc --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/filesIn..st @@ -0,0 +1,9 @@ +file library +filesIn: aPathString + "Return a collection of absolute paths for all the files (no directories) in the directory given by aPathString + must not include file names that start with ." + | directory | + directory := FileDirectory default directoryNamed: aPathString. + ^ (directory fileNames + reject: [ :each | each first = $. ]) + collect: [ :each | directory fullNameFor: each ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/isProcessTerminated..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/isProcessTerminated..st new file mode 100644 index 00000000..03b50778 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/isProcessTerminated..st @@ -0,0 +1,4 @@ +processes +isProcessTerminated: aProcess + "Return a boolean indicating whether aProcess has been terminated." + ^ aProcess isTerminated \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/label.st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/label.st new file mode 100644 index 00000000..f3b036e2 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/label.st @@ -0,0 +1,3 @@ +version info +label + ^ 'Pharo' \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/localNameOf..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/localNameOf..st new file mode 100644 index 00000000..f943c14d --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/localNameOf..st @@ -0,0 +1,3 @@ +file library +localNameOf: aFilename + ^ (FileDirectory on: aFilename) localName \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/newRandom.st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/newRandom.st new file mode 100644 index 00000000..c77d4481 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/newRandom.st @@ -0,0 +1,10 @@ +factory +newRandom + "Answers the random number generator to be used to create session and continuation keys. Make sure it is seeded. They only methods that will be sent to it are: + #nextInt: - should answer a random integer in the interval [1, anInteger] + #randomFrom: - should answer a random element from the given collection + + Make sure that both methods are safe under heavy concurrent load. + + Used by Gemstone/S traditional Randoms which cannot be persisted.." + ^ ThreadSafeRandom value \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/newline.st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/newline.st new file mode 100644 index 00000000..f3752602 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/newline.st @@ -0,0 +1,3 @@ +file library +newline + ^ String with: Character cr \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/openDebuggerOn..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/openDebuggerOn..st new file mode 100644 index 00000000..b98446f9 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/openDebuggerOn..st @@ -0,0 +1,18 @@ +exceptions +openDebuggerOn: anError + | process | + process := Processor activeProcess. + "If we are running in the UI process, we don't want to suspend the active process. The + error was presumably triggered while stepping in the Debugger. If we simply immediately + signal an UnhandledError, the debugger will catch this and display the signaling context. + It isn't perfect or pretty but it works." + (ProcessBrowser isUIProcess: process) + ifTrue: [ + UnhandledError signalForException: anError ] + ifFalse: [ + WorldState addDeferredUIMessage: [ + process + debug: anError signalerContext + title: anError description + full: true ]. + process suspend ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/pathSeparator.st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/pathSeparator.st new file mode 100644 index 00000000..b9a34e3d --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/pathSeparator.st @@ -0,0 +1,3 @@ +file library +pathSeparator + ^ FileDirectory pathNameDelimiter asString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/readWriteByteStream.st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/readWriteByteStream.st new file mode 100644 index 00000000..35251d7b --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/readWriteByteStream.st @@ -0,0 +1,5 @@ +factory +readWriteByteStream + "ByteArray based read write stream" + + ^ RWBinaryOrTextStream on: (ByteArray new: 4096) \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/readWriteCharacterStream.st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/readWriteCharacterStream.st new file mode 100644 index 00000000..3f94c5af --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/readWriteCharacterStream.st @@ -0,0 +1,5 @@ +factory +readWriteCharacterStream + "String based read write stream" + + ^ ReadWriteStream on: (String new: 4096) \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/removeFromShutDownList..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/removeFromShutDownList..st new file mode 100644 index 00000000..09cc5c70 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/removeFromShutDownList..st @@ -0,0 +1,5 @@ +startup +removeFromShutDownList: anObject + "Remove anObject from the shutdown list in the system." + + Smalltalk removeFromShutDownList: anObject \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/removeFromStartUpList..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/removeFromStartUpList..st new file mode 100644 index 00000000..ecd7d527 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/removeFromStartUpList..st @@ -0,0 +1,5 @@ +startup +removeFromStartUpList: anObject + "Remove anObject from the startup list in the system." + + Smalltalk removeFromStartUpList: anObject \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/removeSelector.from..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/removeSelector.from..st new file mode 100644 index 00000000..f9541b7e --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/removeSelector.from..st @@ -0,0 +1,3 @@ +file library +removeSelector: aSymbol from: aClass + aClass removeSelectorSilently: aSymbol \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/secureHashFor..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/secureHashFor..st new file mode 100644 index 00000000..b0c1e2b2 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/secureHashFor..st @@ -0,0 +1,3 @@ +cryptography +secureHashFor: aString + ^ SecureHashAlgorithm new hashMessage: aString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/semaphoreClass.st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/semaphoreClass.st new file mode 100644 index 00000000..ceccf9e3 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/semaphoreClass.st @@ -0,0 +1,4 @@ +factory +semaphoreClass + "used by Gemstone/S traditional Semaphores which cannot be persisted" + ^ Semaphore \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/stackDepth.st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/stackDepth.st new file mode 100644 index 00000000..d7e6feab --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/stackDepth.st @@ -0,0 +1,10 @@ +exceptions +stackDepth + + | depth current | + depth := 0. + current := thisContext. + [ current isNil ] whileFalse: [ + current := current sender. + depth := depth + 1 ]. + ^ depth - 1 \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/terminateProcess..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/terminateProcess..st new file mode 100644 index 00000000..a09b96e1 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/terminateProcess..st @@ -0,0 +1,4 @@ +processes +terminateProcess: aProcess + "Permanently terminate the process, unwinding first to execute #ensure: and #ifCurtailed: blocks." + aProcess terminate \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/useByteArrayLiterals.st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/useByteArrayLiterals.st new file mode 100644 index 00000000..f65fb83a --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/useByteArrayLiterals.st @@ -0,0 +1,11 @@ +private-file library +useByteArrayLiterals + "whether ByteArray literals can/should be used" + | hasSettings | + hasSettings := Smalltalk at: #PragmaSetting ifAbsent: [ nil ]. + ^ hasSettings isNil + ifTrue: [ + (Smalltalk at: #Preferences) + valueOfFlag: #compileUseNewCompiler + ifAbsent: [ false ] ] + ifFalse: [ false ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/weakDictionaryOfSize..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/weakDictionaryOfSize..st new file mode 100644 index 00000000..b0ca3d82 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/weakDictionaryOfSize..st @@ -0,0 +1,3 @@ +factory +weakDictionaryOfSize: aNumber + ^ IdentityDictionary new: aNumber \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/write.toFile.inFolder..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/write.toFile.inFolder..st new file mode 100644 index 00000000..9565ae8b --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/write.toFile.inFolder..st @@ -0,0 +1,15 @@ +file library +write: aStringOrByteArray toFile: aFileNameString inFolder: aFolderString + "writes aStringOrByteArray to a file named aFileNameString in the folder aFolderString" + | folder stream fullFilePath | + folder := FileDirectory default directoryNamed: aFolderString. + fullFilePath := folder fullNameFor: aFileNameString. + stream := aStringOrByteArray isString + ifTrue: [ + (MultiByteFileStream forceNewFileNamed: fullFilePath) + ascii; + wantsLineEndConversion: true; + yourself ] + ifFalse: [ (FileStream forceNewFileNamed: fullFilePath) binary ]. + [ stream nextPutAll: aStringOrByteArray ] + ensure: [ stream close ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/writeCharacterStreamOn..st b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/writeCharacterStreamOn..st new file mode 100644 index 00000000..d69ff426 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/instance/writeCharacterStreamOn..st @@ -0,0 +1,4 @@ +factory +writeCharacterStreamOn: aString + + ^ GRWorkingWriteStream on: aString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/methodProperties.json b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/methodProperties.json new file mode 100644 index 00000000..d141ead2 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/methodProperties.json @@ -0,0 +1,43 @@ +{ + "class" : { + "initialize" : "pmm 5/20/2010 11:49", + "initializeUrlTable" : "pmm 5/20/2010 20:56", + "initializeXmlTable" : "pmm 5/20/2010 20:56", + "unload" : "jf 1/22/2009 02:45" }, + "instance" : { + "addToShutDownList:" : "jf 1/21/2009 17:31", + "addToStartUpList:" : "jf 1/21/2009 17:31", + "asMethodReturningByteArray:named:" : "lr 7/25/2011 19:51", + "asMethodReturningByteArrayLiteral:named:" : "lr 7/25/2011 19:51", + "asMethodReturningByteArrayWithCache:named:" : "pmm 2/20/2009 17:44", + "base64Decode:" : "jf 1/21/2009 17:31", + "bindingOf:" : "pmm 8/23/2014 11:42", + "compile:into:classified:" : "pmm 8/13/2010 11:52", + "contentsOfFile:binary:" : "lr 7/25/2011 19:51", + "deprecationExceptionSet" : "pmm 2/16/2014 23:12", + "directoriesIn:" : "NickAger 3/9/2012 11:33", + "doSilently:" : "JohanBrichau 9/10/2013 11:39", + "ensureExistenceOfFolder:" : "jf 1/21/2009 17:31", + "fileExists:" : "pmm 7/16/2015 16:36", + "fileStreamOn:do:binary:" : "pmm 7/16/2015 16:39", + "filesIn:" : "lr 7/25/2011 19:51", + "isProcessTerminated:" : "jf 2/6/2009 15:58", + "label" : "jf 2/9/2010 00:56", + "localNameOf:" : "lr 7/25/2011 19:51", + "newRandom" : "topa 11/15/2017 17:12", + "newline" : "pmm 9/14/2013 09:56", + "openDebuggerOn:" : "pmm 1/22/2012 16:31", + "pathSeparator" : "pmm 2/5/2011 09:52", + "readWriteByteStream" : "lr 11/20/2011 17:16", + "readWriteCharacterStream" : "dkh 9/4/2009 09:14", + "removeFromShutDownList:" : "jf 1/21/2009 17:31", + "removeFromStartUpList:" : "jf 1/21/2009 17:31", + "removeSelector:from:" : "jf 1/21/2009 17:31", + "secureHashFor:" : "jf 1/21/2009 17:31", + "semaphoreClass" : "lr 7/25/2011 19:51", + "stackDepth" : "jf 1/21/2009 17:31", + "terminateProcess:" : "jf 2/6/2009 15:59", + "useByteArrayLiterals" : "pmm 2/11/2011 07:27", + "weakDictionaryOfSize:" : "lr 7/25/2011 19:51", + "write:toFile:inFolder:" : "pmm 8/19/2014 10:11", + "writeCharacterStreamOn:" : "pmm 8/26/2011 09:45" } } diff --git a/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/properties.json b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/properties.json new file mode 100644 index 00000000..2094c89e --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoPlatform.class/properties.json @@ -0,0 +1,15 @@ +{ + "category" : "Grease-Squeak6-Core", + "classinstvars" : [ + ], + "classvars" : [ + "UrlTable", + "XmlTable" ], + "commentStamp" : "pmm 2/1/2014 13:28", + "instvars" : [ + ], + "name" : "GRPharoPlatform", + "pools" : [ + ], + "super" : "GRPlatform", + "type" : "normal" } diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/README.md b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/README.md new file mode 100644 index 00000000..c6047951 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/README.md @@ -0,0 +1 @@ +A WAUtf8Codec is a WACodec optimized for UTF-8. \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/class/basicForEncoding..st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/class/basicForEncoding..st new file mode 100644 index 00000000..d4c4a74b --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/class/basicForEncoding..st @@ -0,0 +1,3 @@ +private +basicForEncoding: aString + ^ self new \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/class/codecs.st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/class/codecs.st new file mode 100644 index 00000000..632b84fb --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/class/codecs.st @@ -0,0 +1,3 @@ +accessing +codecs + ^ Array with: self new \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/class/supportsEncoding..st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/class/supportsEncoding..st new file mode 100644 index 00000000..dc3a8ade --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/class/supportsEncoding..st @@ -0,0 +1,3 @@ +testing +supportsEncoding: aString + ^ (#('utf-8' 'UTF-8') includes: aString) or: [ UTF8TextConverter encodingNames includes: aString ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/decode..st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/decode..st new file mode 100644 index 00000000..b625727d --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/decode..st @@ -0,0 +1,36 @@ +decoding +decode: aString + "Convert the given string from UTF-8 using the fast path if converting to Latin-1" + | outStream byte1 byte2 byte3 byte4 unicode stream | + stream := aString readStream. + outStream := WriteStream on: (String new: aString size). + [ stream atEnd not ] whileTrue: [ + byte1 := stream next asInteger. + unicode := byte1. + (byte1 bitAnd: 16rE0) = 192 ifTrue: [ "two bytes" + byte2 := stream next asInteger. + (byte2 bitAnd: 16rC0) = 16r80 ifFalse: [ self invalidUtf8 ]. + unicode := ((byte1 bitAnd: 31) bitShift: 6) + (byte2 bitAnd: 63) ]. + (byte1 bitAnd: 16rF0) = 224 ifTrue: [ "three bytes" + byte2 := stream next asInteger. + (byte2 bitAnd: 16rC0) = 16r80 ifFalse: [ self invalidUtf8 ]. + byte3 := stream next asInteger. + (byte3 bitAnd: 16rC0) = 16r80 ifFalse: [ self invalidUtf8 ]. + unicode := ((byte1 bitAnd: 15) bitShift: 12) + ((byte2 bitAnd: 63) bitShift: 6) + + (byte3 bitAnd: 63) ]. + (byte1 bitAnd: 16rF8) = 240 ifTrue: [ "four bytes" + byte2 := stream next asInteger. + (byte2 bitAnd: 16rC0) = 16r80 ifFalse: [ self invalidUtf8 ]. + byte3 := stream next asInteger. + (byte3 bitAnd: 16rC0) = 16r80 ifFalse: [ self invalidUtf8 ]. + byte4 := stream next asInteger. + (byte4 bitAnd: 16rC0) = 16r80 ifFalse: [ self invalidUtf8 ]. + unicode := ((byte1 bitAnd: 16r7) bitShift: 18) + + ((byte2 bitAnd: 63) bitShift: 12) + + ((byte3 bitAnd: 63) bitShift: 6) + + (byte4 bitAnd: 63) ]. + unicode ifNil: [ self invalidUtf8 ]. + unicode = 16rFEFF "ignore BOM" ifFalse: [ + outStream nextPut: (Character codePoint: unicode) ]. + unicode := nil ]. + ^ outStream contents \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/decoderFor..st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/decoderFor..st new file mode 100644 index 00000000..203b901f --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/decoderFor..st @@ -0,0 +1,5 @@ +conversion +decoderFor: aStream + ^ GRPharoUtf8CodecStream + on: aStream + converter: UTF8TextConverter new \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/encoderFor..st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/encoderFor..st new file mode 100644 index 00000000..d77ab435 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/encoderFor..st @@ -0,0 +1,5 @@ +conversion +encoderFor: aStream + ^ GRPharoUtf8CodecStream + on: aStream + converter: UTF8TextConverter new \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/invalidUtf8.st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/invalidUtf8.st new file mode 100644 index 00000000..e4481c22 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/invalidUtf8.st @@ -0,0 +1,3 @@ +private +invalidUtf8 + ^ GRInvalidUtf8Error signal: 'Invalid UTF-8 input' \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/name.st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/name.st new file mode 100644 index 00000000..7886c830 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/name.st @@ -0,0 +1,3 @@ +accessing +name + ^ 'utf-8' \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/url.st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/url.st new file mode 100644 index 00000000..4696d714 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/instance/url.st @@ -0,0 +1,3 @@ +accessing +url + ^ self \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/methodProperties.json b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/methodProperties.json new file mode 100644 index 00000000..cf1f05f1 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/methodProperties.json @@ -0,0 +1,12 @@ +{ + "class" : { + "basicForEncoding:" : "lr 7/25/2011 19:46", + "codecs" : "lr 7/25/2011 19:46", + "supportsEncoding:" : "lr 7/25/2011 19:46" }, + "instance" : { + "decode:" : "pmm 2/17/2012 19:45", + "decoderFor:" : "jf 9/30/2009 00:46", + "encoderFor:" : "jf 9/30/2009 00:46", + "invalidUtf8" : "pmm 9/14/2013 09:37", + "name" : "pmm 2/20/2009 13:25", + "url" : "pmm 2/20/2009 12:50" } } diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/properties.json b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/properties.json new file mode 100644 index 00000000..7312da07 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8Codec.class/properties.json @@ -0,0 +1,14 @@ +{ + "category" : "Grease-Squeak6-Core", + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "pmm 2/20/2009 12:51", + "instvars" : [ + ], + "name" : "GRPharoUtf8Codec", + "pools" : [ + ], + "super" : "GRCodec", + "type" : "normal" } diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/README.md b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/README.md new file mode 100644 index 00000000..08323f18 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/README.md @@ -0,0 +1 @@ +A WAUtf8CodecStream is a WACodecStream optimized for UTF-8 performance in the case where most of the characters are ASCII. diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/class/initialize.st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/class/initialize.st new file mode 100644 index 00000000..b8d03990 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/class/initialize.st @@ -0,0 +1,17 @@ +class initialization +initialize + (Smalltalk hasClassNamed: #UTF8TextConverter) "guard for Squeak 37" + ifFalse: [ ^ self ]. + + Latin1ToUtf8Map := ByteArray new: 256. + Latin1ToUtf8Encodings := Array new: 256. + 0 to: 255 do:[ :index | + | latin1 utf8 | + latin1 := String with: (Character codePoint: index). + utf8 := latin1 convertToWithConverter: UTF8TextConverter new. + latin1 = utf8 + ifTrue:[ + Latin1ToUtf8Map at: index + 1 put: 0 ] "no translation needed" + ifFalse:[ + Latin1ToUtf8Map at: index + 1 put: 1. "no translation needed" + Latin1ToUtf8Encodings at: index + 1 put: utf8 ] ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/crlf.st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/crlf.st new file mode 100644 index 00000000..ba607092 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/crlf.st @@ -0,0 +1,4 @@ +streaming +crlf + stream nextPut: Character cr. + stream nextPut: Character lf \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/encodeDefault..st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/encodeDefault..st new file mode 100644 index 00000000..cdd58a41 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/encodeDefault..st @@ -0,0 +1,5 @@ +private +encodeDefault: aString + "Convert the given string from UTF-8 using the fast path if converting to Latin-1" + 1 to: aString size by: 1 do: [ :index | + converter nextPut: (aString at: index) toStream: stream ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/encodeFast..st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/encodeFast..st new file mode 100644 index 00000000..9a8a0dc3 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/encodeFast..st @@ -0,0 +1,14 @@ +private +encodeFast: aByteString + "Convert the given string from UTF-8 using the fast path if converting to Latin-1" + | lastIndex nextIndex | + lastIndex := 1. + nextIndex := ByteString findFirstInString: aByteString inSet: Latin1ToUtf8Map startingAt: lastIndex. + nextIndex = 0 ifTrue: [ ^ stream nextPutAll: aByteString ]. + [ nextIndex > lastIndex ifTrue: [ + stream greaseNext: nextIndex - lastIndex putAll: aByteString startingAt: lastIndex ]. + stream nextPutAll: (Latin1ToUtf8Encodings at: (aByteString byteAt: nextIndex) + 1). + lastIndex := nextIndex + 1. + nextIndex := ByteString findFirstInString: aByteString inSet: Latin1ToUtf8Map startingAt: lastIndex. + nextIndex = 0 ] whileFalse. + stream greaseNext: aByteString size - lastIndex + 1 putAll: aByteString startingAt: lastIndex \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/greaseNext.putAll.startingAt..st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/greaseNext.putAll.startingAt..st new file mode 100644 index 00000000..cd78fbe0 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/greaseNext.putAll.startingAt..st @@ -0,0 +1,5 @@ +streaming +greaseNext: anInteger putAll: aCollection startingAt: startIndex + aCollection isByteString + ifTrue: [ self greaseNext: anInteger putAllFast: aCollection startingAt: startIndex ] + ifFalse: [ super greaseNext: anInteger putAll: aCollection startingAt: startIndex ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/greaseNext.putAllFast.startingAt..st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/greaseNext.putAllFast.startingAt..st new file mode 100644 index 00000000..a4c114cb --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/greaseNext.putAllFast.startingAt..st @@ -0,0 +1,17 @@ +private +greaseNext: anInteger putAllFast: aByteString startingAt: startIndex + | lastIndex nextIndex | + lastIndex := startIndex. + nextIndex := ByteString findFirstInString: aByteString inSet: Latin1ToUtf8Map startingAt: lastIndex. + nextIndex = 0 ifTrue: [ ^ stream greaseNext: anInteger putAll: aByteString startingAt: startIndex ]. + [ + nextIndex >= (startIndex + anInteger) ifTrue: [ + ^ stream greaseNext: startIndex + anInteger - lastIndex putAll: aByteString startingAt: lastIndex ]. + nextIndex > lastIndex ifTrue: [ + stream greaseNext: nextIndex - lastIndex putAll: aByteString startingAt: lastIndex ]. + stream nextPutAll: (Latin1ToUtf8Encodings at: (aByteString byteAt: nextIndex) + 1). + lastIndex := nextIndex + 1. + nextIndex := ByteString findFirstInString: aByteString inSet: Latin1ToUtf8Map startingAt: lastIndex. + (nextIndex = 0 or: [ nextIndex >= (startIndex + anInteger) ]) ] whileFalse. + lastIndex >= (startIndex + anInteger) ifFalse: [ + stream greaseNext: startIndex + anInteger - lastIndex putAll: aByteString startingAt: lastIndex ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/invalidUtf8.st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/invalidUtf8.st new file mode 100644 index 00000000..e4481c22 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/invalidUtf8.st @@ -0,0 +1,3 @@ +private +invalidUtf8 + ^ GRInvalidUtf8Error signal: 'Invalid UTF-8 input' \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/next..st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/next..st new file mode 100644 index 00000000..116f524d --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/next..st @@ -0,0 +1,46 @@ +streaming +next: anInteger + "Convert the given string from UTF-8 using the fast path if converting to Latin-1" + | output byte1 byte2 byte3 byte4 unicode count alreadyWide | + output := ByteString new: anInteger. + count := 0. + alreadyWide := false. + [ count < anInteger and: [ stream atEnd not ] ] whileTrue: [ + byte1 := stream next. + unicode := byte1. + (byte1 bitAnd: 16rE0) = 192 ifTrue: [ "two bytes" + byte2 := stream next. + (byte2 bitAnd: 16rC0) = 16r80 ifFalse: [ self invalidUtf8 ]. + unicode := ((byte1 bitAnd: 31) bitShift: 6) + (byte2 bitAnd: 63) ]. + (byte1 bitAnd: 16rF0) = 224 ifTrue: [ "three bytes" + byte2 := stream next. + (byte2 bitAnd: 16rC0) = 16r80 ifFalse: [ self invalidUtf8 ]. + byte3 := stream next. + (byte3 bitAnd: 16rC0) = 16r80 ifFalse: [ self invalidUtf8 ]. + unicode := ((byte1 bitAnd: 15) bitShift: 12) + ((byte2 bitAnd: 63) bitShift: 6) + + (byte3 bitAnd: 63). + alreadyWide ifFalse: [ + output := WideString withAll: output. + alreadyWide := true ] ]. + (byte1 bitAnd: 16rF8) = 240 ifTrue: [ "four bytes" + byte2 := stream next. + (byte2 bitAnd: 16rC0) = 16r80 ifFalse: [ self invalidUtf8 ]. + byte3 := stream next. + (byte3 bitAnd: 16rC0) = 16r80 ifFalse: [ self invalidUtf8 ]. + byte4 := stream next. + (byte4 bitAnd: 16rC0) = 16r80 ifFalse: [ self invalidUtf8 ]. + unicode := ((byte1 bitAnd: 16r7) bitShift: 18) + + ((byte2 bitAnd: 63) bitShift: 12) + + ((byte3 bitAnd: 63) bitShift: 6) + + (byte4 bitAnd: 63). + alreadyWide ifFalse: [ + output := WideString withAll: output. + alreadyWide := true ] ]. + unicode ifNil: [ self invalidUtf8 ]. + unicode = 16rFEFF "ignore BOM" ifFalse: [ + count := count + 1. + output at: count put: (Character codePoint: unicode) ]. + unicode := nil ]. + ^ count < anInteger + ifTrue: [ output first: count ] + ifFalse: [ output ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/next.st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/next.st new file mode 100644 index 00000000..4363f086 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/next.st @@ -0,0 +1,3 @@ +streaming +next + ^ (self next: 1) first \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/nextPut..st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/nextPut..st new file mode 100644 index 00000000..ad2d94ab --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/nextPut..st @@ -0,0 +1,11 @@ +streaming +nextPut: aCharacter + | codePoint shouldEncode | + codePoint := aCharacter codePoint. + codePoint > 255 + ifTrue: [ ^ self nextPutAll: (String with: aCharacter) ]. + shouldEncode := Latin1ToUtf8Map at: codePoint + 1. + shouldEncode = 1 + ifTrue: [ stream nextPutAll: (Latin1ToUtf8Encodings at: codePoint + 1) ] + ifFalse: [ stream nextPut: aCharacter ] + \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/nextPutAll..st b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/nextPutAll..st new file mode 100644 index 00000000..b9136110 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/instance/nextPutAll..st @@ -0,0 +1,5 @@ +streaming +nextPutAll: aString + aString isByteString + ifTrue: [ self encodeFast: aString ] + ifFalse: [ self encodeDefault: aString ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/methodProperties.json b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/methodProperties.json new file mode 100644 index 00000000..d5942a3a --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/methodProperties.json @@ -0,0 +1,14 @@ +{ + "class" : { + "initialize" : "lr 7/25/2011 19:46" }, + "instance" : { + "crlf" : "pmm 4/10/2010 13:28", + "encodeDefault:" : "lr 7/25/2011 18:36", + "encodeFast:" : "pmm 9/1/2012 15:25", + "greaseNext:putAll:startingAt:" : "pmm 5/21/2014 21:33", + "greaseNext:putAllFast:startingAt:" : "pmm 5/21/2014 21:19", + "invalidUtf8" : "jf 9/30/2009 00:39", + "next" : "pmm 2/17/2010 20:09", + "next:" : "pmm 9/1/2012 15:25", + "nextPut:" : "lr 7/25/2011 19:51", + "nextPutAll:" : "pmm 4/10/2010 13:28" } } diff --git a/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/properties.json b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/properties.json new file mode 100644 index 00000000..4c02a23b --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRPharoUtf8CodecStream.class/properties.json @@ -0,0 +1,15 @@ +{ + "category" : "Grease-Squeak6-Core", + "classinstvars" : [ + ], + "classvars" : [ + "Latin1ToUtf8Encodings", + "Latin1ToUtf8Map" ], + "commentStamp" : "pmm 2/20/2009 12:27", + "instvars" : [ + ], + "name" : "GRPharoUtf8CodecStream", + "pools" : [ + ], + "super" : "GRPharoConverterCodecStream", + "type" : "normal" } diff --git a/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/instance/customizeExplorerContents.st b/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/instance/customizeExplorerContents.st new file mode 100644 index 00000000..04a4d9d4 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/instance/customizeExplorerContents.st @@ -0,0 +1,3 @@ +*grease-squeak6-core +customizeExplorerContents + ^ true \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/instance/explorerContents.st b/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/instance/explorerContents.st new file mode 100644 index 00000000..f102460b --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/instance/explorerContents.st @@ -0,0 +1,9 @@ +*grease-squeak6-core +explorerContents + | contents | + contents := self keys sort: [ :a :b | a compareSafely: b ]. + ^contents replace: [ :key | + ObjectExplorerWrapper + with: (self at: key) + name: (key printString contractTo: 32) + model: self ]. \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/instance/hasContentsInExplorer.st b/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/instance/hasContentsInExplorer.st new file mode 100644 index 00000000..e86f480c --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/instance/hasContentsInExplorer.st @@ -0,0 +1,3 @@ +*grease-squeak6-core +hasContentsInExplorer + ^ true \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/methodProperties.json new file mode 100644 index 00000000..be37efbf --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/methodProperties.json @@ -0,0 +1,7 @@ +{ + "class" : { + }, + "instance" : { + "customizeExplorerContents" : "lr 7/25/2011 19:51", + "explorerContents" : "topa 11/15/2017 16:27", + "hasContentsInExplorer" : "lr 7/25/2011 19:51" } } diff --git a/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/properties.json b/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/properties.json new file mode 100644 index 00000000..943ee5f4 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSmallDictionary.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "GRSmallDictionary" } diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/README.md b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/README.md new file mode 100644 index 00000000..e69de29b diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/class/initialize.st b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/class/initialize.st new file mode 100644 index 00000000..ae58f1b3 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/class/initialize.st @@ -0,0 +1,4 @@ +class initialization +initialize + super initialize. + self select \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/defaultDirectoryPathString.st b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/defaultDirectoryPathString.st new file mode 100644 index 00000000..9121ad38 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/defaultDirectoryPathString.st @@ -0,0 +1,3 @@ +file library +defaultDirectoryPathString + ^ FileDirectory default fullName \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/deleteFile.inFolder..st b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/deleteFile.inFolder..st new file mode 100644 index 00000000..f2ba4102 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/deleteFile.inFolder..st @@ -0,0 +1,4 @@ +file library +deleteFile: aFileName inFolder: aPathString + (FileDirectory on: aPathString) + deleteFileNamed: aFileName \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/directoriesIn..st b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/directoriesIn..st new file mode 100644 index 00000000..be1b1351 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/directoriesIn..st @@ -0,0 +1,9 @@ +file library +directoriesIn: aPathString + "Return a collection of absolute paths for all the files (no directories) in the directory given by aPathString + must not include file names that start with ." + | directory | + directory := FileDirectory default directoryNamed: aPathString. + ^ (directory directoryNames + reject: [ :each | each first = $. ]) + collect: [ :each | directory fullNameFor: each ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/doSilently..st b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/doSilently..st new file mode 100644 index 00000000..d42119ee --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/doSilently..st @@ -0,0 +1,3 @@ +private +doSilently: aBlock + ^SystemChangeNotifier uniqueInstance doSilently: aBlock \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/ensureExistenceOfFolder..st b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/ensureExistenceOfFolder..st new file mode 100644 index 00000000..c918f1e9 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/ensureExistenceOfFolder..st @@ -0,0 +1,3 @@ +file library +ensureExistenceOfFolder: aString + ^FileDirectory default assureExistenceOfPath: aString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/fileExists..st b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/fileExists..st new file mode 100644 index 00000000..e5d8ee83 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/fileExists..st @@ -0,0 +1,3 @@ +file library +fileExists: aString + ^FileDirectory default fileExists: aString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/fileNameFor..st b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/fileNameFor..st new file mode 100644 index 00000000..679781ba --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/fileNameFor..st @@ -0,0 +1,7 @@ +file library +fileNameFor: aPathString + | path | + path := FileDirectory default fullPathFor: aPathString. + ^ (path size > 1 and: [ path endsWith: FileDirectory slash ]) + ifTrue: [ path allButLast: FileDirectory slash size ] + ifFalse: [ path ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/fileStreamOn.do.binary..st b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/fileStreamOn.do.binary..st new file mode 100644 index 00000000..2fd81137 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/fileStreamOn.do.binary..st @@ -0,0 +1,13 @@ +file library +fileStreamOn: aString do: aBlock binary: aBoolean + ^ aBoolean + ifTrue: [ + FileStream fileNamed: aString do: [ :stream | + stream binary. + aBlock value: stream ] ] + ifFalse: [ + MultiByteFileStream fileNamed: aString do: [ :stream | + stream + ascii; + wantsLineEndConversion: true. + aBlock value: stream ] ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/filesIn..st b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/filesIn..st new file mode 100644 index 00000000..89667dbc --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/filesIn..st @@ -0,0 +1,9 @@ +file library +filesIn: aPathString + "Return a collection of absolute paths for all the files (no directories) in the directory given by aPathString + must not include file names that start with ." + | directory | + directory := FileDirectory default directoryNamed: aPathString. + ^ (directory fileNames + reject: [ :each | each first = $. ]) + collect: [ :each | directory fullNameFor: each ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/isDirectory..st b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/isDirectory..st new file mode 100644 index 00000000..74d6fa61 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/isDirectory..st @@ -0,0 +1,3 @@ +file library +isDirectory: aPathString + ^ (FileDirectory forFileName: aPathString) directoryEntry isDirectory \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/localNameOf..st b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/localNameOf..st new file mode 100644 index 00000000..aea2f08c --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/localNameOf..st @@ -0,0 +1,3 @@ +file library +localNameOf: aFilename + ^FileDirectory localNameFor: aFilename \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/pathSeparator.st b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/pathSeparator.st new file mode 100644 index 00000000..b9a34e3d --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/pathSeparator.st @@ -0,0 +1,3 @@ +file library +pathSeparator + ^ FileDirectory pathNameDelimiter asString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/write.toFile.inFolder..st b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/write.toFile.inFolder..st new file mode 100644 index 00000000..08d697b5 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/instance/write.toFile.inFolder..st @@ -0,0 +1,15 @@ +file library +write: aStringOrByteArray toFile: aFileNameString inFolder: aFolderString + "writes aStringOrByteArray to a file named aFilenameString in the folder aFolderString" + | folder stream fullFilePath | + folder := FileDirectory default directoryNamed: aFolderString. + fullFilePath := folder fullNameFor: aFileNameString. + stream := aStringOrByteArray isString + ifTrue: [ + (MultiByteFileStream forceNewFileNamed: fullFilePath) + ascii; + wantsLineEndConversion: true; + yourself ] + ifFalse: [ (FileStream forceNewFileNamed: fullFilePath) binary ]. + [ stream nextPutAll: aStringOrByteArray ] + ensure: [ stream close ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/methodProperties.json b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/methodProperties.json new file mode 100644 index 00000000..34a4e0b6 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/methodProperties.json @@ -0,0 +1,17 @@ +{ + "class" : { + "initialize" : "JohnMcKeon 3/19/2015 22:16" }, + "instance" : { + "defaultDirectoryPathString" : "pmm 7/15/2015 15:07", + "deleteFile:inFolder:" : "JohnMcKeon 12/26/2014 19:35", + "directoriesIn:" : "JohnMcKeon 12/31/2014 09:23", + "doSilently:" : "JohnMcKeon 12/26/2014 19:36", + "ensureExistenceOfFolder:" : "JohnMcKeon 12/31/2014 09:32", + "fileExists:" : "JohnMcKeon 12/31/2014 09:35", + "fileNameFor:" : "pmm 7/15/2015 16:48", + "fileStreamOn:do:binary:" : "pmm 7/15/2015 14:47", + "filesIn:" : "JohnMcKeon 12/26/2014 19:35", + "isDirectory:" : "pmm 7/15/2015 15:21", + "localNameOf:" : "JohnMcKeon 12/27/2014 11:04", + "pathSeparator" : "JohnMcKeon 12/26/2014 19:35", + "write:toFile:inFolder:" : "JohnMcKeon 12/26/2014 19:36" } } diff --git a/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/properties.json b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/properties.json new file mode 100644 index 00000000..068d89c9 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRSqueakPlatform.class/properties.json @@ -0,0 +1,14 @@ +{ + "category" : "Grease-Squeak6-Core", + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "", + "instvars" : [ + ], + "name" : "GRSqueakPlatform", + "pools" : [ + ], + "super" : "GRPharoPlatform", + "type" : "normal" } diff --git a/repository/Grease-Squeak6-Core.package/GRWorkingWriteStream.class/README.md b/repository/Grease-Squeak6-Core.package/GRWorkingWriteStream.class/README.md new file mode 100644 index 00000000..3f2ed8e8 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRWorkingWriteStream.class/README.md @@ -0,0 +1 @@ +I'm a work around for bugs in the Pharo stream classes. \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRWorkingWriteStream.class/instance/reset.st b/repository/Grease-Squeak6-Core.package/GRWorkingWriteStream.class/instance/reset.st new file mode 100644 index 00000000..8232867f --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRWorkingWriteStream.class/instance/reset.st @@ -0,0 +1,3 @@ +positioning +reset + self resetToStart \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/GRWorkingWriteStream.class/methodProperties.json b/repository/Grease-Squeak6-Core.package/GRWorkingWriteStream.class/methodProperties.json new file mode 100644 index 00000000..e8d4055e --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRWorkingWriteStream.class/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "reset" : "pmm 8/26/2011 09:39" } } diff --git a/repository/Grease-Squeak6-Core.package/GRWorkingWriteStream.class/properties.json b/repository/Grease-Squeak6-Core.package/GRWorkingWriteStream.class/properties.json new file mode 100644 index 00000000..e4e89dfa --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/GRWorkingWriteStream.class/properties.json @@ -0,0 +1,14 @@ +{ + "category" : "Grease-Squeak6-Core", + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "pmm 8/25/2011 18:30", + "instvars" : [ + ], + "name" : "GRWorkingWriteStream", + "pools" : [ + ], + "super" : "WriteStream", + "type" : "normal" } diff --git a/repository/Grease-Squeak6-Core.package/Interval.extension/instance/any.st b/repository/Grease-Squeak6-Core.package/Interval.extension/instance/any.st new file mode 100644 index 00000000..ffdfc68c --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Interval.extension/instance/any.st @@ -0,0 +1,6 @@ +*grease-squeak6-core +any + "#first (used by SequenceableCollection>>anyOne) is an accessor of + Interval and does not error on an empty Interval." + + ^ self at: 1 \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/Interval.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/Interval.extension/methodProperties.json new file mode 100644 index 00000000..1dedf542 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Interval.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "any" : "jf 2/6/2010 03:25" } } diff --git a/repository/Grease-Squeak6-Core.package/Interval.extension/properties.json b/repository/Grease-Squeak6-Core.package/Interval.extension/properties.json new file mode 100644 index 00000000..d468cd35 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Interval.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "Interval" } diff --git a/repository/Grease-Squeak6-Core.package/MessageSend.extension/instance/argumentCount.st b/repository/Grease-Squeak6-Core.package/MessageSend.extension/instance/argumentCount.st new file mode 100644 index 00000000..3bcbd612 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/MessageSend.extension/instance/argumentCount.st @@ -0,0 +1,3 @@ +*grease-squeak6-core +argumentCount + ^ selector numArgs - self arguments size \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/MessageSend.extension/instance/fixCallbackTemps.st b/repository/Grease-Squeak6-Core.package/MessageSend.extension/instance/fixCallbackTemps.st new file mode 100644 index 00000000..2903c4c3 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/MessageSend.extension/instance/fixCallbackTemps.st @@ -0,0 +1,3 @@ +*grease-squeak6-core +fixCallbackTemps + "for polymorphism with BlockContext >> #fixCallbackTemps" \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/MessageSend.extension/instance/valueWithPossibleArguments..st b/repository/Grease-Squeak6-Core.package/MessageSend.extension/instance/valueWithPossibleArguments..st new file mode 100644 index 00000000..8b5e0ed3 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/MessageSend.extension/instance/valueWithPossibleArguments..st @@ -0,0 +1,7 @@ +*grease-squeak6-core +valueWithPossibleArguments: anArray + "Evaluate the block represented by the receiver. + If the block requires one argument, use anArg, if it requires more than one, + fill up the rest with nils." + + ^ self valueWithEnoughArguments: anArray \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/MessageSend.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/MessageSend.extension/methodProperties.json new file mode 100644 index 00000000..78bb2233 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/MessageSend.extension/methodProperties.json @@ -0,0 +1,7 @@ +{ + "class" : { + }, + "instance" : { + "argumentCount" : "pmm 1/10/2009 19:22", + "fixCallbackTemps" : "pmm 4/23/2007 20:02", + "valueWithPossibleArguments:" : "lr 7/25/2011 19:52" } } diff --git a/repository/Grease-Squeak6-Core.package/MessageSend.extension/properties.json b/repository/Grease-Squeak6-Core.package/MessageSend.extension/properties.json new file mode 100644 index 00000000..66fcc3c1 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/MessageSend.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "MessageSend" } diff --git a/repository/Grease-Squeak6-Core.package/Number.extension/instance/milliseconds.st b/repository/Grease-Squeak6-Core.package/Number.extension/instance/milliseconds.st new file mode 100644 index 00000000..71f332b4 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Number.extension/instance/milliseconds.st @@ -0,0 +1,3 @@ +*grease-squeak6-core +milliseconds + ^ self milliSeconds \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/Number.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/Number.extension/methodProperties.json new file mode 100644 index 00000000..977cd782 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Number.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "milliseconds" : "jf 2/6/2010 00:12" } } diff --git a/repository/Grease-Squeak6-Core.package/Number.extension/properties.json b/repository/Grease-Squeak6-Core.package/Number.extension/properties.json new file mode 100644 index 00000000..1d2c94d4 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Number.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "Number" } diff --git a/repository/Grease-Squeak6-Core.package/Object.extension/instance/greaseString.st b/repository/Grease-Squeak6-Core.package/Object.extension/instance/greaseString.st new file mode 100644 index 00000000..b6ad60ee --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Object.extension/instance/greaseString.st @@ -0,0 +1,3 @@ +*grease-squeak6-core +greaseString + ^ self asString \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/Object.extension/instance/sizeInMemory.st b/repository/Grease-Squeak6-Core.package/Object.extension/instance/sizeInMemory.st new file mode 100644 index 00000000..a4993b8b --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Object.extension/instance/sizeInMemory.st @@ -0,0 +1,9 @@ +*grease-squeak6-core +sizeInMemory + "Answer the number of bytes consumed by this instance including object header." + + ^ [ self class isVariable + ifTrue: [ self class byteSizeOfInstanceOfSize: self basicSize] + ifFalse: [ self class byteSizeOfInstance] + "Some classes count them no size (SmallInteger, Character..), so this fails" + ] on: Error do: [0]. \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/Object.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/Object.extension/methodProperties.json new file mode 100644 index 00000000..a4b8eabd --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Object.extension/methodProperties.json @@ -0,0 +1,6 @@ +{ + "class" : { + }, + "instance" : { + "greaseString" : "jf 9/30/2009 01:10", + "sizeInMemory" : "topa 11/15/2017 16:56" } } diff --git a/repository/Grease-Squeak6-Core.package/Object.extension/properties.json b/repository/Grease-Squeak6-Core.package/Object.extension/properties.json new file mode 100644 index 00000000..3d3b9ec4 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Object.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "Object" } diff --git a/repository/Grease-Squeak6-Core.package/PositionableStream.extension/instance/greaseUpToAll..st b/repository/Grease-Squeak6-Core.package/PositionableStream.extension/instance/greaseUpToAll..st new file mode 100644 index 00000000..8a9bc547 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/PositionableStream.extension/instance/greaseUpToAll..st @@ -0,0 +1,5 @@ +*grease-squeak6-core +greaseUpToAll: aCollection + "Needed for Seaside ports to other dialects where #upToAll: may have + different semantics" + ^ self upToAll: aCollection \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/PositionableStream.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/PositionableStream.extension/methodProperties.json new file mode 100644 index 00000000..cfb79423 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/PositionableStream.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "greaseUpToAll:" : "jf 9/30/2009 01:06" } } diff --git a/repository/Grease-Squeak6-Core.package/PositionableStream.extension/properties.json b/repository/Grease-Squeak6-Core.package/PositionableStream.extension/properties.json new file mode 100644 index 00000000..9e1697a6 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/PositionableStream.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "PositionableStream" } diff --git a/repository/Grease-Squeak6-Core.package/Random.extension/instance/randomFrom..st b/repository/Grease-Squeak6-Core.package/Random.extension/instance/randomFrom..st new file mode 100644 index 00000000..50da867d --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Random.extension/instance/randomFrom..st @@ -0,0 +1,4 @@ +*grease-squeak6-core +randomFrom: aCollection + + ^ aCollection atRandom: self \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/Random.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/Random.extension/methodProperties.json new file mode 100644 index 00000000..a7ccea74 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Random.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "randomFrom:" : "topa 11/15/2017 17:13" } } diff --git a/repository/Grease-Squeak6-Core.package/Random.extension/properties.json b/repository/Grease-Squeak6-Core.package/Random.extension/properties.json new file mode 100644 index 00000000..1c67d9ee --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/Random.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "Random" } diff --git a/repository/Grease-Squeak6-Core.package/ScaledDecimal.extension/instance/encodeOn..st b/repository/Grease-Squeak6-Core.package/ScaledDecimal.extension/instance/encodeOn..st new file mode 100644 index 00000000..add369dc --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/ScaledDecimal.extension/instance/encodeOn..st @@ -0,0 +1,6 @@ +*grease-squeak6-core +encodeOn: aDocument + "not the ideal package but we don't have a Seaside-Squeak-Core" + | converter | + converter := GRSignPrinter new, (GRNumberPrinter new precision: self scale). + converter print: self on: aDocument \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/ScaledDecimal.extension/instance/greaseString.st b/repository/Grease-Squeak6-Core.package/ScaledDecimal.extension/instance/greaseString.st new file mode 100644 index 00000000..06c66fa2 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/ScaledDecimal.extension/instance/greaseString.st @@ -0,0 +1,5 @@ +*grease-squeak6-core +greaseString + | converter | + converter := GRSignPrinter new, (GRNumberPrinter new precision: self scale). + ^ converter print: self \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/ScaledDecimal.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/ScaledDecimal.extension/methodProperties.json new file mode 100644 index 00000000..90d07924 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/ScaledDecimal.extension/methodProperties.json @@ -0,0 +1,6 @@ +{ + "class" : { + }, + "instance" : { + "encodeOn:" : "TravisCI 8/27/2016 15:16", + "greaseString" : "JohanBrichau 7/15/2015 13:26" } } diff --git a/repository/Grease-Squeak6-Core.package/ScaledDecimal.extension/properties.json b/repository/Grease-Squeak6-Core.package/ScaledDecimal.extension/properties.json new file mode 100644 index 00000000..6e425dda --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/ScaledDecimal.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "ScaledDecimal" } diff --git a/repository/Grease-Squeak6-Core.package/SequenceableCollection.extension/instance/beginsWithSubCollection..st b/repository/Grease-Squeak6-Core.package/SequenceableCollection.extension/instance/beginsWithSubCollection..st new file mode 100644 index 00000000..372efe84 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/SequenceableCollection.extension/instance/beginsWithSubCollection..st @@ -0,0 +1,4 @@ +*grease-squeak6-core +beginsWithSubCollection: aSequenceableCollection + "Some platforms implement #beginsWith: to answer true for an empty argument." + ^ self beginsWith: aSequenceableCollection \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/SequenceableCollection.extension/instance/endsWithSubCollection..st b/repository/Grease-Squeak6-Core.package/SequenceableCollection.extension/instance/endsWithSubCollection..st new file mode 100644 index 00000000..efd43298 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/SequenceableCollection.extension/instance/endsWithSubCollection..st @@ -0,0 +1,4 @@ +*grease-squeak6-core +endsWithSubCollection: aSequenceableCollection + "Some platforms implement #endsWith: to answer true for an empty argument." + ^ self endsWith: aSequenceableCollection \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/SequenceableCollection.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/SequenceableCollection.extension/methodProperties.json new file mode 100644 index 00000000..240c2f35 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/SequenceableCollection.extension/methodProperties.json @@ -0,0 +1,6 @@ +{ + "class" : { + }, + "instance" : { + "beginsWithSubCollection:" : "jok 3/22/2010 11:48", + "endsWithSubCollection:" : "jok 3/22/2010 11:47" } } diff --git a/repository/Grease-Squeak6-Core.package/SequenceableCollection.extension/properties.json b/repository/Grease-Squeak6-Core.package/SequenceableCollection.extension/properties.json new file mode 100644 index 00000000..3b2523c3 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/SequenceableCollection.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "SequenceableCollection" } diff --git a/repository/Grease-Squeak6-Core.package/SocketStream.extension/instance/greaseNext.putAll.startingAt..st b/repository/Grease-Squeak6-Core.package/SocketStream.extension/instance/greaseNext.putAll.startingAt..st new file mode 100644 index 00000000..179c35ab --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/SocketStream.extension/instance/greaseNext.putAll.startingAt..st @@ -0,0 +1,10 @@ +*grease-squeak6-core +greaseNext: anInteger putAll: aCollection startingAt: startIndex + "Put a String or a ByteArray onto the stream starting at the given position. + Currently a large collection will allocate a large buffer." + + anInteger > 0 ifFalse: [ ^ aCollection ]. + ^self + next: anInteger + putAll: (self isBinary ifTrue: [ aCollection asByteArray ] ifFalse: [ aCollection asString ]) + startingAt: startIndex. diff --git a/repository/Grease-Squeak6-Core.package/SocketStream.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/SocketStream.extension/methodProperties.json new file mode 100644 index 00000000..7cbd94c3 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/SocketStream.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "greaseNext:putAll:startingAt:" : "topa 11/15/2017 17:00" } } diff --git a/repository/Grease-Squeak6-Core.package/SocketStream.extension/properties.json b/repository/Grease-Squeak6-Core.package/SocketStream.extension/properties.json new file mode 100644 index 00000000..4800d84e --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/SocketStream.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "SocketStream" } diff --git a/repository/Grease-Squeak6-Core.package/String.extension/instance/trimBoth..st b/repository/Grease-Squeak6-Core.package/String.extension/instance/trimBoth..st new file mode 100644 index 00000000..de95b969 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/String.extension/instance/trimBoth..st @@ -0,0 +1,5 @@ +*grease-squeak6-core +trimBoth: aBlock + "Trim characters satisfying the condition given in aBlock from both sides of the receiving string." + + ^ self trimLeft: aBlock right: aBlock \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/String.extension/instance/trimBoth.st b/repository/Grease-Squeak6-Core.package/String.extension/instance/trimBoth.st new file mode 100644 index 00000000..6bef8a94 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/String.extension/instance/trimBoth.st @@ -0,0 +1,5 @@ +*grease-squeak6-core +trimBoth + "Trim separators from both sides of the receiving string." + + ^ self trimBoth: [ :char | char isSeparator ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/String.extension/instance/trimLeft..st b/repository/Grease-Squeak6-Core.package/String.extension/instance/trimLeft..st new file mode 100644 index 00000000..245e4455 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/String.extension/instance/trimLeft..st @@ -0,0 +1,5 @@ +*grease-squeak6-core +trimLeft: aBlock + "Trim characters satisfying the condition given in aBlock from the left side of the receiving string." + + ^ self trimLeft: aBlock right: [ :char | false ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/String.extension/instance/trimLeft.right..st b/repository/Grease-Squeak6-Core.package/String.extension/instance/trimLeft.right..st new file mode 100644 index 00000000..d83b385a --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/String.extension/instance/trimLeft.right..st @@ -0,0 +1,12 @@ +*grease-squeak6-core +trimLeft: aLeftBlock right: aRightBlock + "Trim characters satisfying the condition given in aLeftBlock from the left side and aRightBlock from the right sides of the receiving string." + + | left right | + left := 1. + right := self size. + [ left <= right and: [ aLeftBlock value: (self at: left) ] ] + whileTrue: [ left := left + 1 ]. + [ left <= right and: [ aRightBlock value: (self at: right) ] ] + whileTrue: [ right := right - 1 ]. + ^ self copyFrom: left to: right \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/String.extension/instance/trimLeft.st b/repository/Grease-Squeak6-Core.package/String.extension/instance/trimLeft.st new file mode 100644 index 00000000..9ef08a98 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/String.extension/instance/trimLeft.st @@ -0,0 +1,5 @@ +*grease-squeak6-core +trimLeft + "Trim separators from the left side of the receiving string." + + ^ self trimLeft: [ :char | char isSeparator ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/String.extension/instance/trimRight..st b/repository/Grease-Squeak6-Core.package/String.extension/instance/trimRight..st new file mode 100644 index 00000000..4f782511 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/String.extension/instance/trimRight..st @@ -0,0 +1,5 @@ +*grease-squeak6-core +trimRight: aBlock + "Trim characters satisfying the condition given in aBlock from the right side of the receiving string." + + ^ self trimLeft: [ :char | false ] right: aBlock \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/String.extension/instance/trimRight.st b/repository/Grease-Squeak6-Core.package/String.extension/instance/trimRight.st new file mode 100644 index 00000000..45eeb0d2 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/String.extension/instance/trimRight.st @@ -0,0 +1,5 @@ +*grease-squeak6-core +trimRight + "Trim separators from the right side of the receiving string." + + ^ self trimRight: [ :char | char isSeparator ] \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/String.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/String.extension/methodProperties.json new file mode 100644 index 00000000..2661c833 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/String.extension/methodProperties.json @@ -0,0 +1,11 @@ +{ + "class" : { + }, + "instance" : { + "trimBoth" : "lr 10/25/2009 11:13", + "trimBoth:" : "lr 10/25/2009 11:11", + "trimLeft" : "lr 10/25/2009 11:14", + "trimLeft:" : "lr 10/25/2009 11:11", + "trimLeft:right:" : "lr 10/25/2009 11:15", + "trimRight" : "lr 10/25/2009 11:14", + "trimRight:" : "lr 10/25/2009 11:11" } } diff --git a/repository/Grease-Squeak6-Core.package/String.extension/properties.json b/repository/Grease-Squeak6-Core.package/String.extension/properties.json new file mode 100644 index 00000000..c2138507 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/String.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "String" } diff --git a/repository/Grease-Squeak6-Core.package/WriteStream.extension/instance/greaseNext.putAll.startingAt..st b/repository/Grease-Squeak6-Core.package/WriteStream.extension/instance/greaseNext.putAll.startingAt..st new file mode 100644 index 00000000..61b9e3e6 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/WriteStream.extension/instance/greaseNext.putAll.startingAt..st @@ -0,0 +1,4 @@ +*grease-squeak6-core +greaseNext: anInteger putAll: aCollection startingAt: startIndex + "Store the next anInteger elements from the given collection." + ^ self next: anInteger putAll: aCollection startingAt: startIndex \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/WriteStream.extension/methodProperties.json b/repository/Grease-Squeak6-Core.package/WriteStream.extension/methodProperties.json new file mode 100644 index 00000000..e8241b94 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/WriteStream.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "greaseNext:putAll:startingAt:" : "jf 5/22/2010 20:26" } } diff --git a/repository/Grease-Squeak6-Core.package/WriteStream.extension/properties.json b/repository/Grease-Squeak6-Core.package/WriteStream.extension/properties.json new file mode 100644 index 00000000..239b3632 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/WriteStream.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "WriteStream" } diff --git a/repository/Grease-Squeak6-Core.package/monticello.meta/categories.st b/repository/Grease-Squeak6-Core.package/monticello.meta/categories.st new file mode 100644 index 00000000..89aae6c1 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/monticello.meta/categories.st @@ -0,0 +1 @@ +SystemOrganization addCategory: #'Grease-Squeak6-Core'! diff --git a/repository/Grease-Squeak6-Core.package/monticello.meta/initializers.st b/repository/Grease-Squeak6-Core.package/monticello.meta/initializers.st new file mode 100644 index 00000000..e69de29b diff --git a/repository/Grease-Squeak6-Core.package/monticello.meta/package b/repository/Grease-Squeak6-Core.package/monticello.meta/package new file mode 100644 index 00000000..a8f1b73e --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/monticello.meta/package @@ -0,0 +1 @@ +(name 'Grease-Squeak6-Core') \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/monticello.meta/version b/repository/Grease-Squeak6-Core.package/monticello.meta/version new file mode 100644 index 00000000..6aa859b2 --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/monticello.meta/version @@ -0,0 +1 @@ +(name 'Grease-Squeak6-Core-topa.1' message 'Copy and adapt Squeak5 to Squeak6' id 'b9d7fafb-430a-4f86-887d-6051b117f0bb' date '15 November 2017' time '5:34:44.269251 pm' author 'topa' ancestors () stepChildren ()) \ No newline at end of file diff --git a/repository/Grease-Squeak6-Core.package/properties.json b/repository/Grease-Squeak6-Core.package/properties.json new file mode 100644 index 00000000..f037444a --- /dev/null +++ b/repository/Grease-Squeak6-Core.package/properties.json @@ -0,0 +1,2 @@ +{ + } diff --git a/repository/Grease-Tests-Squeak6-Core.package/.filetree b/repository/Grease-Tests-Squeak6-Core.package/.filetree new file mode 100644 index 00000000..8998102c --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/.filetree @@ -0,0 +1,4 @@ +{ + "noMethodMetaData" : true, + "separateMethodMetaAndSource" : false, + "useCypressPropertiesFile" : true } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPackage.extension/class/greaseTestsSqueak6Core.st b/repository/Grease-Tests-Squeak6-Core.package/GRPackage.extension/class/greaseTestsSqueak6Core.st new file mode 100644 index 00000000..5dcab405 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPackage.extension/class/greaseTestsSqueak6Core.st @@ -0,0 +1,9 @@ +*grease-tests-squeak6-core +greaseTestsSqueak6Core + ^ self new + name: 'Grease-Tests-Squeak6-Core'; + description: 'Unit tests for the package Grease-Squeak6-Core.'; + addDependency: 'Grease-Squeak6-Core'; + addDependency: 'Grease-Tests-Core'; + url: #seasideUrl; + yourself \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPackage.extension/methodProperties.json b/repository/Grease-Tests-Squeak6-Core.package/GRPackage.extension/methodProperties.json new file mode 100644 index 00000000..0c8a086b --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPackage.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + "greaseTestsSqueak6Core" : "topa 11/15/2017 17:19" }, + "instance" : { + } } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPackage.extension/properties.json b/repository/Grease-Tests-Squeak6-Core.package/GRPackage.extension/properties.json new file mode 100644 index 00000000..dd2faaf0 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPackage.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "GRPackage" } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/README.md b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/README.md new file mode 100644 index 00000000..e69de29b diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/assert.next.startingAt.gives..st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/assert.next.startingAt.gives..st new file mode 100644 index 00000000..8ff0ff41 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/assert.next.startingAt.gives..st @@ -0,0 +1,7 @@ +private +assert: aString next: anInteger startingAt: startIndex gives: anEncodedString + | actual | + actual := String streamContents: [ :stream | + ((GRCodec forEncoding: 'utf-8') encoderFor: stream) + greaseNext: anInteger putAll: aString startingAt: startIndex ]. + self assert: actual = anEncodedString \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/assertEncodingIgnoresLanguageTat..st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/assertEncodingIgnoresLanguageTat..st new file mode 100644 index 00000000..622b446b --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/assertEncodingIgnoresLanguageTat..st @@ -0,0 +1,7 @@ +private +assertEncodingIgnoresLanguageTat: aStringWithLanguageTag + | codec withLanguageTag withoutLanguageTag | + codec := GRCodec forEncoding: 'utf-8'. + withLanguageTag := codec encode: aStringWithLanguageTag. + withoutLanguageTag := codec encode: (self stripLeadingCharFrom: aStringWithLanguageTag). + self assert: withLanguageTag = withoutLanguageTag \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/stripLeadingCharFrom..st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/stripLeadingCharFrom..st new file mode 100644 index 00000000..8f85d506 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/stripLeadingCharFrom..st @@ -0,0 +1,8 @@ +private +stripLeadingCharFrom: aString + "strips the leadingChar from every character in the given string" + ^ String streamContents: [ :stream | + aString do: [ :each | + stream nextPut: (Character + leadingChar: 0 + code: each greaseInteger) ] ] \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/testAllCodesIncludesIso88591.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/testAllCodesIncludesIso88591.st new file mode 100644 index 00000000..3922305f --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/testAllCodesIncludesIso88591.st @@ -0,0 +1,4 @@ +tests +testAllCodesIncludesIso88591 + self assert: (GRCodec allCodecs anySatisfy: [ :each | + each name = 'iso-8859-1' ]) \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/testGreaseNextPutAllStartingAt.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/testGreaseNextPutAllStartingAt.st new file mode 100644 index 00000000..dba72236 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/testGreaseNextPutAllStartingAt.st @@ -0,0 +1,13 @@ +tests +testGreaseNextPutAllStartingAt + | umlaut encodedUmlaut | + umlaut := String with: (Character codePoint: 228). + encodedUmlaut := String with: (Character codePoint: 195) with: (Character codePoint: 164). + self assert: 'ab' next: 1 startingAt: 1 gives: 'a'. + self assert: 'a', umlaut, 'b' next: 1 startingAt: 1 gives: 'a'. + self assert: 'ab', umlaut next: 1 startingAt: 1 gives: 'a'. + self assert: 'a', umlaut, 'b' next: 2 startingAt: 1gives: 'a', encodedUmlaut. + self assert: 'a', umlaut, 'b' next: 1 startingAt: 2 gives: encodedUmlaut. + self assert: 'a', umlaut, 'b' next: 2 startingAt: 2 gives: encodedUmlaut, 'b'. + self assert: 'a', umlaut, umlaut next: 2 startingAt: 2 gives: encodedUmlaut, encodedUmlaut. + self assert: 'ab', umlaut, 'b', umlaut next: 3 startingAt: 2 gives: 'b', encodedUmlaut, 'b' \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/testLanguageTag.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/testLanguageTag.st new file mode 100644 index 00000000..57a2a02c --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/instance/testLanguageTag.st @@ -0,0 +1,16 @@ +tests +testLanguageTag + "this makes sure the encoder doesn't fall on the nose with unicode" + "Make Japanese String from unicode. see http://www.unicode.org/charts/PDF/U3040.pdf" + | leading hiraA hiraO hiraAO | + leading := (Smalltalk classNamed: #JapaneseEnvironment) leadingChar. + hiraA := (Character + leadingChar: leading + code: 12354) greaseString. "HIRAGANA LETTER A" + hiraO := (Character + leadingChar: leading + code: 12362) greaseString. "HIRAGANA LETTER O" + hiraAO := hiraA , hiraO. + self assertEncodingIgnoresLanguageTat: hiraA. + self assertEncodingIgnoresLanguageTat: hiraO. + self assertEncodingIgnoresLanguageTat: hiraAO \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/methodProperties.json b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/methodProperties.json new file mode 100644 index 00000000..f6f5a240 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/methodProperties.json @@ -0,0 +1,10 @@ +{ + "class" : { + }, + "instance" : { + "assert:next:startingAt:gives:" : "pmm 4/21/2012 20:54", + "assertEncodingIgnoresLanguageTat:" : "pmm 12/26/2010 22:24", + "stripLeadingCharFrom:" : "pmm 12/26/2010 22:13", + "testAllCodesIncludesIso88591" : "pmm 8/16/2010 00:24", + "testGreaseNextPutAllStartingAt" : "pmm 5/21/2014 21:09", + "testLanguageTag" : "pmm 12/26/2010 22:25" } } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/properties.json b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/properties.json new file mode 100644 index 00000000..8248e999 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoCodecTest.class/properties.json @@ -0,0 +1,14 @@ +{ + "category" : "Grease-Tests-Squeak6-Core", + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "", + "instvars" : [ + ], + "name" : "GRPharoCodecTest", + "pools" : [ + ], + "super" : "TestCase", + "type" : "normal" } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/README.md b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/README.md new file mode 100644 index 00000000..e69de29b diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/expectedFailures.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/expectedFailures.st new file mode 100644 index 00000000..197de855 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/expectedFailures.st @@ -0,0 +1,3 @@ +testing +expectedFailures + ^ #(testFromStringThreeDigit) \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testAllColors.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testAllColors.st new file mode 100644 index 00000000..b483e1a5 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testAllColors.st @@ -0,0 +1,12 @@ +testing +testAllColors + | toTest | + toTest := #( + 16r000000 16r000001 16r000101 16r010101 16r010100 16r010000 16r001001 16r101001 + 16r001122 16r334455 16r667788 16r99AABB 16rCCDDEE 16rFF0011 + 16r123456 16r789ABC 16rDEFEDC + 16rFEFEEF 16rFEFEFF 16rFEFEFE 16rFFFEFE 16rFFFFFE 16rFFFFFF). + toTest do: [ :int | + | hex | + hex := int printPaddedWith: $0 to: 6 base: 16. + self assert: (Color fromString: hex) asHTMLColor asLowercase = ('#', hex) asLowercase ] \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testColorAsHtmlColor.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testColorAsHtmlColor.st new file mode 100644 index 00000000..fcb5dcbb --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testColorAsHtmlColor.st @@ -0,0 +1,19 @@ +testing +testColorAsHtmlColor + "test for: + Color >> #hex + | aStream | + aStream := (String new: 6) writeStream. + aStream nextPutAll: (((self red * 255) asInteger printStringBase: 16) + padded: #left to: 2 with: $0). + aStream nextPutAll: (((self green * 255) asInteger printStringBase: 16) + padded: #left to: 2 with: $0). + aStream nextPutAll: (((self blue * 255) asInteger printStringBase: 16) + padded: #left to: 2 with: $0). + ^ aStream contents + + Color >> #asHTMLColor + ^ '#', self hex" + self assert: (#('#ffffff' '#FFFFFF' ) includes: Color white asHTMLColor). + self assert: (Color black asHTMLColor = '#000000'). + self assert: (#('#ff0000' '#FF0000' ) includes: Color red asHTMLColor) \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testFromSixDigit.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testFromSixDigit.st new file mode 100644 index 00000000..639a183a --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testFromSixDigit.st @@ -0,0 +1,6 @@ +testing +testFromSixDigit + self assert: (Color fromString: 'ff0000') = Color red. + self assert: (Color fromString: 'FF0000') = Color red. + self assert: (Color fromString: '#ff0000') = Color red. + self assert: (Color fromString: '#FF0000') = Color red diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testFromStringName.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testFromStringName.st new file mode 100644 index 00000000..821c945e --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testFromStringName.st @@ -0,0 +1,6 @@ +testing +testFromStringName + self assert: (Color fromString: 'red') = Color red. + self assert: (Color fromString: 'RED') = Color red. + self assert: (Color fromString: '#red') = Color red. + self assert: (Color fromString: '#RED') = Color red diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testFromStringSixDigit.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testFromStringSixDigit.st new file mode 100644 index 00000000..e9b720fc --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testFromStringSixDigit.st @@ -0,0 +1,6 @@ +testing +testFromStringSixDigit + self assert: (Color fromString: 'ff0000') = Color red. + self assert: (Color fromString: 'FF0000') = Color red. + self assert: (Color fromString: '#ff0000') = Color red. + self assert: (Color fromString: '#FF0000') = Color red diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testFromStringThreeDigit.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testFromStringThreeDigit.st new file mode 100644 index 00000000..3ae0aeac --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/instance/testFromStringThreeDigit.st @@ -0,0 +1,6 @@ +testing +testFromStringThreeDigit + self assert: (Color fromString: 'f00') = Color red. + self assert: (Color fromString: 'F00') = Color red. + self assert: (Color fromString: '#f00') = Color red. + self assert: (Color fromString: '#F00') = Color red \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/methodProperties.json b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/methodProperties.json new file mode 100644 index 00000000..04f10d1b --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/methodProperties.json @@ -0,0 +1,11 @@ +{ + "class" : { + }, + "instance" : { + "expectedFailures" : "lr 7/25/2011 19:51", + "testAllColors" : "lr 7/25/2011 18:34", + "testColorAsHtmlColor" : "MAD 8/29/2008 15:36", + "testFromSixDigit" : "pmm 11/20/2008 22:00", + "testFromStringName" : "pmm 9/1/2012 15:32", + "testFromStringSixDigit" : "pmm 11/20/2008 22:01", + "testFromStringThreeDigit" : "pmm 9/1/2012 15:32" } } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/properties.json b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/properties.json new file mode 100644 index 00000000..6b7f9b22 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoColorTest.class/properties.json @@ -0,0 +1,14 @@ +{ + "category" : "Grease-Tests-Squeak6-Core", + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "", + "instvars" : [ + ], + "name" : "GRPharoColorTest", + "pools" : [ + ], + "super" : "TestCase", + "type" : "normal" } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoGenericCodecTest.class/README.md b/repository/Grease-Tests-Squeak6-Core.package/GRPharoGenericCodecTest.class/README.md new file mode 100644 index 00000000..e69de29b diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoGenericCodecTest.class/instance/testNoAmbiguities.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoGenericCodecTest.class/instance/testNoAmbiguities.st new file mode 100644 index 00000000..28ee8c57 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoGenericCodecTest.class/instance/testNoAmbiguities.st @@ -0,0 +1,6 @@ +tests +testNoAmbiguities + #('utf-8' 'UTF-8' 'utf8') do: [ :each | + self deny: (GRPharoGenericCodec supportsEncoding: each) ]. + GRPharoLatin1Codec supportedEncodingNames do: [ :each | + self deny: (GRPharoGenericCodec supportsEncoding: each) ] \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoGenericCodecTest.class/methodProperties.json b/repository/Grease-Tests-Squeak6-Core.package/GRPharoGenericCodecTest.class/methodProperties.json new file mode 100644 index 00000000..a58c2b7c --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoGenericCodecTest.class/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "testNoAmbiguities" : "pmm 8/16/2010 00:47" } } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoGenericCodecTest.class/properties.json b/repository/Grease-Tests-Squeak6-Core.package/GRPharoGenericCodecTest.class/properties.json new file mode 100644 index 00000000..27838258 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoGenericCodecTest.class/properties.json @@ -0,0 +1,14 @@ +{ + "category" : "Grease-Tests-Squeak6-Core", + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "", + "instvars" : [ + ], + "name" : "GRPharoGenericCodecTest", + "pools" : [ + ], + "super" : "TestCase", + "type" : "normal" } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/README.md b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/README.md new file mode 100644 index 00000000..e69de29b diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testCompileIntoClassified.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testCompileIntoClassified.st new file mode 100644 index 00000000..9af1697f --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testCompileIntoClassified.st @@ -0,0 +1,15 @@ +tests +testCompileIntoClassified + | source protocol selectors selector | + source := 'aMethod + ^ ''a result'''. + protocol := 'a-protocol'. + selector := #aMethod. + GRPlatform current + compile: source + into: self class + classified: protocol. + + [ self assert: (self class selectors includes: selector). + selectors := self class organization listAtCategoryNamed: protocol. + self assert: selectors = (Array with: selector) ] ensure: [ self class removeSelectorSilently: selector ] \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testFullName.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testFullName.st new file mode 100644 index 00000000..18bfc31b --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testFullName.st @@ -0,0 +1,3 @@ +tests +testFullName + self assert: Object fullName = 'Object' \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testGreaseIntegerOnCharacter.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testGreaseIntegerOnCharacter.st new file mode 100644 index 00000000..b62275e7 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testGreaseIntegerOnCharacter.st @@ -0,0 +1,14 @@ +tests +testGreaseIntegerOnCharacter + | character | + character := Character codePoint: 19982. + self assert: character greaseInteger = 19982. + character := Unicode value: 19982. + self assert: character greaseInteger = 19982. + LanguageEnvironment allSubclassesDo: [ :each | + (each class selectors includes: #leadingChar) ifTrue: [ + "fuck me gently with a chainsaw" + character := Character + leadingChar: each leadingChar + code: 19982. + self assert: character greaseInteger = 19982 ] ] \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testMessageSendValueWithPossibleArguments.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testMessageSendValueWithPossibleArguments.st new file mode 100644 index 00000000..d2d7a808 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testMessageSendValueWithPossibleArguments.st @@ -0,0 +1,35 @@ +tests +testMessageSendValueWithPossibleArguments + | send | + send := MessageSend receiver: 1 selector: #+. + self assert: (send valueWithPossibleArguments: (Array with: 2)) = 3. + self assert: (send valueWithArguments: (Array with: 2)) = 3. + self assert: (send value: 2) = 3. + + send := MessageSend receiver: false selector: #not. + self assert: (send valueWithPossibleArguments: (Array with: 3)). + + send := MessageSend receiver: 1 selector: #+ arguments: #(2). + self assert: (send valueWithPossibleArguments: (Array with: 4)) = 3. + self assert: send value = 3. + + send := MessageSend receiver: Array selector: #with:with: arguments: #(1). + self assert: (send valueWithPossibleArguments: (Array with: 2)) size = 2. + + send := MessageSend receiver: Array selector: #with:with:. + self assert: (send value: 1 value: 2) size = 2. + + send := MessageSend + receiver: 1 + selector: #+. + self assert: send argumentCount = 1. + self assert: send arguments size = 0. + self assert: send fixCallbackTemps == send. + + send := MessageSend + receiver: 1 + selector: #+ + argument: 2. + self assert: send argumentCount isZero. + self assert: send arguments size = 1. + self assert: send fixCallbackTemps == send \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testWriteToFileInFolderBinary.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testWriteToFileInFolderBinary.st new file mode 100644 index 00000000..d9e95032 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testWriteToFileInFolderBinary.st @@ -0,0 +1,3 @@ +tests +testWriteToFileInFolderBinary + self writeToFile: #(80 104 39 110 103 108 117 105 32 109 103 108 119 39 110 97 102 104 32 67 116 104 117 108 104 117 32 82 39 108 121 101 104 32 119 103 97 104 39 110 97 103 108 32 102 104 116 97 103 110) asByteArray \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testWriteToFileInFolderText.st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testWriteToFileInFolderText.st new file mode 100644 index 00000000..0d513815 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/testWriteToFileInFolderText.st @@ -0,0 +1,3 @@ +tests +testWriteToFileInFolderText + self writeToFile: 'Ph''nglui mglw''nafh Cthulhu R''lyeh wgah''nagl fhtagn' \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/writeToFile..st b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/writeToFile..st new file mode 100644 index 00000000..f773658a --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/instance/writeToFile..st @@ -0,0 +1,11 @@ +private +writeToFile: aStringOrByteArray + | fileName directory | + fileName := 'GRPharoPlatformTest'. + directory := FileDirectory default. + [ GRPlatform current + write: aStringOrByteArray + toFile: fileName + inFolder: directory pathName + ] ensure: [ + directory deleteFileNamed: fileName ] \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/methodProperties.json b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/methodProperties.json new file mode 100644 index 00000000..77ca0b72 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/methodProperties.json @@ -0,0 +1,11 @@ +{ + "class" : { + }, + "instance" : { + "testCompileIntoClassified" : "jf 9/30/2009 00:19", + "testFullName" : "jf 10/6/2008 14:37", + "testGreaseIntegerOnCharacter" : "pmm 12/26/2010 21:44", + "testMessageSendValueWithPossibleArguments" : "jf 12/18/2009 12:29", + "testWriteToFileInFolderBinary" : "pmm 1/22/2012 16:09", + "testWriteToFileInFolderText" : "pmm 1/22/2012 15:54", + "writeToFile:" : "pmm 1/22/2012 15:57" } } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/properties.json b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/properties.json new file mode 100644 index 00000000..560daf9e --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPharoPlatformTest.class/properties.json @@ -0,0 +1,14 @@ +{ + "category" : "Grease-Tests-Squeak6-Core", + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "", + "instvars" : [ + ], + "name" : "GRPharoPlatformTest", + "pools" : [ + ], + "super" : "TestCase", + "type" : "normal" } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPlatformTest.extension/instance/testScaledDecimalGreaseString.st b/repository/Grease-Tests-Squeak6-Core.package/GRPlatformTest.extension/instance/testScaledDecimalGreaseString.st new file mode 100644 index 00000000..5b48fa46 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPlatformTest.extension/instance/testScaledDecimalGreaseString.st @@ -0,0 +1,5 @@ +*grease-tests-squeak6-core +testScaledDecimalGreaseString + self assert: 123.4s1 greaseString = '123.4'. + self assert: 123.4s2 greaseString = '123.40'. + self assert: 123s0 greaseString = '123' \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPlatformTest.extension/methodProperties.json b/repository/Grease-Tests-Squeak6-Core.package/GRPlatformTest.extension/methodProperties.json new file mode 100644 index 00000000..09cf1de3 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPlatformTest.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "testScaledDecimalGreaseString" : "pmm 9/15/2013 12:00" } } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPlatformTest.extension/properties.json b/repository/Grease-Tests-Squeak6-Core.package/GRPlatformTest.extension/properties.json new file mode 100644 index 00000000..ab3f269a --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPlatformTest.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "GRPlatformTest" } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPrinterTest.extension/instance/testScaledDecimalPrinter.st b/repository/Grease-Tests-Squeak6-Core.package/GRPrinterTest.extension/instance/testScaledDecimalPrinter.st new file mode 100644 index 00000000..b6da31a0 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPrinterTest.extension/instance/testScaledDecimalPrinter.st @@ -0,0 +1,19 @@ +*grease-tests-squeak6-core +testScaledDecimalPrinter + | converter | + converter := GRNumberPrinter new precision: 2. + self assert: (converter print: 1.009s3) = '1.01'. + self assert: (converter print: 1.01s2) = '1.01'. + self assert: (converter print: 1.019s3) = '1.02'. + self assert: (converter print: 1.25s2) = '1.25'. + self assert: (converter print: 1.254s3) = '1.25'. + self assert: (converter print: 1.256s3) = '1.26'. + self assert: (converter print: 1.009s3) = '1.01'. + self assert: (converter print: 0.9s1) = '0.90'. + self assert: (converter print: 0.99s2) = '0.99'. + self assert: (converter print: 0.999s3) = '1.00'. + self assert: (converter print: 0.9999s4) = '1.00'. + self assert: (converter print: -0.9s1) = '0.90'. + self assert: (converter print: -0.99s2) = '0.99'. + self assert: (converter print: -0.999s3) = '1.00'. + self assert: (converter print: -0.9999s4) = '1.00' \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPrinterTest.extension/methodProperties.json b/repository/Grease-Tests-Squeak6-Core.package/GRPrinterTest.extension/methodProperties.json new file mode 100644 index 00000000..4738d7db --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPrinterTest.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "testScaledDecimalPrinter" : "pmm 9/15/2013 11:35" } } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRPrinterTest.extension/properties.json b/repository/Grease-Tests-Squeak6-Core.package/GRPrinterTest.extension/properties.json new file mode 100644 index 00000000..125a8c96 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRPrinterTest.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "GRPrinterTest" } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRUtf8CodecTest.extension/instance/expectedFailures.st b/repository/Grease-Tests-Squeak6-Core.package/GRUtf8CodecTest.extension/instance/expectedFailures.st new file mode 100644 index 00000000..1b447631 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRUtf8CodecTest.extension/instance/expectedFailures.st @@ -0,0 +1,3 @@ +*grease-tests-squeak6-core +expectedFailures + ^ #(testCodecUtf8ShortestForm) \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRUtf8CodecTest.extension/methodProperties.json b/repository/Grease-Tests-Squeak6-Core.package/GRUtf8CodecTest.extension/methodProperties.json new file mode 100644 index 00000000..eb682291 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRUtf8CodecTest.extension/methodProperties.json @@ -0,0 +1,5 @@ +{ + "class" : { + }, + "instance" : { + "expectedFailures" : "topa 11/15/2017 17:30" } } diff --git a/repository/Grease-Tests-Squeak6-Core.package/GRUtf8CodecTest.extension/properties.json b/repository/Grease-Tests-Squeak6-Core.package/GRUtf8CodecTest.extension/properties.json new file mode 100644 index 00000000..8b1a3361 --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/GRUtf8CodecTest.extension/properties.json @@ -0,0 +1,2 @@ +{ + "name" : "GRUtf8CodecTest" } diff --git a/repository/Grease-Tests-Squeak6-Core.package/monticello.meta/categories.st b/repository/Grease-Tests-Squeak6-Core.package/monticello.meta/categories.st new file mode 100644 index 00000000..9698a9dc --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/monticello.meta/categories.st @@ -0,0 +1 @@ +SystemOrganization addCategory: #'Grease-Tests-Squeak6-Core'! diff --git a/repository/Grease-Tests-Squeak6-Core.package/monticello.meta/initializers.st b/repository/Grease-Tests-Squeak6-Core.package/monticello.meta/initializers.st new file mode 100644 index 00000000..e69de29b diff --git a/repository/Grease-Tests-Squeak6-Core.package/monticello.meta/package b/repository/Grease-Tests-Squeak6-Core.package/monticello.meta/package new file mode 100644 index 00000000..b93761df --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/monticello.meta/package @@ -0,0 +1 @@ +(name 'Grease-Tests-Squeak6-Core') \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/monticello.meta/version b/repository/Grease-Tests-Squeak6-Core.package/monticello.meta/version new file mode 100644 index 00000000..0074752d --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/monticello.meta/version @@ -0,0 +1 @@ +(name 'Grease-Tests-Squeak6-Core-topa.1' message 'Copy and adapt Squeak5 to Squeak6' id '87b1a65f-df2b-487c-a769-8a3655625def' date '15 November 2017' time '5:33:58.231842 pm' author 'topa' ancestors () stepChildren ()) \ No newline at end of file diff --git a/repository/Grease-Tests-Squeak6-Core.package/properties.json b/repository/Grease-Tests-Squeak6-Core.package/properties.json new file mode 100644 index 00000000..f037444a --- /dev/null +++ b/repository/Grease-Tests-Squeak6-Core.package/properties.json @@ -0,0 +1,2 @@ +{ + }