1
0
Fork 0

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:
Holger Hans Peter Freyther 2013-11-12 16:09:31 +01:00
parent 13eff3cdf9
commit 6ddaa3cd5b
2 changed files with 17 additions and 2 deletions

View File

@ -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]

View File

@ -74,9 +74,14 @@ SCCPGlobalTitle subclass: SCCPGlobalTitleTranslation [
nature := aNai
]
address [
<category: 'accessing'>
^addr
]
addr [
<category: 'accessing'>
^ addr
^self address
]
addr: anAddr [