(Turbo Debugger) 3.0


              

File Edit View Run


File Edit View Run Breakpoints Data Options Window Help READY
=[*]=Module: TPDEMO file: TPDEMO.PAS 121============1=[ ][ ]
IncLetterTable(UpCase(S[i])].Count; ^
if WordLen = 0 then -
Inc(LetterTable[UpCase(S[i])].FirstLetter; -
Inc(WordLen); -
end; -
-
{ } -
if WordLen > 0 then -
begin -
Inc(NumWords); -
if WordLen <= MaxWordLen then -
Inc(WordLenTable[WordLen]); -
end; -
end; { while } -
end; { ProcessLine } -
-
function GetLine : BufferStr; -
Inc(LetterTable[UpCase(S[i])].Count); v
L<----------------------------------------------------------->-
-Watches-----------------------------------------------------2
NumWords 2 ($2) : WORD
L--------------------------------------------------------------
F1=HelpF2=BkptF3=CloseF4=HereF5=ZoomF6=NextF7=TraceF8=StepF9=R.
L----------------------------------------------------------------
. 3.14 Watches
NumWords Watches (-