X Tutup
Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
*grease-core
greaseString
^ self
Original file line number Diff line number Diff line change
@@ -1,14 +1,15 @@
{
"instance" : {
"pluralize" : "jf 9/30/2009 00:37",
"excerpt:" : "lr 10/25/2009 11:19",
"excerpt:radius:" : "lr 10/25/2009 11:19",
"greaseString" : "pmm 9/8/2017 13:45",
"truncate" : "lr 10/25/2009 11:17",
"truncate:" : "lr 10/25/2009 11:17",
"truncate:ellipsis:" : "lr 2/7/2008 09:22",
"excerpt:radius:ellipsis:" : "jf 12/17/2009 10:49",
"greaseInteger" : "pmm 8/25/2016 14:02",
"print:on:" : "lr 7/24/2008 18:19",
"excerpt:radius:ellipsis:" : "jf 12/17/2009 10:49"
"pluralize" : "jf 9/30/2009 00:37",
"truncate:" : "lr 10/25/2009 11:17",
"truncate:ellipsis:" : "lr 2/7/2008 09:22"
},
"class" : { }
}
4 changes: 2 additions & 2 deletions repository/Grease-Core.package/monticello.meta/version

Large diffs are not rendered by default.

Original file line number Diff line number Diff line change
@@ -1,11 +1,15 @@
streaming
nextPut: aCharacter
| codePoint shouldEncode |
| codePoint |
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 ]
codePoint < 128 ifTrue: [
^ stream nextPut: aCharacter ].
codePoint < 256 ifTrue: [
| shouldEncode |
shouldEncode := Latin1ToUtf8Map at: codePoint + 1.
^ shouldEncode = 1
ifTrue: [ stream nextPutAll: (Latin1ToUtf8Encodings at: codePoint + 1) ]
ifFalse: [ stream nextPut: aCharacter ] ].

^ self nextPutAll: (String with: aCharacter)

Original file line number Diff line number Diff line change
Expand Up @@ -6,7 +6,7 @@
"greaseNext:putAllFast:startingAt:" : "pmm 5/21/2014 21:28",
"greaseNext:putAll:startingAt:" : "pmm 8/15/2011 21:32",
"encodeDefault:" : "lr 7/25/2011 18:36",
"nextPut:" : "lr 7/25/2011 19:51",
"nextPut:" : "pmm 9/7/2017 14:47",
"nextPutAll:" : "pmm 4/10/2010 13:28",
"next:" : "pmm 8/25/2016 11:00",
"encodeFast:" : "pmm 8/25/2016 11:00"
Expand Down
Original file line number Diff line number Diff line change
@@ -1 +1 @@
(name 'Grease-Pharo60-Core-pmm.6' message 'Add thisContext method to GRPlatform' id 'b01ff64f-d114-0d00-9d20-ac690c6d599d' date '5 September 2017' time '1:31:59.489145 pm' author 'pmm' ancestors ((name 'Grease-Pharo60-Core-pmm.5' message 'Add comments to classes who were previously missing them.' id '3f01c4b7-cc14-0d00-9c48-5d25066d8f9e' date '5 September 2017' time '8:03:06.198613 am' author 'pmm' ancestors ((name 'Grease-Pharo60-Core-pmm.4' message 'Kick explorer support from Pharo 6- Closes #31' id 'f1e4d024-cc14-0d00-9c47-1a66066d8f9e' date '5 September 2017' time '7:22:00.792553 am' author 'pmm' ancestors ((name 'Grease-Pharo60-Core-JohanBrichau.3' message 'Added GRDynamicVariable class>>defaultValue to represent the default value of a GRDynamicVariable. Previously, this was GRDynamicvariable>>default but this was not compatible for all platforms' id 'b7f896c0-5f11-0d00-87f2-d9cb08c307d1' date '23 July 2017' time '5:47:27.925141 pm' author 'JohanBrichau' ancestors ((name 'Grease-Pharo60-Core-JohanBrichau.2' message 'Added GRDynamicVariable (copied from Grease-Pharo30-Core-MaxLeske.23)' id 'c95f31f1-ba0c-0d00-9a91-77be09e6dcd5' date '25 May 2017' time '3:29:07.233987 pm' author 'JohanBrichau' ancestors ((name 'Grease-Pharo60-Core-JohanBrichau.1' message 'Split from Grease-Pharo30-Core-PavelKrivanek.22with changes for Pharo6.0 onwards' id 'fec0f92f-b80c-0d00-b4b4-c13800bfc9db' date '25 May 2017' time '12:11:55.651574 pm' author 'JohanBrichau' ancestors () stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())
(name 'Grease-Pharo60-Core-pmm.7' message 'Small optimization- avoid table lookup in common case' id 'b99d6b17-1115-0d00-9402-d53004aeb9ca' date '8 September 2017' time '5:37:28.7948 pm' author 'pmm' ancestors ((name 'Grease-Pharo60-Core-pmm.6' message 'Add thisContext method to GRPlatform' id 'b01ff64f-d114-0d00-9d20-ac690c6d599d' date '5 September 2017' time '1:31:59.489145 pm' author 'pmm' ancestors ((name 'Grease-Pharo60-Core-pmm.5' message 'Add comments to classes who were previously missing them.' id '3f01c4b7-cc14-0d00-9c48-5d25066d8f9e' date '5 September 2017' time '8:03:06.198613 am' author 'pmm' ancestors ((name 'Grease-Pharo60-Core-pmm.4' message 'Kick explorer support from Pharo 6- Closes #31' id 'f1e4d024-cc14-0d00-9c47-1a66066d8f9e' date '5 September 2017' time '7:22:00.792553 am' author 'pmm' ancestors ((name 'Grease-Pharo60-Core-JohanBrichau.3' message 'Added GRDynamicVariable class>>defaultValue to represent the default value of a GRDynamicVariable. Previously, this was GRDynamicvariable>>default but this was not compatible for all platforms' id 'b7f896c0-5f11-0d00-87f2-d9cb08c307d1' date '23 July 2017' time '5:47:27.925141 pm' author 'JohanBrichau' ancestors ((name 'Grease-Pharo60-Core-JohanBrichau.2' message 'Added GRDynamicVariable (copied from Grease-Pharo30-Core-MaxLeske.23)' id 'c95f31f1-ba0c-0d00-9a91-77be09e6dcd5' date '25 May 2017' time '3:29:07.233987 pm' author 'JohanBrichau' ancestors ((name 'Grease-Pharo60-Core-JohanBrichau.1' message 'Split from Grease-Pharo30-Core-PavelKrivanek.22with changes for Pharo6.0 onwards' id 'fec0f92f-b80c-0d00-b4b4-c13800bfc9db' date '25 May 2017' time '12:11:55.651574 pm' author 'JohanBrichau' ancestors () stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())) stepChildren ())
Expand Down
X Tutup