PPU207Á€"iV
uð߄.ŠûãwŽp


PascalReaderTool
U+
pascalreadertool.pasæÿ^
codetools.incàXŽX`

System|rNƒ”j`ºΣáobjpas,Úފü>.¯nÿËClassesÞo£WùÅðý«Xì¦sysutilsâ1.Ӧ£Gb<sÆLazFileUtils’Iió\ñͭR,œÓ	LazDbgLogù[
µö
ÁâÜÄÃJ	FileProcsª¤ÇÞmīpÙÒvÐCodeToolsStrConsts?cuy“O5ÜÄÃJCodeTreeQø%ީ¨«°É€s	CodeCache™Ì:‹>~LoÁ*ðSCodeAtom·ÔJŽd»
lˆÍ)ÝPascalParserTool­·Õ^b'™ñ¼›öKeywordFuncLists5·™p5û>ÆŠõjBasicCodeToolsoc^ŸTã	{P¥°¢LinkScannerH›¡ñ‰FV…íY
pascalreadertool.o



	


d

R¿
SYSTEMPASCALPARSERTOOLCODETREE	CODECACHECODEATOMCLASSES	FILEPROCSCUSTOMCODETOOLLINKSCANNEROBJPASBASICCODETOOLSCODETOOLSSTRCONSTSKEYWORDFUNCLISTSSYSUTILSLAZFILEUTILS	LAZDBGLOG»4




"


#
(









6






0

â







3















9

;



6







@















F












K










P









T









X

















_








c


@
6

f



6

i











6






r



6








y








~



6







„



6

‡



6

Š



6





6





’



6







—


@
6

š


@
6





6




¡



6

¤



6

§



6

ª



6



®

°



6







µ



6







º


6






¿



™







Ä



6

Ç

É



Ì



6



Ð


@
6

Ó


6
6







Ù
Û


6
6





à
Û


6




6



ä.
æ


6




6



é0
ë


6
6

î



6

ñ


6

ô



6







ù



6

ü



6








6








6






6











6









6






6





6
6








6
6






6


!



6


$


6
6


'



6


*



6


-



6


0



6


3



6


6



6


9



6


<



6


?



6




C


E




H



6




L



6








Q


6
6








W


6
6








]


6
6

@




b


6
6


W


6
6






i


6
6


l


n


6
6




r


6
6




v



6


y


6












6











†


6
6


‰


6
6


Œ


6
6





6
6


’



6


•



6


˜


6
6


›


6
6


ž


6
6


¡



6



¥



6




©


6
6



­

¯


6
6


²



6


µ



6




¹



6




½


6
6


À



6





Ä



6


Ç


6
6


Ê



6


Í



6


Ð



6


Ó


6
6




×


6
6


Ú




6


Ý






6




às



ã


6
6


æ



6








ë



6








ð






ó






ö




ø




û




ý










6





6
























y







6

y













™















™

™

*
























*



™



^

9



6

^

9



s

?
	

 !"#$%&'()*+,-/123456789:;<=>?@ABCDEFGHIJKLMPNOQRSTUVWXYZ[\]^_`abcdefghijklmnopqrtuvwxyz{|}~€‚ƒ„…†‡

“
	




'
(
)
*
+
:
;
<

J
$
%
+


L

~
ƒ
„
‡
ˆ
‰
Œ

Ž
¡
¤‡

p

v

w

y

z

{@



ê
x






è
牊‹ŒŽ‘’“”•–—˜™š›œžŸ ¡¢£¤¥¦§¨©ª«¬­





”






ß






ß



L
ß



ß







ß




ß




ß







ß







ß







ß




ß

ß




ß




ß




















6







—













-





























^


























j

























}












ƒ


















s











6







6
















6







6


















Ã






Ã













Ì





Ì








Ñ
ˆ®¯°±²


