DISectionTypes.st
author Jan Vrany <jan.vrany@labware.com>
Thu, 27 Oct 2022 14:53:59 +0100
branchjv
changeset 4735 3b11fb3ede98
parent 4383 b93f1405b8c7
permissions -rw-r--r--
Allow single underscore as method / block argument and temporaries This commit is a follow up for 38b221e.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
4383
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     1
"
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     2
 COPYRIGHT (c) 1989 by Claus Gittinger / eXept Software AG
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     3
 COPYRIGHT (c) 2016 Jan Vrany
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     4
              All Rights Reserved
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     5
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     6
 This software is furnished under a license and may be used
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     7
 only in accordance with the terms of that license and with the
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     8
 inclusion of the above copyright notice.   This software may not
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     9
 be provided or otherwise made available to, or used by, any
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    10
 other person.  No title to or ownership of the software is
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    11
 hereby transferred.
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    12
"
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    13
"{ Package: 'stx:libcomp' }"
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    14
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    15
"{ NameSpace: Smalltalk }"
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    16
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    17
SharedPool subclass:#DISectionTypes
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    18
	instanceVariableNames:''
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    19
	classVariableNames:'DbgInfoSectionVariableTable'
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    20
	poolDictionaries:''
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    21
	category:'System-Compiler-Debug Info'
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    22
!
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    23
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    24
!DISectionTypes class methodsFor:'documentation'!
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    25
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    26
copyright
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    27
"
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    28
 COPYRIGHT (c) 1989 by Claus Gittinger / eXept Software AG
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    29
 COPYRIGHT (c) 2016 Jan Vrany
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    30
              All Rights Reserved
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    31
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    32
 This software is furnished under a license and may be used
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    33
 only in accordance with the terms of that license and with the
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    34
 inclusion of the above copyright notice.   This software may not
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    35
 be provided or otherwise made available to, or used by, any
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    36
 other person.  No title to or ownership of the software is
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    37
 hereby transferred.
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    38
"
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    39
! !
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    40
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    41
!DISectionTypes class methodsFor:'initialization'!
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    42
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    43
initialize
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    44
    "Invoked at system start or when the class is dynamically loaded."
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    45
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    46
    DbgInfoSectionVariableTable := 16r01.
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    47
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    48
    "Modified: / 10-07-2018 / 12:32:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    49
! !
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    50
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    51
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    52
DISectionTypes initialize!