Cface__CConstNode.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Mon, 06 Jul 2015 23:08:04 +0100
changeset 41 edb5e4849b79
parent 37 1ad7fb72801a
permissions -rw-r--r--
Type resolving reintroduced again. During resolution part, all CUnresolvedNode are replaced by corresponding typedef nodes.
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: 19
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
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     5
CModifierNode subclass:#CConstNode
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     6
	instanceVariableNames:''
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     7
	classVariableNames:''
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
!CConstNode 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 / 16:58:14 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    17
    "Created: #id / 25-10-2007 / 16:58:17 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    18
    "Created: #id: / 29-10-2007 / 20:48:37 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    19
    "Created: #acceptVisitor: / 02-11-2007 / 10:41:30 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    20
    "Created: #acceptNameVisitor: / 05-11-2007 / 17:37:52 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    21
    "Deleted: #acceptNameVisitor: / 12-11-2007 / 09:46:40 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    22
    "Created: #buildTypeCheckFor:on: / 19-12-2007 / 15:57:17 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    23
    "Created: #buildObjectCreationOn: / 19-12-2007 / 16:40:59 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    24
    "Created: #buildValueExtractionFor:on: / 19-12-2007 / 17:30:58 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    25
    "Created: #buildObjectCreationFor:on: / 19-12-2007 / 17:39:29 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    26
    "Deleted: #buildObjectCreationOn: / 19-12-2007 / 17:39:31 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    27
    "Created: #buildCTypeOn: / 19-12-2007 / 18:20:45 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    28
    "Created: #buildTypeDescriptionOn: / 20-12-2007 / 12:19:58 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    29
! !
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    30
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    31
!CConstNode class methodsFor:'instance creation'!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    32
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    33
id:anId
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    34
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    35
    | defConstNode |
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    36
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    37
    defConstNode := self new.
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    38
    defConstNode id:anId.
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    39
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    40
    ^defConstNode
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    41
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    42
    "Created: / 29-10-2007 / 20:48:37 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    43
! !
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    44
4
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
    45
!CConstNode methodsFor:'accessing'!
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    46
37
1ad7fb72801a Generate comment in FFI callouts
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 32
diff changeset
    47
cName
1ad7fb72801a Generate comment in FFI callouts
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 32
diff changeset
    48
    ^ 'const ', super cName
1ad7fb72801a Generate comment in FFI callouts
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 32
diff changeset
    49
1ad7fb72801a Generate comment in FFI callouts
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 32
diff changeset
    50
    "Created: / 06-07-2015 / 07:32:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
1ad7fb72801a Generate comment in FFI callouts
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 32
diff changeset
    51
!
1ad7fb72801a Generate comment in FFI callouts
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 32
diff changeset
    52
18
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 14
diff changeset
    53
ffiPointerTypeSymbol
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 14
diff changeset
    54
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 14
diff changeset
    55
    ^type ffiPointerTypeSymbol
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 14
diff changeset
    56
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 14
diff changeset
    57
    "Created: / 18-07-2011 / 16:46:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 14
diff changeset
    58
!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 14
diff changeset
    59
6
ae25dce94003 Added SVNMapping. Now it is able to parse libsvn.def
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
    60
ffiTypeSymbol
ae25dce94003 Added SVNMapping. Now it is able to parse libsvn.def
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
    61
ae25dce94003 Added SVNMapping. Now it is able to parse libsvn.def
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
    62
    ^type ffiTypeSymbol
ae25dce94003 Added SVNMapping. Now it is able to parse libsvn.def
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
    63
ae25dce94003 Added SVNMapping. Now it is able to parse libsvn.def
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
    64
    "Created: / 10-07-2008 / 20:15:12 / Jan Vrany <vranyj1@fel.cvut.cz>"
ae25dce94003 Added SVNMapping. Now it is able to parse libsvn.def
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
    65
!
ae25dce94003 Added SVNMapping. Now it is able to parse libsvn.def
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
    66
5
c110eef5b9ef - externalization of libraryName (now supports unix & win32 simultaneously)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 4
diff changeset
    67
smalltalkClassName
c110eef5b9ef - externalization of libraryName (now supports unix & win32 simultaneously)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 4
diff changeset
    68
    ^ type smalltalkClassName
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    69
4
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
    70
    "Created: / 04-07-2008 / 11:55:29 / Jan Vrany <vranyj1@fel.cvut.cz>"
5
c110eef5b9ef - externalization of libraryName (now supports unix & win32 simultaneously)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 4
diff changeset
    71
    "Modified: / 10-07-2008 / 08:01:16 / Jan Vrany <vranyj1@fel.cvut.cz>"
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    72
!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    73
4
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
    74
