git/GitOdbStreamStructure.st
author vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177
Wed, 03 Oct 2012 18:40:32 +0000
changeset 27 a36a11925d3f
parent 8 4275f357d3e8
child 31 d96d7eff6efc
permissions -rw-r--r--
Class category renames

"{ Package: 'stx:libscm/git' }"

GitStructure subclass:#GitOdbStreamStructure
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'SCM-Git-Core-Internal-Structures'
!


!GitOdbStreamStructure 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"

    ^24
! !

!GitOdbStreamStructure methodsFor:'accessing'!

backend
    "Returns (pointer-to ;; Line: 3196
;; Class: GitOdbBackendStructure
)"

    ^self pointerAt:1 + 0
!

backend: value

    self pointerAt:1 + 0 put:value
!

finalizeWrite
    "Returns (pointer-to ;; Line: 1542
)"

    ^self pointerAt:1 + 16
!

finalizeWrite: value

    self pointerAt:1 + 16 put:value
!

free
    "Returns (pointer-to ;; Line: 1548
)"

    ^self pointerAt:1 + 20
!

free: value

    self pointerAt:1 + 20 put:value
!

mode
    "Returns int32"

    ^self longAt:1 + 4
!

mode: value

    self longAt:1 + 4 put:value
!

read
    "Returns (pointer-to ;; Line: 1527
)"

    ^self pointerAt:1 + 8
!

read: value

    self pointerAt:1 + 8 put:value
!

write
    "Returns (pointer-to ;; Line: 1535
)"

    ^self pointerAt:1 + 12
!

write: value

    self pointerAt:1 + 12 put:value
! !

!GitOdbStreamStructure class methodsFor:'documentation'!

version_SVN
    ^ '$Id::                                                                                                                        $'
! !