--- a/git/GitOid.st Mon Sep 10 13:37:31 2012 +0000
+++ b/git/GitOid.st Mon Sep 10 18:33:35 2012 +0000
@@ -11,29 +11,29 @@
!GitOid class methodsFor:'instance creation'!
fromString: aString
- | oid |
- oid := self new.
- GitPrimitives prim_git_oid_fromstr: oid str: aString.
- ^oid.
-
+"/ | oid |
+"/
+"/ oid := self new.
+"/ GitPrimitives prim_git_oid_fromstr: oid str: aString.
+"/ ^oid.
-"/ | sz oid s hi lo |
-"/
-"/ sz := aString size.
-"/ sz ~~ 40 ifTrue:[
-"/ self error:'Not a SHA-1 hex string (must have 40 chars)'.
-"/ ^nil
-"/ ].
-"/ oid := self new.
-"/ s := aString readStream.
-"/ 1 to: 20 do: [ :idx |
-"/ hi := s next digitValue.
-"/ lo := s next digitValue.
-"/ oid at:idx put: ((hi bitShift:4) bitOr: lo)
-"/ ].
-"/ ^ oid
+ | sz oid s hi lo |
+
+ sz := aString size.
+ sz ~~ 40 ifTrue:[
+ self error:'Not a SHA-1 hex string (must have 40 chars)'.
+ ^nil
+ ].
+ oid := self new.
+ s := aString readStream.
+ 1 to: 20 do: [ :idx |
+ hi := s next digitValue.
+ lo := s next digitValue.
+ oid at:idx put: ((hi bitShift:4) bitOr: lo)
+ ].
+ ^ oid
"
GitOid fromString: '7164acf359f5da8a4bc9cd3e03e2e461013c3811'