sccp: GTI means global title indication but we work with GTs
Rename some methods as we work with global titles and not the global title indication.
This commit is contained in:
parent
13eff3cdf9
commit
6ddaa3cd5b
|
@ -129,13 +129,23 @@ Object subclass: SCCPAddress [
|
|||
^ gti_ind
|
||||
]
|
||||
|
||||
gti: aGlobalTitle indicator: aGtiInd [
|
||||
globalTitle: aGlobalTitle indicator: aGtiInd [
|
||||
<category: 'gti'>
|
||||
globalTitle := aGlobalTitle.
|
||||
gti_ind := aGtiInd bitAnd: 16rF.
|
||||
]
|
||||
|
||||
gti: aGlobalTitle indicator: aGtiInd [
|
||||
<category: 'gti'>
|
||||
self globalTitle: aGlobalTitle indicator: aGtiInd
|
||||
]
|
||||
|
||||
gtiAsParsed [
|
||||
<category: 'gti'>
|
||||
^self parseGlobalTitle
|
||||
]
|
||||
|
||||
parseGlobalTitle [
|
||||
<category: 'gti'>
|
||||
^ gti_ind = 0
|
||||
ifTrue: [nil]
|
||||
|
|
|
@ -74,9 +74,14 @@ SCCPGlobalTitle subclass: SCCPGlobalTitleTranslation [
|
|||
nature := aNai
|
||||
]
|
||||
|
||||
address [
|
||||
<category: 'accessing'>
|
||||
^addr
|
||||
]
|
||||
|
||||
addr [
|
||||
<category: 'accessing'>
|
||||
^ addr
|
||||
^self address
|
||||
]
|
||||
|
||||
addr: anAddr [
|
||||
|
|
Reference in New Issue