smalltalkClassNameWithNamespace
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    75
4
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
    76
    ^type smalltalkClassNameWithNamespace
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    77
4
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
    78
    "Created: / 04-07-2008 / 11:56:36 / Jan Vrany <vranyj1@fel.cvut.cz>"
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    79
! !
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    80
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    81
!CConstNode methodsFor:'printing'!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    82
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    83
printOn: stream indent: indent
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    84
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    85
    stream 
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    86
        nextPutAll:'const '; 
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    87
        cr;
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    88
        next: indent + 1 put: Character tab.
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
    type printOn: stream indent: indent + 1.
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
    "Created: / 04-03-2008 / 10:57:12 / janfrog"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    93
! !
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
!CConstNode methodsFor:'testing'!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    96
4
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
    97
isAnonymous
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
    98
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
    99
    ^type isAnonymous
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
   100
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
   101
    "Created: / 04-07-2008 / 11:56:05 / Jan Vrany <vranyj1@fel.cvut.cz>"
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
   102
!
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
   103
3
110a9cbf8594 More improvements, now it generates usable Cairo bindings!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
   104
isCCharNode
110a9cbf8594 More improvements, now it generates usable Cairo bindings!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
   105
    ^ type isCCharNode
110a9cbf8594 More improvements, now it generates usable Cairo bindings!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
   106
110a9cbf8594 More improvements, now it generates usable Cairo bindings!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
   107
    "Created: / 04-07-2008 / 09:27:56 / Jan Vrany <vranyj1@fel.cvut.cz>"
110a9cbf8594 More improvements, now it generates usable Cairo bindings!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
   108
!
110a9cbf8594 More improvements, now it generates usable Cairo bindings!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
   109
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   110
isCConstNode
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   111
    ^ true
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   112
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   113
    "Created: / 17-02-2008 / 21:52:38 / janfrog"
3
110a9cbf8594 More improvements, now it generates usable Cairo bindings!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
   114
!
110a9cbf8594 More improvements, now it generates usable Cairo bindings!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
   115
110a9cbf8594 More improvements, now it generates usable Cairo bindings!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
   116
isCStructNode
110a9cbf8594 More improvements, now it generates usable Cairo bindings!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
   117
    ^ type isCStructNode
110a9cbf8594 More improvements, now it generates usable Cairo bindings!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
   118
110a9cbf8594 More improvements, now it generates usable Cairo bindings!
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
   119
    "Created: / 04-07-2008 / 09:28:04 / Jan Vrany <vranyj1@fel.cvut.cz>"
4
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
   120
!
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
   121
41
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 37
diff changeset
   122
isCStructredNode
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 37
diff changeset
   123
    ^ type isCStructuredNode
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 37
diff changeset
   124
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 37
diff changeset
   125
    "Created: / 06-07-2015 / 23:02:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 37
diff changeset
   126
!
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 37
diff changeset
   127
4
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
   128
isForeign
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
   129
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
   130
    ^type isForeign
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
   131
fc74bd43a3eb Minor parser fixes to parse Cairo Xlib stuff
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3
diff changeset
   132
    "Created: / 04-07-2008 / 11:56:15 / Jan Vrany <vranyj1@fel.cvut.cz>"
1
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
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   135
!CConstNode methodsFor:'visiting'!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   136
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   137
acceptVisitor:aVisitor 
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   138
    "Double dispatch back to the visitor, passing my type encoded in
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   139
     the selector (visitor pattern)"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   140
    "stub code automatically generated - please change if required"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   141
    
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   142
    ^ aVisitor visitCConstNode:self
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   143
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   144
    "Created: / 02-11-2007 / 10:41:30 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   145
    "Modified: / 10-02-2008 / 10:44:45 / janfrog"
41
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 37
diff changeset
   146
!
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 37
diff changeset
   147
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 37
diff changeset
   148
isUnresolved
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 37
diff changeset
   149
    ^ type isUnresolved
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 37
diff changeset
   150
edb5e4849b79 Type resolving reintroduced again.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 37
diff changeset
   151
    "Created: / 06-07-2015 / 22:41:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   152
! !
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   153
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   154
!CConstNode class methodsFor:'documentation'!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   155
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   156
version
19
1297bf936bfb Some fixes for modern GCC XML
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 18
diff changeset
   157
    ^ '$Id$'
14
1f730d82496e Added version_SVN methods
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 6
diff changeset
   158
!
1f730d82496e Added version_SVN methods
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 6
diff changeset
   159
1f730d82496e Added version_SVN methods
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 6
diff changeset
   160
version_SVN
1f730d82496e Added version_SVN methods
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 6
diff changeset
   161
    ^ '$Id$'
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   162
! !
37
1ad7fb72801a Generate comment in FFI callouts
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 32
diff changeset
   163