testgbd

¿Has encontrado un error? ¿Tienes la solución? Deja tu correción ;-)

Antes de comentar: Gran parte de los ejercicios propuestos no tienen librerías debido a que Wordpress las eliminó al verlas como etiquetas HTML. Si sabes/tienes/conoces las librerías que hacen falta, déjalo en los comentarios. Y lo mas importante: Todos los ejemplos fueron realizados por estudiante con únicamente conocimiento básico del lenguaje, no de programación.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
{
    $Id: testgdb.pp,v 1.3 2005/02/14 17:13:19 peter Exp $
    Copyright (c) 1998 by Peter Vreman
 
    Small example program to the GDB 
    See the file COPYING.FPC, included in this distribution,
    for details about the copyright.
 
    This program is distributed in the hope that it will be useful,    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 **********************************************************************}
program testgdb;uses gdbcon;
var
  last,s,parafile : string;
  gdb : tgdbcontroller;
begin  gdb.init;
  if paramcount=1 then
    parafile:=paramstr(1)
  else
    parafile:='test';  gdb.loadfile(parafile);
  Writeln('Welcome to the pascal GDB...');
  Writeln('Type "q" to exit...');
  last:='';
  repeat    write('>');
    readln(s);
    if (s='a') then
     gdb.starttrace
    else     if (s='s') then
      gdb.tracestep
    else
     if (s='n') then
      gdb.tracenext    else
     if (s='q') then
      break
    else
     begin       if s='' then
         s:=last;
       GDB.Command(s);
       GDB.WriteErrorBuf;
       GDB.WriteOutputBuf;       last:=s;
     end;
  until false;
  Writeln('End of pascal GDB...');
end.{
  $Log: testgdb.pp,v $
  Revision 1.3  2005/02/14 17:13:19  peter
    * truncate log
 }

Punto importante: Si vas a sugerir un segmento de código en algún lenguaje debes hacerlo así:

  • Si es lenguaje C <code lang="c">Código en C</code>
  • Si es lenguaje Pascal <code lang="pascal">Aquí dentro el código de Pascal</code>.

De esta manera el código coloreas el código.

Deja un comentario

Suscribirse a los comentarios.