URL
https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk
Subversion Repositories openrisc_2011-10-31
[/] [openrisc/] [trunk/] [gnu-src/] [gdb-7.1/] [gdb/] [testsuite/] [gdb.pascal/] [hello.pas] - Rev 227
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.