Make use of original working copy the default
Also use shared working copy if original working copy cannot
be used. These two options has been used (by JV) for more than
a year and seem to work fine.
"{ Package: 'stx:libscm/git' }"
GitStructure subclass:#GitOdbBackendStructure
instanceVariableNames:''
classVariableNames:''
poolDictionaries:''
category:'SCM-Git-Core-Internal-Structures'
!
!GitOdbBackendStructure 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
! !
!GitOdbBackendStructure methodsFor:'accessing'!
exists
"Returns (pointer-to ;; Line: 3164
)"
^self pointerAt:1 + 28
!
exists: value
self pointerAt:1 + 28 put:value
!
foreach
"Returns (pointer-to ;; Line: 3176
)"
^self pointerAt:1 + 32
!
foreach: value
self pointerAt:1 + 32 put:value
!
free
"Returns (pointer-to ;; Line: 3182
)"
^self pointerAt:1 + 36
!
free: value
self pointerAt:1 + 36 put:value
!
odb
"Returns (pointer-to ;; Line: 317
;; Class: GitOdbHandle
)"
^self pointerAt:1 + 0
!
odb: value
self pointerAt:1 + 0 put:value
!
read
"Returns (pointer-to ;; Line: 3109
)"
^self pointerAt:1 + 4
!
read: value
self pointerAt:1 + 4 put:value
!
readHeader
"Returns (pointer-to ;; Line: 3130
)"
^self pointerAt:1 + 12
!
readHeader: value
self pointerAt:1 + 12 put:value
!
readPrefix
"Returns (pointer-to ;; Line: 3121
)"
^self pointerAt:1 + 8
!
readPrefix: value
self pointerAt:1 + 8 put:value
!
readstream
"Returns (pointer-to ;; Line: 3157
)"
^self pointerAt:1 + 24
!
readstream: value
self pointerAt:1 + 24 put:value
!
write
"Returns (pointer-to ;; Line: 3140
)"
^self pointerAt:1 + 16
!
write: value
self pointerAt:1 + 16 put:value
!
writestream
"Returns (pointer-to ;; Line: 3149
)"
^self pointerAt:1 + 20
!
writestream: value
self pointerAt:1 + 20 put:value
! !
!GitOdbBackendStructure class methodsFor:'documentation'!
version_GIT
"Never, ever change this method. Ask JV or CG why"
^thisContext method mclass theNonMetaclass instVarNamed: #revision
!
version_SVN
^ '$Id$'
! !