Cface__CTypedefNode.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Thu, 17 Sep 2015 07:36:40 +0100
changeset 49 307d55f736ec
parent 42 a428eeead6ad
permissions -rw-r--r--
LLVM bindings: allow to specify path to llvm-config ..by setting LLVM_CONFIG variable when generating definitions for LLVM bindings. Example: make LVM_CONFIG=~/Projects/LLVM/sources1/build/Debug+Asserts/bin/llvm-config
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
32
d7464405cbda Package renamed from cvut:fel/cface to jv:cface
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 24
diff changeset
     1
"{ Package: 'jv:cface' }"
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     2
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     3
"{ NameSpace: Cface }"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     4
39
5ff8fcdb5228 Added support for generating classes for typedef'd types.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 32
diff changeset
     5
CDerivedTypeNode subclass:#CTypedefNode
5ff8fcdb5228 Added support for generating classes for typedef'd types.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 32
diff changeset
     6
	instanceVariableNames:'type'
42
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
     7
	classVariableNames:'C99IntTypes2FFITypes'
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     8
	poolDictionaries:''
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     9
	category:'Cface-C AST'
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    10
!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    11
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    12
!CTypedefNode class methodsFor:'documentation'!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    13
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    14
history
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    15
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    16
    "Created: / 25-10-2007 / 15:07:10 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    17
    "Created: #local / 25-10-2007 / 15:07:18 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    18
    "Created: #local: / 25-10-2007 / 15:07:18 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    19
    "Created: #names / 25-10-2007 / 15:07:18 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    20
    "Created: #names: / 25-10-2007 / 15:07:18 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    21
    "Created: #local:names: / 25-10-2007 / 15:08:27 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    22
    "Deleted: #local / 29-10-2007 / 19:58:35 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    23
    "Deleted: #local: / 29-10-2007 / 19:58:35 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    24
    "Deleted: #names / 29-10-2007 / 19:58:35 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    25
    "Deleted: #names: / 29-10-2007 / 19:58:35 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    26
    "Created: #name / 29-10-2007 / 19:58:43 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    27
    "Created: #name: / 29-10-2007 / 19:58:43 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    28
    "Created: #id / 29-10-2007 / 19:58:43 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    29
    "Created: #id: / 29-10-2007 / 19:58:43 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    30
    "Created: #name:id: / 29-10-2007 / 19:59:29 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    31
    "Deleted: #local:names: / 29-10-2007 / 19:59:43 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    32
    "Created: #acceptVisitor: / 02-11-2007 / 10:46:04 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    33
    "Created: #foreign / 19-11-2007 / 09:41:32 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    34
    "Created: #foreign: / 19-11-2007 / 09:41:32 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    35
    "Created: #name:id:foreign: / 19-11-2007 / 09:41:41 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    36
    "Deleted: #name:id: / 19-11-2007 / 09:41:43 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    37
! !
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    38
42
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    39
!CTypedefNode class methodsFor:'initialization'!
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    40
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    41
initialize
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    42
    "Invoked at system start or when the class is dynamically loaded."
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    43
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    44
    "/ please change as required (and remove this comment)
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    45
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    46
    C99IntTypes2FFITypes := Dictionary withKeysAndValues:#(
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    47
        int8_t      sint8
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    48
        int16_t     sint16
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    49
        int32_t     sint32
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    50
        int64_t     sint64
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    51
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    52
        uint8_t     uint8
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    53
        uint16_t    uint16
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    54
        uint32_t    uint32
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    55
        uint64_t    uint64
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    56
    )
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    57
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    58
    "Modified: / 12-08-2015 / 07:38:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    59
! !
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    60
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    61
!CTypedefNode methodsFor:'accessing'!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    62
5
c110eef5b9ef - externalization of libraryName (now supports unix & win32 simultaneously)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2
diff changeset
    63
cByteSize
c110eef5b9ef - externalization of libraryName (now supports unix & win32 simultaneously)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2
diff changeset
    64
c110eef5b9ef - externalization of libraryName (now supports unix & win32 simultaneously)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2
diff changeset
    65
    ^type cByteSize
c110eef5b9ef - externalization of libraryName (now supports unix & win32 simultaneously)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2
diff changeset
    66
c110eef5b9ef - externalization of libraryName (now supports unix & win32 simultaneously)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2
diff changeset
    67
    "Created: / 09-07-2008 / 19:39:38 / Jan Vrany <vranyj1@fel.cvut.cz>"
c110eef5b9ef - externalization of libraryName (now supports unix & win32 simultaneously)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2
diff changeset
    68
!
c110eef5b9ef - externalization of libraryName (now supports unix & win32 simultaneously)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2
diff changeset
    69
