+ Set_current_frame/Get_current_frame dummies

This commit is contained in:
pierre 2000-02-07 13:19:43 +00:00
parent 44726335cc
commit fbf4adeb5e

View File

@ -86,6 +86,8 @@ type
{ functions } { functions }
function error:boolean; function error:boolean;
function error_num:longint; function error_num:longint;
function get_current_frame : longint;
function set_current_frame(level : longint) : boolean;
procedure DebuggerScreen; procedure DebuggerScreen;
procedure UserScreen; procedure UserScreen;
{ Hooks } { Hooks }
@ -135,6 +137,16 @@ begin
error_num:=0; error_num:=0;
end; end;
function TGDBInterface.get_current_frame : longint;
begin
get_current_frame:=0;
end;
function TGDBInterface.set_current_frame(level : longint) : boolean;
begin
set_current_frame:=true;
end;
procedure TGDBInterface.Clear_Frames; procedure TGDBInterface.Clear_Frames;
begin begin
end; end;
@ -286,7 +298,10 @@ end;
end. end.
{ {
$Log$ $Log$
Revision 1.6 1999-11-25 20:22:59 peter Revision 1.7 2000-02-07 13:19:43 pierre
+ Set_current_frame/Get_current_frame dummies
Revision 1.6 1999/11/25 20:22:59 peter
* package dependencies * package dependencies
Revision 1.5 1999/09/10 08:44:20 peter Revision 1.5 1999/09/10 08:44:20 peter
@ -307,4 +322,3 @@ end.
* updated * updated
} }