OpenCores
URL https://opencores.org/ocsvn/scarts/scarts/trunk

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gdb/] [gdb-6.8/] [gdb/] [testsuite/] [gdb.mi/] [testcmds] - Blame information for rev 25

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 25 jlechner 
# This is a (bogus) sample user command built to test the printing
2 
# of commands.
3 
define test
4 
set $a = 1
5 
set $b = 2
6 
if ($a > $b)
7 
 set $a = 1
8 
 set $b = 2
9 
 while ($a > $b)
10 
  set $a = 1
11 
  set $b = 2
12 
 end
13 
else
14 
 set $a = 1
15 
 set $b = 2
16 
end
17 
while ($a < $b)
18 
 set $a = $a + 1
19 
 set $c = $a
20 
 if ($a = $b)
21 
  set $c = 5
22 
 end
23 
 set $a = 1
24 
 set $b = 2
25 
end

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.