hg/stx-libcomp: DIVariableTable.st@16741aa9dc2e (annotated)

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	DISection subclass:#DIVariableTable
4385 16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	18	instanceVariableNames:'variables_count variables'
4383 b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	19	classVariableNames:''
4384 aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	20	poolDictionaries:'DISectionTypes'
4383 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	!DIVariableTable 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
4384 aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	41	!DIVariableTable class methodsFor:'instance creation'!
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	42
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	43	new
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	44	"return an initialized instance"
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	45
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	46	^ self basicNew initialize.
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	47	! !
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	48
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	49	!DIVariableTable methodsFor:'accessing'!
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	50
4385 16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	51	variables
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	52	^ variables
4384 aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	53	!
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	54
4385 16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	55	variablesCount
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	56	^ variables_count
4384 aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	57
4385 16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	58	"Created: / 15-07-2018 / 11:48:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
4384 aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	59	! !
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	60
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	61	!DIVariableTable methodsFor:'adding & removing'!
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	62
4385 16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	63	addVariable: aDIVariable
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	64	variables := variables copyWith: aDIVariable.
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	65	variables_count := variables_count + 1
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	66
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	67	"Created: / 14-07-2018 / 20:52:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	68	!
4384 aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	69
4385 16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	70	addVariableNamed:aString isArgument:aBoolean offset:anOnteger physicalBlock: physical lexicalBlock: lexical
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	71	self addVariable:((DIVariable new)
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	72	physicalBlockSourceOffset: (physical isNil ifTrue:[0] ifFalse:[physical startPosition]);
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	73	lexicalBlockSourceOffset: (lexical isNil ifTrue:[0] ifFalse:[lexical startPosition]);
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	74	frameOffset:anOnteger;
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	75	isArgument:aBoolean;
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	76	name:aString)
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	77
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	78	"Created: / 06-02-2019 / 22:30:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	79	"Modified: / 07-02-2019 / 21:57:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
4384 aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	80	! !
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	81
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	82	!DIVariableTable methodsFor:'initialization'!
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	83
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	84	initialize
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	85	"Invoked when a new instance is created."
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	86
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	87	type := DbgInfoSectionVariableTable.
4385 16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	88	variables_count := 0.
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	89	variables := #()
4384 aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	90
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	91	"/ super initialize. -- commented since inherited method does nothing
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	92
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	93	"Modified: / 15-07-2018 / 12:33:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	94	! !
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	95
4383 b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	96	!DIVariableTable methodsFor:'reading & writing'!
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	97
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	98	decode: aStream
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	99	size := aStream nextUnsignedInt16MSB: UninterpretedBytes isBigEndian.
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	100	type := aStream nextByte.
4385 16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	101	variables_count := aStream nextUnsignedInt16MSB: UninterpretedBytes isBigEndian.
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	102	variables := (1 to: variables_count) collect: [ :i \| DIVariable decode: aStream ].
4383 b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	103
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	104	"Created: / 10-07-2018 / 12:50:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
4385 16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	105	"Modified: / 06-02-2019 / 22:28:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
4384 aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	106	!
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	107
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	108	encode: aStream
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	109	self encodePrepare: aStream.
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	110	aStream nextPutByte: type.
4385 16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	111	aStream nextPutInt16: variables_count MSB: UninterpretedBytes isBigEndian.
16741aa9dc2e DBG: refactor variable table to use new flat format Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4384 diff changeset	112	variables do:[:block \| block encode: aStream ].
4384 aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	113	self encodeFinish: aStream.
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	114
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	115	"Created: / 15-07-2018 / 10:56:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
4383 b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	116	! !
b93f1405b8c7 DBG: Added classes representing Smalltalk/X debug info. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	117
4384 aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	118	!DIVariableTable methodsFor:'testing'!
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	119
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	120	isVariableTableSection
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	121	^ true
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	122
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	123	"Created: / 15-07-2018 / 11:27:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	124	! !
aee25576d864 DBG: teach `ByteCodeCompiler` to generate Smalltalk/X debug info Jan Vrany <jan.vrany@fit.cvut.cz> parents: 4383 diff changeset	125

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Thu, 07 Feb 2019 12:01:36 +0000
branch	jv
changeset 4385	16741aa9dc2e
parent 4384	aee25576d864
child 4654	f001d36a3229
permissions	-rw-r--r--