{





æ³

U
	j
B
—
¢
Ÿ
.

7
Ú

º
-


[

^

m

b

Q
 

É

Ž




'
ó




t

(

*
¶
e
»
¾
o
,

l
Ê
Ú
*

.
;
E

B
+



Ì

<
F

:
+
÷


ˆ

j
Ç
ñ



î
æ
ç
ò
é

-
t

_

Š







ë

\
y
~
«





‹

°

”

]
=
c
‹
Œ

y

ƒ

Z

€
2
Á






x




`
Ï


ì




‚
ñ

c

g

ƒ

h

p

i

j

k


»


}

q


z

‰
…

‹


n

g

›

Ÿ


¡

¢

Œ

Ž



h

¾

r


Ë

s


 
Ú
Ý
e

]

¹



^


…


9


¨

©
	






¤




f

ð



Ü

É

í
ï

o

A
D
?

9
¯
¹




‡
.

ª

i

˜

l


T

U

V

W

²

±





‹
)


;

Â

 

Ã

½

¸

À
>
F
D


?

»

S

º

X

Y

p

{

z

|

~

‚

ƒ
#
j


r
|
©
ª
>
d

X
-
Þ

˜

ª


-

«

^

_


ý


ü
æ

‚
q

c

e


g

m


g
v
‚



Õ

"


.
³


Ó

Ÿ



Ð
0
1
J
f
n
o
g
]
e
—
˜
™

î
D
G
X

ˆ
¼


š

Y

[

`

f

y



…

²

½


o


‚
ü
[
ø3(
1”[øùú#
phmDeprecated
1!phmPlatform
2
 
phmLibrary
3&phmUnimplemented
4%phmExperimental
5 û,
2
&”.(
14”[øùú 
epriInCode
:<#
epriInComment
;B
%epriInDirective
<Hû(
1N”[øùúmgMethod
BV#
mgConstructor
C\
(mgClassConstructor
Db'mgClassDestructor 
Eh%mgClassOperator!
Fnû<
-t¼TPascalMethodHeader^[øùú&Name

I|,
ResultType
I…'Group
JŽû(
1””[øùú#
csvEverything$
Nœ)csvPrivateAndHigher%
O¢
+csvProtectedAndHigher&
P¨(csvPublicAndHigher'
Q®û7
3´”¼€[øùú)"Sender)
S#
ÅÎ
5"IdentifierCleanPos*
T
ÐÙ("Range+
T"
Ûá'"Node,
U
ãì('"Data-
U
î÷2("Abort.
U-ù
<("$self/
Y

B

û

0
¾TPascalReaderToolp
¨

 
%[ d m v  ˆ ‘ š £ ¬ µ ¾ Ç Ð Ù â ë ô ý !!!!!*!3!<!E!N!W!`!i!o!x!!Š!“!œ!^[ø}+)
-
ÿÿI
O

y

FPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_RAISESTRCONSTEXPECTED$INT64[øùú%"id1
\%
6
?


("$self2
\
A
BG

û¡+	U
Y
ÿÿ®
´

~

JPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_CLEANPOSISINCOMMENT$crc7F50489E[øùú+"CleanPos4
_"
b
k


6"CleanCodePosInFront5
_,
m
v

/"CommentStart6
`
x


-"
CommentEnd7
`ƒ
Œ
(
5"OuterCommentBounds8
a	
Ž
—
2
2$defOUTERCOMMENTBOUNDS9
a	€



("$self:
_
¦
B¬

û»+
º
¾
ÿÿð
ö

ø
dPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTNODE$TCODETREENODE$TPROCHEADATTRIBUTES$$ANSISTRING[øùú("ANode<
d
Ç
Ð


'"Attr=
e	
Ò
Û

("$self>
d
Ý
Bã

+"$result?
øå
Aî

û™+ü
ÿÿ=C

BPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTCODE$crcC4A7F389[øùú+"StartPosA
f
	

)"EndPosB
f$

'"AttrC
g	
(
("$selfD
f
*B0
+"$resultE
2A;
û¹+IMÿÿ…

bPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTBRACKETS$LONGINT$TPROCHEADATTRIBUTES$$ANSISTRING[øùú2"BracketStartPosG
h
V_

'"AttrH
i	
aj
("$selfI
h
lBr
+"$resultJ
tA}
û¹+
‹ÿÿÁÇ
C
bPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTIDENTIFIERWITHPOINTS$LONGINT$BOOLEAN$$ANSISTRING[øùú+"StartPosL
j*
˜¡

3"ExceptionOnErrorM
k	
£¬
("$selfN
j
®B´
+"$resultO
C¶A¿
û¹+ÍÑÿÿøþ
U
bPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTNEXTTYPEREF$BOOLEAN$TPROCHEADATTRIBUTES$$BOOLEAN[øùú&"AddQ
l!
Úã

'"AttrR
l5

åî
("$selfS
l
ðBö
û©+ÿÿ/5
m
RPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTNEXTSPECIALIZEPARAMS$crcCDA8A23D[øùú&"AddU
m*


'"AttrV
n

%
("$selfW
m
'B-
û±+;?ÿÿ‡
æ
ZPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTIDENTCHARSFROMSTRINGCONSTANT$crc9D539F29[øùú+"StartPosY
p	
HQ

)"MinPosZ
p
S\
)"MaxPos[
p
^g
)"MaxLen\
p#
ir(
("$self]
o
tBz
+"$result^
æ|A…
û­+“—ÿÿ¾Ä

VPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_READSTRINGCONSTANTVALUE$LONGINT$$ANSISTRING[øùú+"StartPos`
q&
 ©

("$selfa
q
«B±
+"$resultb
³A¼
û¨+ÊÎÿÿêð
l
QPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETNODEIDENTIFIER$TCODETREENODE$$PCHAR[øùú'"Noded
r 
×à

("$selfe
r
âBè
û¶+öúÿÿ
{
_PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETHINTMODIFIERS$TCODETREENODE$$TPASCALHINTMODIFIERS[øùú'"Nodeg
s
	

("$selfh
s
B
û©+#ÿÿ~„
Õ
RPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FOREACHIDENTIFIERINCLEANSRC$crc43FAED81[øùú+"StartPosj
t+
,5

)"EndPosk
t5
7@
/"SkipCommentsl
u	
BK
'"Nodem
u 
MV(
/"OnIdentifiern
v

X^2
'"Datao
v2
`i<
("Abortp
w

ktF
("$selfq
t
vB|
û¥+ŠŽÿÿÓÙ
~
NPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FOREACHIDENTIFIERINNODE$crc867C1098[øùú'"Nodes
x'
— 

/"SkipCommentst
x<
¢«
/"OnIdentifieru
y

­³
'"Datav
y2
µ¾(
("Abortw
yE
ÀÉ2
("$selfx
x
ËBÑ
û·+ßãÿÿ
¨
`PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FOREACHIDENTIFIER$BOOLEAN$TONEACHPRIDENTIFIER$POINTER[øùú/"SkipCommentsz
z!
ìõ

/"OnIdentifier{
{

÷ý
'"Data|
{2
ÿ
("$self}
z

B
û»+"ÿÿ_e

dPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTPROPTYPE$TCODETREENODE$BOOLEAN$BOOLEAN$$ANSISTRING[øùú+"PropNode
~
+4

."InUpperCase€

6?
1"EmptyIfIndexed
+
AJ
("$self‚
~
LBR
+"$resultƒ
TA]
û­+koÿÿ‹‘
“
VPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_MOVECURSORTOPROPTYPE$TCODETREENODE$$BOOLEAN[øùú+"PropNode…
€#
x

("$self†
€
ƒB‰
û­+—›ÿÿ·½
¬
VPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_MOVECURSORTOPROPNAME$TCODETREENODE$$BOOLEAN[øùú+"PropNodeˆ
#
¤­

("$self‰

¯Bµ
û¨+ÃÇÿÿãé
¼
QPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_MOVECURSORBEHINDPROPNAME$TCODETREENODE[øùú+"PropNode‹
‚(
ÐÙ

("$selfŒ
‚
ÛBá
û³+ïóÿÿ%+
Œ
\PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTPROPNAME$TCODETREENODE$BOOLEAN$$ANSISTRING[øùú+"PropNodeŽ
ƒ
ü

."InUpperCase
„

("$self
ƒ
B
+"$result‘
ŒA#
û+15ÿÿgm
—
FPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTPROPERTY$crc45C3788E[øùú+"PropNode“
…
>G

'"Attr”
†
IR
("$self•
…
TBZ
+"$result–
—\Ae
û°+swÿÿ“™
Ã
YPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETPROPERTYNAMEIDENTIFIER$TCODETREENODE$$PCHAR[øùú+"PropNode˜
‡(
€‰

("$self™
‡
‹B‘
û°+Ÿ£ÿÿ¿Å
Í
YPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETPROPERTYTYPEIDENTIFIER$TCODETREENODE$$PCHAR[øùú+"PropNode›
ˆ(
µ

("$selfœ
ˆ
·B½
û·+ËÏÿÿöü
Ø
`PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_POSITIONINPROPERTYNAME$TCODETREENODE$LONGINT$$BOOLEAN[øùú+"PropNodež
‰%
Øá

+"CleanPosŸ
Š%
ãì
("$self 
‰
îBô
ûª+ ÿÿ"(
É
SPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_PROPERTYISDEFAULT$TCODETREENODE$$BOOLEAN[øùú/"PropertyNode¢
‹ 


("$self£
‹
B 
û±+!.2ÿÿNT
Ô
ZPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_PROPERTYNODEHASPARAMLIST$TCODETREENODE$$BOOLEAN[øùú+"PropNode¥
Œ'
;D

("$self¦
Œ
FBL
û«+"Z^ÿÿz€
à
TPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_PROPNODEISTYPELESS$TCODETREENODE$$BOOLEAN[øùú+"PropNode¨
!
gp

("$self©

rBx
û¢+#†ŠÿÿÉÏ
ð
KPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_PROPERTYHASSPECIFIER$crcE080345D[øùú+"PropNode«
Ž#
“œ

/"UpperKeyword¬

ž§
6"ExceptionOnNotFound­
(
©²
3$defEXCEPTIONONNOTFOUND®
(€
¸

("$self¯
Ž
ÁBÇ
û+$ÕÙÿÿ
#
FPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTPROCNAME$crc45C3788E[øùú+"ProcNode±
’
âë

'"Attr²
“	
íö
("$self³
’
øBþ
+"$result´
#A	
û+%ÿÿMS
T
FPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTPROCHEAD$crc45C3788E[øùú+"ProcNode¶
”
$-

'"Attr·
•	
/8
("$self¸
”
:B@
+"$result¹
TBAK
û¦+&Y]ÿÿ‰
(
OPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTPROCHEADWITHGROUP$crc50232192[øùú+"ProcNode»
–'
cl

'"Attr¼
—	
nw
("$self½
–
yB
+"$result¾
(A‡
û¤+'•™ÿÿËÑ
1
MPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTPROCEDUREHEADER$crc9916F080[øùú,"	CursorPosÀ
˜%
¢«

-"
AttributesÁ
™
­¶
+"ProcHeadÂ
™,¸Á
("$selfÃ
˜
ÃBÉ
û¨+(×Ûÿÿ2	8	
¼
QPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTCLASSNAMEOFPROCNODE$crcA3C15ADA[øùú+"ProcNodeÅ
š)
äí

3"AddParentClassesÆ
›	
ïø
0$defADDPARENTCLASSESÇ
›	€
þ

."KeepGenericÈ
›+
		
+$defKEEPGENERICÉ
›+€
	
("$selfÊ
š
	B%	
+"$resultË
¼'	A0	
û¢+)>	B	ÿÿi	o	
Ì
KPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_PROCNODEHASSPECIFIER$crcAAD30AE7[øùú+"ProcNodeÍ
œ#
K	T	

+"ProcSpecÎ
	
V	_	
("$selfÏ
œ
a	Bg	
û¬+*u	y	ÿÿ•	›	
ä
UPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETPROCNAMEIDENTIFIER$TCODETREENODE$$PCHAR[øùú+"ProcNodeÑ
ž$
‚	‹	

("$selfÒ
ž
	B“	
ûš++¡	¥	€ÿÿñ	÷	

CPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDPROCNODE$crcFC7F5F98[øùú,"	StartNodeÔ
Ÿ
®	·	

,"	AProcHeadÕ
Ÿ;

¹	Â	
0"
AProcSpecTypeÖ
 	
Ä	Ê	
'"Attr×
¡	
Ì	Õ	(
-"
VisibilityØ
¡$
×	Ý	2
*$defVISIBILITYÙ
¡$€
ã	
("$selfÚ
Ÿ
é	Bï	
ûš+,ý	

€ÿÿB
H

à
CPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDPROCNODE$crc439504B7[øùú,"	StartNodeÜ
¢





,"	AProcHeadÝ
¢;




'"AttrÞ
£	

&

-"
Visibilityß
£$
(
.
(
*$defVISIBILITYà
£$€
4

("$selfá
¢
:
B@

û§+-N
R
ÿÿ
–


PPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDCORRESPONDINGPROCNODE$crcDC51364A[ø
,2.[
_
ùú+"ProcNodeâ
¤(
h
q


'"Attrã
¥	
s
|

;$defATTRä
¥	€‚
("$selfå
¤
ˆ
BŽ

û¬+/œ
 
ÿÿÞ
ä

N
UPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDCORRESPONDINGPROCPARAMNODE$crcDC51364A[ø
,20©
­
ùú0"
ProcParamNodeç
§-
¶
¿


'"Attrè
¨	
Á
Ê

;$defATTRé
¨	€Ð

("$selfê
§
Ö
BÜ

û«+1ê
î
ÿÿ

~
TPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDPROCBODY$TCODETREENODE$$TCODETREENODE[øùú+"ProcNodeì
ª
÷


("$selfí
ª
Bû¨+2ÿÿ6<
‹
QPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_PROCBODYISEMPTY$TCODETREENODE$$BOOLEAN[øùú+"ProcNodeï
«
#,

("$selfð
«
.B4
û¹+3BFÿÿ_e
p

bPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTPROCEDUREGROUP$TCODETREENODE$$TPASCALMETHODGROUP[øùú+"ProcNodeò
¬$
LU

("$selfó
¬
WB]
û£+4koÿÿ¡§
i
LPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTFUNCRESULTTYPE$crc45C3788E[øùú+"ProcNodeõ
­$
x

'"Attrö
®	
ƒŒ
("$self÷
­
ŽB”
+"$resultø
i–AŸ
û®+5­±ÿÿÍÓ
¸
WPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_MOVECURSORTOFIRSTPROCSPECIFIER$TCODETREENODE[øùú+"ProcNodeú
¯.
ºÃ

("$selfû
¯
ÅBË
û§+6ÙÝÿÿ

î
PPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_MOVECURSORTOPROCSPECIFIER$crcAAD30AE7[øùú+"ProcNodeý
°(
æï

+"ProcSpecþ
±	
ñú
("$selfÿ
°
üB
û¬+7ÿÿ;A

UPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_MOVECURSORTOPROCNAME$TCODETREENODE$BOOLEAN[øùú+"ProcNode


²$
&

0"
SkipClassName

³	
(1
("$self

²
3B9
û¨+8GKÿÿgm
,
QPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_MOVECURSORBEHINDPROCNAME$TCODETREENODE[øùú+"ProcNode

´(
T]

("$self

´
_Be
û»+9swÿÿ©¯
B
dPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_POSITIONINPROCNAME$TCODETREENODE$BOOLEAN$LONGINT$$BOOLEAN[øùú+"ProcNode

µ!
€‰

0"
SkipClassName	

¶!
‹”
+"CleanPos


¶9
–Ÿ
("$self

µ
¡B§
û¹+:µ¹ÿÿàæ
^
bPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_POSITIONINFUNCRESULTNAME$TCODETREENODE$LONGINT$$BOOLEAN[øùú+"ProcNode


·'
ÂË

+"CleanPos

¸'
ÍÖ
("$self

·
ØBÞ
û­+;ìðÿÿ


'

VPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_PROCNODEHASPARAMLIST$TCODETREENODE$$BOOLEAN[øùú+"ProcNode

¹#
ù


("$self

¹

B


û¬+<

ÿÿ8
>

;

UPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_PROCNODEHASOFOBJECT$TCODETREENODE$$BOOLEAN[øùú+"ProcNode

º"
%
.


("$self

º
0
B6

û·+=D
H
ÿÿ|
‚

L

`PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETPROCPARAMLIST$TCODETREENODE$BOOLEAN$$TCODETREENODE[øùú+"ProcNode

»
Q
Z


("Parse

¼
\
e

%	$defPARSE

¼€
k


("$self

»
t
Bz

û°+>ˆ
Œ
ÿÿ¨
®

_

YPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETPROCRESULTNODE$TCODETREENODE$$TCODETREENODE[øùú+"ProcNode

½ 
•
ž


("$self

½
 
B¦
û¨+?´
¸
ÿÿÔ
Ú

Ì

QPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_NODEISINAMETHOD$TCODETREENODE$$BOOLEAN[øùú'"Node

¾
Á
Ê


("$self 

¾
Ì
BÒ

û©+@à
ä
ÿÿ
Ú

RPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_NODEISMETHODBODY$TCODETREENODE$$BOOLEAN[øùú+"ProcNode"

¿
í
ö


("$self#

¿
ø
Bþ

û®+Aÿÿ,2
ì

WPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETMETHODOFBODY$TCODETREENODE$$TCODETREENODE[øùú'"Node%

À
"

("$self&

À
$B*
û§+B8<ÿÿX^
ó

PPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_NODEISFUNCTION$TCODETREENODE$$BOOLEAN[øùú+"ProcNode(

Á
EN

("$self)

Á
PBV
û»+Cdhÿÿ„Š
ÿ
dPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_NODEISCLASSCONSTRUCTORORDESTRUCTOR$TCODETREENODE$$BOOLEAN[øùú+"ProcNode+

Â1
qz

("$self,

Â
|B‚
ûª+D”ÿÿ°¶
ý

SPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_NODEISCONSTRUCTOR$TCODETREENODE$$BOOLEAN[øùú+"ProcNode.

à 
¦

("$self/

Ã
¨B®
û©+E¼ÀÿÿÜâ

RPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_NODEISDESTRUCTOR$TCODETREENODE$$BOOLEAN[øùú+"ProcNode1

Ä
ÉÒ

("$self2

Ä
ÔBÚ
ûª+Fèìÿÿ
&
SPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_NODEISFORWARDPROC$TCODETREENODE$$BOOLEAN[øùú+"ProcNode4

Å 
õþ

("$self5

Å
Bû§+Gÿÿ4:
2
PPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_NODEISOPERATOR$TCODETREENODE$$BOOLEAN[øùú+"ProcNode7

Æ
!*

("$self8

Æ
,B2
û¯+H@Dÿÿ`f
?
XPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_NODEISRESULTIDENTIFIER$TCODETREENODE$$BOOLEAN[øùú'"Node:

Ç%
MV

("$self;

Ç
XB^û©+IlpÿÿŒ’
G
RPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_NODEISRESULTTYPE$TCODETREENODE$$BOOLEAN[øùú'"Node=

È
y‚

("$self>

È
„BŠûž+J˜œÿÿþ
C
GPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTCLASSNAME$crcEFAF39E8[øùú'"Node@

Ë
¥®

."InUpperCaseA

Ì	
°¹
."WithParentsB

Ì
Ȁ
+$defWITHPARENTSC

Ì€
Ê

4"WithGenericParamsD

Í	
ÓÜ(
1$defWITHGENERICPARAMSE

Í	€
â
("$selfF

Ë
ëBñ
+"$resultG

CóAü
û¬+K
ÿÿ5;
z
UPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTCLASSPATH$TCODETREENODE$$ANSISTRING[øùú'"NodeI

Î
 

("$selfJ

Î
"B(
+"$resultK

z*A3
û¥+LAEÿÿw}
Ÿ
NPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTCLASSINHERITANCE$crc45C3788E[øùú,"	ClassNodeM

Ï&
NW

'"AttrN

Ð	
Yb
("$selfO

Ï
dBj
+"$resultP

ŸlAu
û›+Mƒ‡ÿÿÄÊ
å
DPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDCLASSNODE$crc8B8BE82B[øùú,"	StartNodeR

Ñ
™

-"
AClassNameS

Ò

›¤
1"IgnoreForwardsT

Ó	
¦¯
4"IgnoreNonForwardsU

Ó
±º(
("$selfV

Ñ
¼BÂ
û¤+NÐÔÿÿ
	
MPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDCLASSNODEBACKWARDS$crc8B8BE82B[øùú,"	StartNodeX

Ô%
Ýæ

-"
AClassNameY

Õ

èñ
1"IgnoreForwardsZ

Ö	
óü
4"IgnoreNonForwards[

Ö
þ(
("$self\

Ô
	B
û+O!ÿÿSY
D	
FPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDNESTEDCLASS$crc9B682383[øùú0"
RootClassNode^

×
*3

-"
AClassName_

Ø

5>
,"	SkipFirst`

Ø
@I
("$selfa

×
KBQ
û¬+P_cÿÿ…
x	
UPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDCLASSNODE$TCODETREENODE$$TCODETREENODE[øùú-"
CursorNodec

Ù
lu

("$selfd

Ù
wB}
û¨+Q‹ÿÿÁÇ
ˆ	
QPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDCLASSNODEFORMETHODBODY$crcFE5897CC[øùú+"ProcNodee

Ú)
˜¡

1"IgnoreForwardsf

Û	
£¬
4"IgnoreNonForwardsg

Û
®·
("$selfh

Ú
¹B¿
û¦+RÍÑÿÿ
”	
OPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDCLASSORINTERFACENODE$crc889A5620[øùú-"
CursorNodej

Ü'
Úã

4"FindClassOfMethodk

Ý	
åî
1$defFINDCLASSOFMETHODl

Ý	€
ô
("$selfm

Ü
ýB
û´+Sÿÿ<B
¤	
]PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDCLASSSECTION$TCODETREENODE$WORD$$TCODETREENODE[øùú,"	ClassNodeo

Þ
'

+"NodeDescp

ß	
)2
("$selfq

Þ
4B:û¸+THLÿÿsy
¬	
aPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDLASTCLASSSECTION$TCODETREENODE$WORD$$TCODETREENODE[øùú,"	ClassNodes

à#
U^

+"NodeDesct

á	
`i
("$selfu

à
kBqû¨+UƒÿÿŸ¥
´	
QPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETCLASSVISIBILITY$TCODETREENODE$$WORD[øùú'"Nodew

â!
Υ

("$selfx

â
—Bû¦+V«¯ÿÿìò
Å	
OPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDCLASSNODEININTERFACE$crcFB7A97A1[øùú-"
AClassNamez

ã-

¸Á

1"IgnoreForwards{

ä	
ÃÌ
4"IgnoreNonForwards|

ä
Î×
2"ErrorOnNotFound}

ä,
Ùâ(
("$self~

ã
äBê
û¡+WøüÿÿDJ
Þ	
JPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDCLASSNODEINUNIT$crc5BD37336[øùú-"
AClassName€

å(



1"IgnoreForwards

æ	

4"IgnoreNonForwards‚

æ
$
7"IgnoreImplementationƒ

æ,
&/(
2"ErrorOnNotFound„

ç	
1:2
("$self…

å
<BB
û¸+XPTÿÿpv
ù	
aPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDFIRSTIDENTNODEINCLASS$TCODETREENODE$$TCODETREENODE[øùú,"	ClassNode‡

è(
]f

("$selfˆ

è
hBn
û·+Y|€ÿÿœ¢


`PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDLASTIDENTNODEINCLASS$TCODETREENODE$$TCODETREENODE[øùú,"	ClassNodeŠ

é'
‰’

("$self‹

é
”Bš
û·+Z¨¬ÿÿÈÎ


`PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDNEXTIDENTNODEINCLASS$TCODETREENODE$$TCODETREENODE[øùú'"Node

ê'
µ¾

("$selfŽ

ê
ÀBÆû¸+[ÔØÿÿôú
!

aPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDPRIORIDENTNODEINCLASS$TCODETREENODE$$TCODETREENODE[øùú'"Node

ë(
áê

("$self‘

ë
ìBòû·+\ÿÿ &
2

`PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_CLASSSECTIONNODESTARTSWITHWORD$TCODETREENODE$$BOOLEAN[øùú("ANode“

ì-



("$self”

ì
B
û¤+],0ÿÿLR
9

MPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_ISCLASSNODE$TCODETREENODE$$BOOLEAN[øùú'"Node–

í
9B

("$self—

í
DBJû²+^X\ÿÿx~
>

[PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDINHERITANCENODE$TCODETREENODE$$TCODETREENODE[øùú,"	ClassNode™

î"
en

("$selfš

î
pBvû°+_„ˆÿÿ¤ª
P
YPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDHELPERFORNODE$TCODETREENODE$$TCODETREENODE[øùú-"
HelperNodeœ

ï 
‘š

("$self

ï
œB¢û´+`°´ÿÿÐÖ
Z
]PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDCLASSEXTERNALNODE$TCODETREENODE$$TCODETREENODE[øùú,"	ClassNodeŸ

ð$
½Æ

("$self 

ð
ÈBÎû®+aÜàÿÿ

\

WPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_IDENTNODEISINVISIBLECLASSSECTION$crc76A0FBED[øùú'"Node¢

ñ/
éò

-"
Visibility£

ñD
ôú
("$self¤

ñ
üBû±+bÿÿ;A
G

ZPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTRECORDCASETYPE$TCODETREENODE$$ANSISTRING[øùú1"RecordCaseNode¦

ô$
&

("$self§

ô
(B.
+"$result¨

G
0A9
û™+cGKÿÿ„Š
¸
BPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDVARNODE$crc183A046C[øùú,"	StartNodeª

÷
T]

/"UpperVarName«

ø

_h
-"
Visibility¬

ù	
jp
*$defVISIBILITY­

ù	€
v
("$self®

÷
|B‚
û·+d”ÿÿ°¶
Ì
`PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDTYPENODEOFDEFINITION$TCODETREENODE$$TCODETREENODE[øùú1"DefinitionNode°

û	
¦

("$self±

ú
¨B®û³+e¼ÀÿÿÜâ
O
\PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_NODEISPARTOFTYPEDEFINITION$TCODETREENODE$$BOOLEAN[øùú("ANode³

ü)
ÉÒ

("$self´

ü
ÔBÚûµ+fèìÿÿ
]
^PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTDEFINITIONNODETYPE$TCODETREENODE$$ANSISTRING[øùú1"DefinitionNode¶

ý(
õþ

("$self·

ý
B
+"$result¸

]A
û±+g#ÿÿJP
€
ZPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTDEFINITIONNAME$TCODETREENODE$$ANSISTRING[øùú1"DefinitionNodeº

þ$
,5

("$self»

þ
7B=
+"$result¼

€?AH
ûµ+hVZÿÿv|
q
^PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDDEFINITIONNAMENODE$TCODETREENODE$$TCODETREENODE[øùú1"DefinitionNode¾

ÿ%
cl

("$self¿

ÿ
nBtû¹+i‚†ÿÿ­³
Š
bPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_POSITIONINDEFINITIONNAME$TCODETREENODE$LONGINT$$BOOLEAN[øùú2"DefinitionNodeÁ


'
˜

,"CleanPosÂ



'
š£
)"$selfÃ



¥B«
û·+j¹½ÿÿÙß
š
`PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_MOVECURSORTOPARAMETERSPECIFIER$TCODETREENODE$$BOOLEAN[øùú2"DefinitionNodeÅ


-
ÆÏ

)"$selfÆ



ÑB×
û³+kåéÿÿ
­
\PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETFIRSTGROUPVARNODE$TCODETREENODE$$TCODETREENODE[øùú+"VarNodeÈ


#
òû

)"$selfÉ



ýBû´+lÿÿ17
Ü
]PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_NODEISIDENTIFIERININTERFACE$TCODETREENODE$$BOOLEAN[øùú("NodeË


*
'

)"$selfÌ



)B/û¯+m=Aÿÿ]c
ô
XPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_NODECANHAVEFORWARDTYPE$TCODETREENODE$$BOOLEAN[øùú,"TypeNodeÎ


%
JS

)"$selfÏ



UB[ûª+nimÿÿ‰

SPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_NODEISFORWARDTYPE$TCODETREENODE$$BOOLEAN[øùú,"TypeNodeÑ


 
v

)"$selfÒ



B‡ûº+o•™ÿÿÀÆ

cPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDFORWARDTYPENODE$TCODETREENODE$BOOLEAN$$TCODETREENODE[øùú,"TypeNodeÔ


"
¢«

/"SearchFirstÕ

	
"
­¶
)"$selfÖ



¸B¾
û´+pÌÐÿÿìò
g
]PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDTYPEOFFORWARDNODE$TCODETREENODE$$TCODETREENODE[øùú,"TypeNodeØ



$
Ùâ

)"$selfÙ




äBê
ûª+qøüÿÿ
¹
SPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDENDOFWITHEXPR$TCODETREENODE$$LONGINT[øùú/"WithVarNodeÛ


 


)"$selfÜ



B
û¨+r$(ÿÿjp
Ã
QPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTWITHBLOCKEXPRESSION$crc45C3788E[ø
,2s15ùú/"WithVarNodeÞ


)
7@

("Attrß


E
BK
<$defATTRà


E€Q)"$selfá



WB]
+"$resultâ

Ã_Ah
ûµ+tvzÿÿ–œ
Í
^PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDWITHBLOCKSTATEMENT$TCODETREENODE$$TCODETREENODE[øùú/"WithVarNodeä



%
ƒŒ

)"$selfå




ŽB”ûŸ+u¢¦ÿÿØÞ
¦
HPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTARRAYRANGE$crc45C3788E[øùú-"	ArrayNodeç


 
¯¸

("Attrè


	
ºÃ
)"$selfé



ÅBË
+"$resultê

¦ÍAÖ
û +väèÿÿ 
±
IPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTARRAYRANGES$crc45C3788E[øùú-"	ArrayNodeì


!
ñú

("Attrí


	
ü
)"$selfî



B

+"$resultï

±A
ûŸ+w&*ÿÿFL
‘

HPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTSOURCENAME$$ANSISTRING[øùú)"$selfñ



3B9
+"$resultò

‘
;AD
û©+xRVÿÿrx
­

RPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETSOURCENAMEPOS$TATOMPOSITION$$BOOLEAN[øùú+"NamePosô


#_h

)"$selfõ



jBp
û£+y~‚ÿÿ¶¼
Ã

LPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETSOURCENAME$BOOLEAN$$ANSISTRING[øùú/"DoBuildTree÷



‹”

,$defDOBUILDTREEø


€
š

)"$selfù



£B©
+"$resultú

Ã
«A´
û•+zÂÆÿÿ×Ý
T

>PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETSOURCETYPE$$WORD[øùú
)"$selfü



ÏBÕ
û§+{ãçÿÿ	
ˆ

PPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_POSITIONINSOURCENAME$LONGINT$$BOOLEAN[øùú,"CleanPosþ


#
ðù

)"$selfÿ



ûB

û¥+|ÿÿ/5
p

NPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_MOVECURSORTOUSESSTART$TCODETREENODE[øùú,"UsesNode


%
%

)"$self


'B-
û£+};?ÿÿ[a


LPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_MOVECURSORTOUSESEND$TCODETREENODE[øùú,"UsesNode

#
HQ

)"$self


SBY
ûž+~gkÿÿª°


GPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_READNEXTUSEDUNIT$crc781A1614[øùú1"
UnitNameRange

#t}

*"InAtom

2ˆ
4"SyntaxExceptions	
 

Š“
1$defSYNTAXEXCEPTIONS

 
€
™

)"$self


¢B¨
û¯+¶ºÿÿáç
©

XPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_READPRIORUSEDUNIT$TATOMPOSITION$TATOMPOSITION[øùú1"
UnitNameRange

!
%ÃÌ

*"InAtom
!
4Î×
)"$self
!

ÙBß
ûµ+€íñÿÿ%+
À

^PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTUSEDUNITNAMEATCURSOR$PANSISTRING$$ANSISTRING[øùú."
InFilename
"
*
ú

"$defINFILENAME
"
*€	)"$self
"

B
+"$result
À
A#
û»+15ÿÿtz
Ö

dPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_EXTRACTUSEDUNITNAME$TCODETREENODE$PANSISTRING$$ANSISTRING[øùú/"UseUnitNode
#
"
>G

."
InFilename
$

IR
"$defINFILENAME
$
€X)"$self
#

aBg
+"$result
Ö
iAr
û¬+‚€„ÿÿ ¦
â

UPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_READANDCOMPAREUSEDUNIT$ANSISTRING$$BOOLEAN[øùú."
AnUnitName
%
+

–

)"$self
%

˜Bž
û +ƒ¬°ÿÿ/5

IPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDCOMMENTINFRONT$crc79D20093[øùú,"StartPos
(
'

¹Â

/"CommentText 
)


ÄÍ
3"InvokeBuildTree!
)
&
ÏØ
6"SearchInParentNode"
)
7
Úã(
5"WithCommentBounds#
*

åî2
1"
CaseSensitive$
*

ðù<
0"IgnoreSpaces%
*
-
ûF
4"CompareOnlyStart&
+

P
0"CommentStart'
,

Z
."
CommentEnd(
,

%d
)"$self)
(

'B-
û +„;?ÿÿ³¹
)
IPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_FINDCOMMENTINFRONT$crcF6BAAFDA[øùú
,"StartPos+
-
!
HQ

/"CommentText,
.


S\
6"SearchInParentNode-
.
&
^g
5"WithCommentBounds.
/

ir(
1"
CaseSensitive/
/

t}2
0"IgnoreSpaces0
/
-
ˆ<
4"CompareOnlyStart1
0

Š“F
0"CommentStart2
1
•žP
."
CommentEnd3
1
 ©Z
)"$self4
-

«B±
ûŸ+…¿Ãÿÿõû
»
HPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETPASDOCCOMMENTS$crc27CF9E71[øùú,"StartPos5
2
&

ÌÕ

3"InvokeBuildTree6
3
 
×à
9"ListOfPCodeXYPosition7
4
$
âë
)"$self8
2

íBó
û²+†
ÿÿ,2
Ï
[PASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_GETPASDOCCOMMENTS$TCODETREENODE$TFPLIST$$BOOLEAN[øùú("Node:
5
 


9"ListOfPCodeXYPosition;
6
$

"
)"$self<
5

$B*
û™+‡8<DX^
D
BPASCALREADERTOOL$_$TPASCALREADERTOOL_$__$$_CALCMEMSIZE$TCTMEMSTATS[øùú)"Stats=
8

EN

)"$self>
8

PBV
ûùúz2CachedSourceName
[d 
)RaiseStrConstExpected3
\
m'CleanPosIsInComment;
_
sExtractNode@
d
yExtractCodeF
f
#ExtractBracketsK
h
…/ExtractIdentifierWithPointsP
j
‹&ExtractNextTypeRefT
l
‘/ExtractNextSpecializeParamsX
m
—7#ExtractIdentCharsFromStringConstant_
o
+ReadStringConstantValuec
q
£%GetNodeIdentifierf
r
©$GetHintModifiersi
s
¯/ForEachIdentifierInCleanSrcr
t
µ+ForEachIdentifierInNodey
x
»%ForEachIdentifier~
z
Á#ExtractPropType„
~
Ç(MoveCursorToPropType‡
€
Í(MoveCursorToPropNameŠ

Ó,MoveCursorBehindPropName
‚
Ù#ExtractPropName’
ƒ
ß#ExtractProperty—
…
å-GetPropertyNameIdentifierš
‡
ë-GetPropertyTypeIdentifier
ˆ
ñ*PositionInPropertyName¡
‰
÷%PropertyIsDefault¤
‹
ý,PropertyNodeHasParamList§
Œ
&PropNodeIsTypeLessª

	(PropertyHasSpecifier°
Ž
#ExtractProcNameµ
’
#ExtractProcHeadº
”
,ExtractProcHeadWithGroup¿
–
!*ExtractProcedureHeaderÄ
˜
'.ExtractClassNameOfProcNodeÌ
š
-(ProcNodeHasSpecifierÐ
œ
3)GetProcNameIdentifierÓ
ž
9$FindProcNodeÛ
Ÿ@?E-FindCorrespondingProcNodeæ
¤
K2FindCorrespondingProcParamNodeë
§
Q FindProcBodyî
ª
W#ProcBodyIsEmptyñ
«
])ExtractProcedureGroupô
¬
c)ExtractFuncResultTypeù
­
i2MoveCursorToFirstProcSpecifierü
¯
o-MoveCursorToProcSpecifier

°
u(MoveCursorToProcName

²
{,MoveCursorBehindProcName

´
&PositionInProcName

µ
‡,PositionInFuncResultName

·
(ProcNodeHasParamList

¹
“'ProcNodeHasOfObject

º
™$GetProcParamList

»
Ÿ%GetProcResultNode

½
¥#NodeIsInAMethod!

¾
«$NodeIsMethodBody$

¿
±#GetMethodOfBody'

À
·"NodeIsFunction*

Á
½6"NodeIsClassConstructorOrDestructor-

Â
Ã%NodeIsConstructor0

Ã
É$NodeIsDestructor3

Ä
Ï%NodeIsForwardProc6

Å
Õ"NodeIsOperator9

Æ
Û*NodeIsResultIdentifier<

Ç
á$NodeIsResultType?

È
ç$ExtractClassNameH

Ë
í$ExtractClassPathL

Î
ó+ExtractClassInheritanceQ

Ï
ù%
FindClassNodeW

Ñÿ*FindClassNodeBackwards]

Ô
#FindNestedClassb

×
.FindClassNodeForMethodBodyi

Ú
,FindClassOrInterfaceNoden

Ü
$FindClassSectionr

Þ
#(FindLastClassSectionv

à
)&GetClassVisibilityy

â
/,FindClassNodeInInterface

ã
5'FindClassNodeInUnit†

å
;-FindFirstIdentNodeInClass‰

è
A,FindLastIdentNodeInClassŒ

é
G,FindNextIdentNodeInClass

ê
M-FindPriorIdentNodeInClass’

ë
S2ClassSectionNodeStartsWithWord•

ì
YIsClassNode˜

í
_'FindInheritanceNode›

î
e%FindHelperForNodež

ï
k)FindClassExternalNode¡

ð
q4 IdentNodeIsInVisibleClassSection¥

ñ
w)ExtractRecordCaseType©

ô
}FindVarNode¯

÷
ƒ,FindTypeNodeOfDefinition²

ú
‰.NodeIsPartOfTypeDefinitionµ

ü
-ExtractDefinitionNodeType¹

ý
•)ExtractDefinitionName½

þ
›*FindDefinitionNameNodeÀ

ÿ
¡-PositionInDefinitionNameÄ



§3MoveCursorToParameterSpecifierÇ



­)GetFirstGroupVarNodeÊ



³0NodeIsIdentifierInInterfaceÍ



¹+NodeCanHaveForwardTypeÐ



¿&NodeIsForwardTypeÓ



Å(FindForwardTypeNode×



Ë*FindTypeOfForwardNodeÚ




Ñ&FindEndOfWithExprÝ



×/ExtractWithBlockExpressionã



Ý+FindWithBlockStatementæ




ã&ExtractArrayRangeë



é'ExtractArrayRangesð



ï&ExtractSourceNameó



õ%GetSourceNamePosö



û"
GetSourceNameû




 "
GetSourceTypeý



 )PositionInSourceName



 *MoveCursorToUsesStart


 (MoveCursorToUsesEnd


 %ReadNextUsedUnit


 &ReadPriorUsedUnit
!

% 0ExtractUsedUnitNameAtCursor
"

+ (ExtractUsedUnitName
#

1 +ReadAndCompareUsedUnit
%

7 +FindCommentInFront*
(
= C *GetPasDocComments9
2
I O  CalcMemSize?
8

U ûB
-ˆ¥!
°$vmtdef$TPASCALREADERTOOL

^[øùú2&$f0A
;

­!&$f1B
;

¶!&$f2C
;

¿!&$f3D
;

È!&$f4E
;

Ñ! &$f5F
;

Ú!(&$f6G
;

ã!0&$f7H
;

ì!8&$f8I
;

õ!@&$f9J
;

þ!H'$f10K
;

"P'$f11L
;

"X'$f12M
;

"`'$f13N
;

"h'$f14O
;

%"p'$f15P
;

+"x'$f16Q
;

1"€'$f17R
;

7"ˆ'$f18S
;

="'$f19T
;

C"˜'$f20U
;

I" '$f21V
;

O"¨'$f22W
;

U"°'$f23X
;

["¸'$f24Y
;

a"À'$f25Z
;

g"È'$f26[
;

m"Ð'$f27\
;

s"Ø'$f28]
;

y"à'$f29^
;

"è'$f30_
;

…"ð'$f31`
;

‹"ø'$f32a
;

‘"
'$f33b
;

—"
'$f34c
;

"
'$f35d
;

£"
'$f36e
;

©" 
'$f37f
;

¯"(
'$f38g
;

µ"0
'$f39h
;

»"8
'$f40i
;

Á"@
'$f41j
;

Ç"H
'$f42k
;

Í"P
'$f43l
;

Ó"X
'$f44m
;

Ù"`
'$f45n
;

ß"h
'$f46o
;

å"p
'$f47p
;

ë"x
'$f48q
;

ñ"€
'$f49r
;

÷"ˆ
û7
3‰##Ä[øùú("$vmts
;



#D#)"$selft
;


#B!#û7
3Š##'#†[øùú
)"$selfu
;


0#B9#û7
3‹;#?#„[øùú
)"$selfv
;


H#BQ#û7
3ŒS#W#„[øùú0"exceptobjectw
;


`#i#
."
exceptaddrx
;


k#t#)"$selfy
;


v#B#û7
3#…#„[øùú+"messagez
;

Ž#—#
)"$self{
;


™#B¢#û7
3Ž¤#¨#„[øùú
)"$self|
;


±#Bº#û7
3¼#À#„[øùú
)"$self}
;


É#BÒ#û7
3Ô#Ø#„[øùú+"message~
;

á#ê#
)"$self
;


ì#Bõ#û7
3‘÷#û#„[øùú+"message€
;

$
$
)"$self
;


$B$û7
3’$$„[øùú+"message‚
;

'$0$
)"$selfƒ
;


2$B;$û7
3“=$A$„[øùú'"Obj„
;


J$S$
)"$self…
;


U$B^$û7
3”`$d$„[øùú
)"$self†
;


m$Bv$û7
3•x$|$„[øùú)"$self‡
;


…$BŽ$+"$resultˆ
;

$A™$
û7
3–›$Ÿ$Ä[øùú
)"$self‰
;


¨$B±$û7
3—³$·$„[øùú."
NewScannerŠ
;


À$É$
)"$self‹
;


Ë$BÔ$û7
3˜Ö$Ú$„[øùú-"	StartNodeŒ
;


ã$ì$
)"$self
;


î$B÷$û7
3™ù$ý$„[øùú*"AValueŽ
;


%%
)"$self
;


%B%û7
3š% %Ä[øùú
)"$self
;


)%B2%û7
3›4%8%„[øùú)"Range‘
;


A%J%
)"$self’
;


L%BU%û7
3œW%[%Ä[øùú
)"$self“
;


d%Bm%û7
3o%s%„[øùú
)"$self”
;


|%B…%û7
3ž‡%‹%„[øùú
)"$self•
;


”%B%û7
3ŸŸ%£%„[øùú0"TheException–
;


¬%µ%
0"ClearNicePos—
;


·%À%)"$self˜
;


É%BÒ%û7
3 Ô%Ø%„[øùú&"id™
;


á%ê%
,"AMessageš
;


ì%õ%2"ExceptionClass›
;


÷%&0"ClearNicePosœ
;


&&()"$self
;



&B&û7
3¡&&„[øùú&"idž
;


%&.&
,"AMessageŸ
;


0&9&0"ClearNicePos 
;


;&D&)"$self¡
;


M&BV&û7
3¢X&\&„[øùú&"id¢
;


e&n&
,"AMessage£
;


p&y&,"CleanPos¤
;


{&„&)"$self¥
;


†&B&û7
3£‘&•&„[øùú&"id¦
;


ž&§&
,"AMessage§
;


©&²&0"ClearNicePos¨
;


´&½&)"$self©
;


Æ&BÏ&û7
3¤Ñ&Õ&„[øùú&"idª
;


Þ&ç&
,"AMessage«
;


é&ò&0"ClearNicePos¬
;


ô&ý&)"$self­
;


'B'û7
3¥''„[øùú
)"$self®
;


'B''û7
3¦)'-'„[øùú
)"$self¯
;


6'B?'û7
3§A'E'Ä[øùú)"Stats°
;


N'W'
)"$self±
;


Y'B_'û7
3¨a'e'„[øùú
)"$self²
;


n'Bw'û7
3©y'}'„[øùú-"	BeginNode³
;


†''
)"$self´
;


‘'Bš'û7
3ªœ' '„[øùú,"ProcNodeµ
;


©'²'
)"$self¶
;


´'B½'û7
3«¿'Ã'„[øùú2"CleanCursorPos·
;


Ì'Õ'
)"$self¸
;


×'Bà'û7
3¬â'æ'„[øùú)"ANode¹
;


ï'ø'
)"$selfº
;


ú'B(û7
3­(	(„[øùú)"ANode»
;


((
)"$self¼
;


(B&(û‹
+®((,(€ÿÿq(s(
G


4PASCALREADERTOOL_$$_COMPAREMETHODHEADERS$crcBA36C9EA[øùú/"Method1Name½
<
	

5(>(

0"Method1Group¾
<

@(F(
5"Method1ResultType¿
<
F

H(Q(
/"Method2NameÀ
=
	

S(\((
0"Method2GroupÁ
=

^(d(2
5"Method2ResultTypeÂ
=
F

f(o(<
û°
+¯y(}(€ÿÿ–(˜(
T


YPASCALREADERTOOL_$$_COMPAREMETHODHEADERS$TPASCALMETHODHEADER$TPASCALMETHODHEADER$$LONGINT[øùú/"Method1HeadÄ
>
%
†(Œ(

/"Method2HeadÅ
>
M
Ž(”(
ûˆ
+°ž(¢(€ÿÿç(é(
\


1PASCALREADERTOOL_$$_SAMEMETHODHEADERS$crc738800D7[øùú/"Method1NameÆ
@
	

«(´(

0"Method1GroupÇ
@

¶(¼(
5"Method1ResultTypeÈ
@
F

¾(Ç(
/"Method2NameÉ
A
	

É(Ò((
0"Method2GroupÊ
A

Ô(Ú(2
5"Method2ResultTypeË
A
F

Ü(å(<
û­
+±ï(ó(€ÿÿ))
f


VPASCALREADERTOOL_$$_SAMEMETHODHEADERS$TPASCALMETHODHEADER$TPASCALMETHODHEADER$$BOOLEAN[øùú/"Method1HeadÍ
B
"

ü()

/"Method2HeadÎ
B
J

)
)
û§
+²))ÿÿ7)9)
l


PPASCALREADERTOOL_$$_COMPARECODETREENODEEXTMETHODHEADERS$POINTER$POINTER$$LONGINT[øùú-"	NodeData1Ï
C
.
!)*)

-"	NodeData2Ð
C
9
,)5)
û
ù
ú-
PascalReaderToolÒ
 

SYSTEMÓ
 

OBJPASÔ
$

Classes
(
SysUtils

(
LazFileUtils
*
	LazDbgLog
*
	FileProcs
, 
CodeToolsStrConsts
,
CodeTree
,"
	CodeCache
,,
CodeAtom
,7
PascalParserTool	
-
KeywordFuncLists

-
BasicCodeTools
-'
LinkScanner
-7)
TPascalHintModifier
0?)#

phmDeprecatedÕ
1E)!
phmPlatformÖ
2K)
 

phmLibrary×
3Q)&
phmUnimplementedØ
4W)%
phmExperimentalÙ
5])*
TPascalHintModifiers
7c) 

TEPRIRange
9i) 

epriInCodeÚ
:o)#

epriInCommentÛ
;u)
%
epriInDirectiveÜ
<{)(
TPascalMethodGroup
A)
mgMethodÝ
B‡)#

mgConstructorÞ
C)
(
mgClassConstructorß
D“)'
mgClassDestructorà
E™)%
mgClassOperatorá
FŸ))
TPascalMethodHeader"
H¥)-
TClassSectionVisibility#
M«)#

csvEverythingâ
N±))
csvPrivateAndHigherã
O·)
+
csvProtectedAndHigherä
P½)(
csvPublicAndHigherå
QÃ))
TOnEachPRIdentifier(
SÉ)'
TPascalReaderTool0
YÏ)0
$vmtdef$TPASCALREADERTOOL@
;

Õ)-
CompareMethodHeadersÃ
;

@Û)á)*
SameMethodHeadersÌ
?

@ç)í)8
#CompareCodeTreeNodeExtMethodHeadersÑ
C


ó)
û


ö	
Q2*VMT_$PASCALREADERTOOL_$$_TPASCALREADERTOOL3VMT_$PASCALREADERTOOL_$$_TPASCALREADERTOOL$indirect
6RTTI_$PASCALREADERTOOL_$$_TPASCALHINTMODIFIER$indirect
-RTTI_$PASCALREADERTOOL_$$_TPASCALHINTMODIFIER:RTTI_$PASCALREADERTOOL_$$_TPASCALHINTMODIFIER_s2o$indirect
1RTTI_$PASCALREADERTOOL_$$_TPASCALHINTMODIFIER_s2o:RTTI_$PASCALREADERTOOL_$$_TPASCALHINTMODIFIER_o2s$indirect
1RTTI_$PASCALREADERTOOL_$$_TPASCALHINTMODIFIER_o2s7RTTI_$PASCALREADERTOOL_$$_TPASCALHINTMODIFIERS$indirect
.RTTI_$PASCALREADERTOOL_$$_TPASCALHINTMODIFIERS-RTTI_$PASCALREADERTOOL_$$_TEPRIRANGE$indirect
$RTTI_$PASCALREADERTOOL_$$_TEPRIRANGE1RTTI_$PASCALREADERTOOL_$$_TEPRIRANGE_s2o$indirect
(RTTI_$PASCALREADERTOOL_$$_TEPRIRANGE_s2o1RTTI_$PASCALREADERTOOL_$$_TEPRIRANGE_o2s$indirect
(RTTI_$PASCALREADERTOOL_$$_TEPRIRANGE_o2s5RTTI_$PASCALREADERTOOL_$$_TPASCALMETHODGROUP$indirect
,RTTI_$PASCALREADERTOOL_$$_TPASCALMETHODGROUP9RTTI_$PASCALREADERTOOL_$$_TPASCALMETHODGROUP_s2o$indirect
0RTTI_$PASCALREADERTOOL_$$_TPASCALMETHODGROUP_s2o9RTTI_$PASCALREADERTOOL_$$_TPASCALMETHODGROUP_o2s$indirect
0RTTI_$PASCALREADERTOOL_$$_TPASCALMETHODGROUP_o2s6INIT_$PASCALREADERTOOL_$$_TPASCALMETHODHEADER$indirect
-INIT_$PASCALREADERTOOL_$$_TPASCALMETHODHEADER6RTTI_$PASCALREADERTOOL_$$_TPASCALMETHODHEADER$indirect
-RTTI_$PASCALREADERTOOL_$$_TPASCALMETHODHEADER:RTTI_$PASCALREADERTOOL_$$_TCLASSSECTIONVISIBILITY$indirect
1RTTI_$PASCALREADERTOOL_$$_TCLASSSECTIONVISIBILITY>RTTI_$PASCALREADERTOOL_$$_TCLASSSECTIONVISIBILITY_s2o$indirect
5RTTI_$PASCALREADERTOOL_$$_TCLASSSECTIONVISIBILITY_s2o>RTTI_$PASCALREADERTOOL_$$_TCLASSSECTIONVISIBILITY_o2s$indirect
5RTTI_$PASCALREADERTOOL_$$_TCLASSSECTIONVISIBILITY_o2s6RTTI_$PASCALREADERTOOL_$$_TONEACHPRIDENTIFIER$indirect
-RTTI_$PASCALREADERTOOL_$$_TONEACHPRIDENTIFIER.RTTI_$PASCALREADERTOOL_$$_def000000DD$indirect
%RTTI_$PASCALREADERTOOL_$$_def000000DD.RTTI_$PASCALREADERTOOL_$$_def000000DE$indirect
%RTTI_$PASCALREADERTOOL_$$_def000000DE.RTTI_$PASCALREADERTOOL_$$_def000000DF$indirect
%RTTI_$PASCALREADERTOOL_$$_def000000DF.RTTI_$PASCALREADERTOOL_$$_def000000E0$indirect
%RTTI_$PASCALREADERTOOL_$$_def000000E0.RTTI_$PASCALREADERTOOL_$$_def000000E1$indirect
%RTTI_$PASCALREADERTOOL_$$_def000000E1.RTTI_$PASCALREADERTOOL_$$_def000000E2$indirect
%RTTI_$PASCALREADERTOOL_$$_def000000E24INIT_$PASCALREADERTOOL_$$_TPASCALREADERTOOL$indirect
+INIT_$PASCALREADERTOOL_$$_TPASCALREADERTOOL4RTTI_$PASCALREADERTOOL_$$_TPASCALREADERTOOL$indirect
+RTTI_$PASCALREADERTOOL_$$_TPASCALREADERTOOL&

Q
	
FPC_EMPTYCHAR
3VMT_$PASCALPARSERTOOL_$$_TPASCALPARSERTOOL$indirectRTTI_$SYSTEM_$$_ANSISTRING
RTTI_$SYSTEM_$$_POINTER
+RTTI_$PASCALPARSERTOOL_$$_TPASCALPARSERTOOL
RTTI_$SYSTEM_$$_LONGINT
RTTI_$CODETREE_$$_TCODETREENODE
RTTI_$SYSTEM_$$_BOOLEAN
RTTI_$SYSTEM_$$_RAWBYTESTRING
´
V,
/*8*A*J*S*\*e*n*w*€*‰*’*›*¤*­*¶*¿*È*Ñ*Ú*ã*ì*õ*þ*+++"+++4+=+F+O+X+a+j+s+|+…+Ž+—+ +©+²+»+Ä+Í+Ö+ß+è+ñ+ú+,,,,',0,9,B,K,T,],f,o,x,,Š,“,œ,¥,®,·,À,É,Ò,Û,ä,í,ö,ÿ,---#-,-5->-G-P-Y-b-k-t-}-†--˜-¡-ª-³-¼-Å-Î-×-à-é-ò-û-.
...(.1.:.C.L.U.^.g.p.y.‚.‹.”..¦.¯.¸.Á.Ê.Ó.Ü.å.î.÷./	///$/-/6/?/H/Q/Z/c/l/u/~/‡//™/¢/«/´/½/Æ/Ï/Ø/á/ê/ó/ü/000 0)020;0D0M0V0_0h0q0z0ƒ0Œ0•0ž0§0°0¹0Â0Ë0Ô0Ý0æ0ï0ø0
1
111%1.171@1I1R1[1d1m1v11ˆ1‘1š1£1¬1µ1¾1Ç1Ð1Ù1â1ë1ô1ý1222!2*232<2E2N2W2`2i2r2{2„22–2Ÿ2¨2±2º2Ã2Ì2Õ2Þ2ç2ð2ù23333&3/383A3J3S3\3e3n3w3€3‰3’3›3¤3­3¶3¿3È3Ñ3Ú3ã3ì3õ3þ3444"4+444=4F4O4X4a4j4s4|4…4Ž4—4 4©4²4
ý
[
ø
¢
+³**	PASCALREADERTOOL_$$_init$ÿÿ
!*#*
G

INIT$_$PASCALREADERTOOLPASCALREADERTOOL_$$_init$[øùúû
ù
ú
/
$PASCALREADERTOOL_$$_init$æ
G


)*
û5
Sù)
* *
ÿ