Cface__CDefinitionNode.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Thu, 17 Sep 2015 07:36:40 +0100
changeset 49 307d55f736ec
parent 43 9327987437ae
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: 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
CNode subclass:#CDefinitionNode
11
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
     6
	instanceVariableNames:'cName smalltalkName ignore'
1
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
!CDefinitionNode 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: / 29-10-2007 / 20:21:24 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    17
    "Created: #acceptVisitor: / 02-11-2007 / 10:36:55 / haja"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    18
! !
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    19
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    20
!CDefinitionNode methodsFor:'accessing'!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    21
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    22
cName
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    23
    ^ cName
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    24
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    25
    "Created: / 10-02-2008 / 19:06:12 / janfrog"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    26
!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    27
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    28
cName:aString
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    29
    cName := aString.
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
    "Created: / 10-02-2008 / 19:06:12 / janfrog"
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
11
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    34
ignore
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    35
    ^ ignore ? false
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    36
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    37
    "Created: / 22-02-2009 / 14:57:53 / Jan Vrany <vranyj1@fel.cvut.cz>"
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    38
!
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    39
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    40
ignore:aBoolean
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    41
    ignore := aBoolean.
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    42
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    43
    "Created: / 22-02-2009 / 14:57:53 / Jan Vrany <vranyj1@fel.cvut.cz>"
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    44
!
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    45
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    46
smalltalkName
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    47
    ^ smalltalkName
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    48
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    49
    "Created: / 10-02-2008 / 19:06:12 / janfrog"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    50
!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    51
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    52
smalltalkName:aStringOrSymbol
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    53
    smalltalkName := aStringOrSymbol asSymbol
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    54
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    55
    "Created: / 10-02-2008 / 19:06:12 / janfrog"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    56
    "Modified: / 12-02-2008 / 22:05:35 / janfrog"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    57
! !
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    58
11
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    59
!CDefinitionNode methodsFor:'queries'!
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    60
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    61
shouldBeIgnored
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    62
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    63
    ^ignore ? false
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    64
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    65
    "Created: / 22-02-2009 / 15:00:08 / Jan Vrany <vranyj1@fel.cvut.cz>"
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    66
    "Modified: / 22-02-2009 / 21:55:03 / Jan Vrany <vranyj1@fel.cvut.cz>"
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    67
! !
a77f44d45a27 Initial support for GTK
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    68
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    69
!CDefinitionNode methodsFor:'visiting'!
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    70
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    71
acceptVisitor:aVisitor 
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    72
    "Double dispatch back to the visitor, passing my type encoded in
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    73
     the selector (visitor pattern)"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    74
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    75
    "stub code automatically generated - please change if required"
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    76
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    77
    ^self subclassResponsibility
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    78
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    79
    "Created: / 02-11-2007 / 10:36:55 / haja"
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
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    82
!CDefinitionNode class methodsFor:'documentation'!
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
version
19
1297bf936bfb Some fixes for modern GCC XML
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 14
diff changeset
    85
    ^ '$Id$'
14
1f730d82496e Added version_SVN methods
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 11
diff changeset
    86
!
1f730d82496e Added version_SVN methods
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 11
diff changeset
    87
1f730d82496e Added version_SVN methods
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 11
diff changeset
    88
version_SVN
1f730d82496e Added version_SVN methods
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 11
diff changeset
    89
    ^ '$Id$'
1
b6c0180314d1 Initial import
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    90
! !
43
9327987437ae Added mappings for LLVM C and LLVM C Extensions
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 32
diff changeset
    91