Lines Matching refs:Adr
73 procedure Toggle_Break( var Head : PBreakPoint; Range, Adr : Int );
77 procedure Set_Break ( var Head : PBreakPoint; Range, Adr : Int );
573 Adr, Line, N : Int;
585 Adr := 0;
588 while Adr < N do
590 RR.Disassembled^[Line] := Adr;
592 inc( Adr, Get_Length( RR.Code, Adr ));
712 Adr : Int );
721 while (Cur <> nil) and (Cur^.Address < Adr) do
729 if (Cur^.Address = Adr) and (Cur^.Range = Range) then exit;
732 BP^.Address := Adr;
778 procedure Toggle_Break( var Head : PBreakPoint; Range, Adr : Int );
782 Bp := Find_BreakPoint( Head, Range, Adr );
784 else Set_Break( Head, Range, Adr );