--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/git/GitDiffFileStructure.st Mon Sep 17 20:28:12 2012 +0000
@@ -0,0 +1,92 @@
+"{ Package: 'stx:libscm/git' }"
+
+ExternalAddress subclass:#GitDiffFileStructure
+ instanceVariableNames:''
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Git-Internal-Structures'
+!
+
+
+!GitDiffFileStructure class methodsFor:'accessing'!
+
+libraryName
+
+ OperatingSystem isUNIXlike ifTrue:[^'libgit2.so'].
+
+ OperatingSystem isMSWINDOWSlike ifTrue:[^'git2.dll'].
+
+ self error:'Library name for host OS is not known'
+!
+
+structSize
+ "Returns size of undelaying structure in bytes"
+
+ ^40
+! !
+
+!GitDiffFileStructure methodsFor:'accessing'!
+
+flags
+ "Returns unsigned
+ int32"
+
+ ^self longAt:1 + 32
+!
+
+flags: value
+
+ self longAt:1 + 32 put:value
+!
+
+mode
+ "Returns a Cface::CShortNode"
+
+ ^self longAt:1 + 36
+!
+
+mode: value
+
+ self longAt:1 + 36 put:value
+!
+
+oid
+ "Returns ;; Line: 1476
+;; Class: GitOidStructure
+"
+
+ ^self at:1 + 0
+!
+
+oid: value
+
+ self at:1 + 0 put:value
+!
+
+path
+ "Returns (pointer-to char)"
+
+ ^self pointerAt:1 + 20
+!
+
+path: value
+
+ self pointerAt:1 + 20 put:value
+!
+
+size
+ "Returns a Cface::CLongNode"
+
+ ^self longLongAt:1 + 24
+!
+
+size: value
+
+ self longLongAt:1 + 24 put:value
+! !
+
+!GitDiffFileStructure class methodsFor:'documentation'!
+
+version_SVN
+ ^ '$Id:: $'
+! !