GV

GeezerVison

The World Wide Web, restored to 800 pixels of glory.

Home|About|Gaming cabinet|Archives|How it works|Starter sites

On this site

  • Sign in
  • ActionsCI/CD and automation
  • CodespacesCloud development environments
  • All Features
  • Documentation
  • Training
  • Certifications
  • Build with Copilot
  • Customize Copilot
  • Integrations
  • Trending repos
  • GitHub Sponsors
  • Developer articles
  • Enterprises

This view

  • Original page
  • New address

GeezerVison is showing github.com — Merge pull request #203 from tukanos/protocolWithSpace · SeasideSt/Grease@ce018fb

File tree

Expand file treeCollapse file tree
Open diff view settings
Filter options
  • repository/Grease-Core.package
    • GROrderedMultiMap2.class/instance
      • privateAllAt.startingAt..st
    • GRSmallOrderedSet.class/instance
      • errorNotFound.st
      • findIndexFor..st
      • grow.st
      • privateAdd..st
      • removeIndex..st
Expand file treeCollapse file tree
Open diff view settings
Collapse file

‎repository/Grease-Core.package/GROrderedMultiMap2.class/instance/privateAllAt.startingAt..st‎

Copy file name to clipboard
+2-2Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
1-
private
1+
private
22
privateAllAt: aKey startingAt: index
33
^ Array new: 2 streamContents: [ :stream |
44
index to: size * 2 - 1 by: 2 do: [ :i |
55
(table at: i) = aKey
6-
ifTrue: [ stream nextPut: (table at: i + 1) ] ] ]
6+
ifTrue: [ stream nextPut: (table at: i + 1) ] ] ]
Collapse file

‎repository/Grease-Core.package/GRSmallOrderedSet.class/instance/errorNotFound.st‎

Copy file name to clipboard
+2-2Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,3 @@
1-
private
1+
private
22
errorNotFound
3-
self error: 'Not found'
3+
self error: 'Not found'
Collapse file

‎repository/Grease-Core.package/GRSmallOrderedSet.class/instance/findIndexFor..st‎

Copy file name to clipboard
+2-2Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
1-
private
1+
private
22
findIndexFor: aKey
33
1 to: size do: [ :index |
44
(table at: index) = aKey
55
ifTrue: [ ^ index ] ].
6-
^ 0
6+
^ 0
Collapse file

‎repository/Grease-Core.package/GRSmallOrderedSet.class/instance/grow.st‎

Copy file name to clipboard
+2-2Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,8 @@
1-
private
1+
private
22
grow
33
| newTable |
44
"#replaceFrom:to:with:startingAt: would be better but not portable"
55
newTable := Array new: 2 * size.
66
1 to: size do: [ :index |
77
newTable at: index put: (table at: index) ].
8-
table := newTable
8+
table := newTable
Collapse file

‎repository/Grease-Core.package/GRSmallOrderedSet.class/instance/privateAdd..st‎

Copy file name to clipboard
+2-2Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,4 @@
1-
private
1+
private
22
privateAdd: newObject
33
size = table size ifTrue: [ self grow ].
4-
table at: (size := size + 1) put: newObject
4+
table at: (size := size + 1) put: newObject
Collapse file

‎repository/Grease-Core.package/GRSmallOrderedSet.class/instance/removeIndex..st‎

Copy file name to clipboard
+2-2Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
1-
private
1+
private
22
removeIndex: index
33
table at: index put: nil.
44
index to: size - 1 do: [ :i |
55
table at: i put: (table at: i + 1) ].
6-
size := size - 1
6+
size := size - 1

0 commit comments

Comments
0 (0)
You are visitor 01402503 — GeezerVison does not store the pages you look up.
Best viewed with Netscape Navigator 4.7 or Internet Explorer 6 at 800×600. No cookies required.