2
cfd2c393abfe Smalltalk/X generator improvements:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    70
ffiTypeSymbol
42
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    71
    C99IntTypes2FFITypes at: cName ifPresent:[ :ffiType | ^ ffiType ].
41
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 39
diff changeset
    72
    type isCPointerToCStructure ifTrue:[ 
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 39
diff changeset
    73
        ^ self smalltalkClassName ? #pointer
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 39
diff changeset
    74
    ].
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 39
diff changeset
    75
    ^ type ffiTypeSymbol
2
cfd2c393abfe Smalltalk/X generator improvements:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    76
cfd2c393abfe Smalltalk/X generator improvements:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    77
    "Created: / 03-07-2008 / 22:40:25 / Jan Vrany <vranyj1@fel.cvut.cz>"
42
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
    78
    "Modified: / 12-08-2015 / 07:39:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2
cfd2c393abfe Smalltalk/X generator improvements:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    79
!
cfd2c393abfe Smalltalk/X generator improvements:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    80
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    81
type
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    82
    ^ type
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    83
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    84
    "Created: / 10-02-2008 / 19:23:13 / janfrog"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    85
!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    86
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    87
type:something
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    88
    type := something.
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    89
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    90
    "Created: / 10-02-2008 / 19:23:13 / janfrog"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    91
! !
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    92
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    93
!CTypedefNode methodsFor:'printing'!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    94
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    95
printOn: stream indent: level
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    96
6
ae25dce94003 Added SVNMapping. Now it is able to parse libsvn.def
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
    97
    self printLineOn: stream indent: level.
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    98
    stream
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    99
        nextPutAll: '(typedef '; cr;
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   100
        next: level + 1 put: Character tab; nextPutAll: cName; cr;
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   101
        next: level + 1 put: Character tab.
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   102
    type printOn: stream indent: level + 1.
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   103
    stream nextPut: $)
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   104
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   105
    "Created: / 17-02-2008 / 18:13:13 / janfrog"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   106
    "Modified: / 18-02-2008 / 15:12:01 / janfrog"
6
ae25dce94003 Added SVNMapping. Now it is able to parse libsvn.def
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
   107
    "Modified: / 10-07-2008 / 20:05:26 / Jan Vrany <vranyj1@fel.cvut.cz>"
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   108
! !
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   109
24
e7afa531abcf Some fixes for libgit2
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 19
diff changeset
   110
!CTypedefNode methodsFor:'testing'!
e7afa531abcf Some fixes for libgit2
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 19
diff changeset
   111
e7afa531abcf Some fixes for libgit2
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 19
diff changeset
   112
isForeign
e7afa531abcf Some fixes for libgit2
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 19
diff changeset
   113
e7afa531abcf Some fixes for libgit2
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 19
diff changeset
   114
    ^foreign ? false
e7afa531abcf Some fixes for libgit2
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 19
diff changeset
   115
e7afa531abcf Some fixes for libgit2
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 19
diff changeset
   116
    "Created: / 04-07-2008 / 11:46:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
e7afa531abcf Some fixes for libgit2
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 19
diff changeset
   117
! !
e7afa531abcf Some fixes for libgit2
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 19
diff changeset
   118
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   119
!CTypedefNode methodsFor:'visiting'!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   120
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   121
acceptVisitor:aVisitor 
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   122
    "Double dispatch back to the visitor, passing my type encoded in
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   123
     the selector (visitor pattern)"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   124
    "stub code automatically generated - please change if required"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   125
    
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   126
    ^ aVisitor visitCTypedefNode:self
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   127
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   128
    "Created: / 02-11-2007 / 10:46:04 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   129
    "Modified: / 10-02-2008 / 10:45:50 / janfrog"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   130
! !
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   131
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   132
!CTypedefNode class methodsFor:'documentation'!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   133
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   134
version
19
1297bf936bfb Some fixes for modern GCC XML
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 14
diff changeset
   135
    ^ '$Id$'
14
1f730d82496e Added version_SVN methods
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 6
diff changeset
   136
!
1f730d82496e Added version_SVN methods
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 6
diff changeset
   137
1f730d82496e Added version_SVN methods
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 6
diff changeset
   138
version_SVN
1f730d82496e Added version_SVN methods
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 6
diff changeset
   139
    ^ '$Id$'
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   140
! !
39
5ff8fcdb5228 Added support for generating classes for typedef'd types.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 32
diff changeset
   141
42
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
   142
a428eeead6ad 64bit fixes: for C99 fixed-width int types, generate proper fixed-width FFI types. For int and longs generate generic, machine-dependent FFI types
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 41
diff changeset
   143
CTypedefNode initialize!