ParseWarning.st
author Claus Gittinger <cg@exept.de>
Wed, 03 Apr 2013 19:14:33 +0200
changeset 3061 c15acf373ee6
child 3065 6128bec16783
permissions -rw-r--r--
initial checkin
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
3061
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
"{ Package: 'stx:libcomp' }"
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
Notification subclass:#ParseWarning
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
	instanceVariableNames:'errorMessage startPosition endPosition lineNumber'
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
	classVariableNames:''
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
	poolDictionaries:''
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
	category:'System-Compiler'
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
!
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
!ParseWarning methodsFor:'accessing'!
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
endPosition
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
    ^ endPosition
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
!
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
endPosition:something
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
    endPosition := something.
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
!
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
errorMessage
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
    ^ errorMessage
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
!
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
errorMessage:something
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
    errorMessage := something.
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
!
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
lineNumber
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
    ^ lineNumber
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
!
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
lineNumber:something
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
    lineNumber := something.
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
!
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
startPosition
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
    ^ startPosition
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
!
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
startPosition:something
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
    startPosition := something.
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    43
! !
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45
!ParseWarning class methodsFor:'documentation'!
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    47
version
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    48
    ^ '$Header: /cvs/stx/stx/libcomp/ParseWarning.st,v 1.1 2013-04-03 17:14:33 cg Exp $'
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    49
!
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    50
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
version_CVS
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    52
    ^ '$Header: /cvs/stx/stx/libcomp/ParseWarning.st,v 1.1 2013-04-03 17:14:33 cg Exp $'
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    53
! !
c15acf373ee6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    54