URL
https://opencores.org/ocsvn/scarts/scarts/trunk
Subversion Repositories scarts
[/] [scarts/] [trunk/] [toolchain/] [scarts-gdb/] [gdb-6.8/] [gdb/] [testsuite/] [gdb.pascal/] [hello.pas] - Rev 25
Compare with Previous | Blame | View Log
program hello; var st : string; procedure print_hello; begin Writeln('Before assignment'); { set breakpoint 1 here } st:='Hello, world!'; writeln(st); {set breakpoint 2 here } end; begin print_hello; end.