xref: /netbsd-src/external/gpl3/gdb.old/dist/gdb/testsuite/gdb.base/until-trailing-insns.c (revision 4439cfd0acf9c7dc90625e5cd83b2317a9ab8967)
1 /* Copyright 2022-2023 Free Software Foundation, Inc.
2 
3    This program is free software; you can redistribute it and/or modify
4    it under the terms of the GNU General Public License as published by
5    the Free Software Foundation; either version 3 of the License, or
6    (at your option) any later version.
7 
8    This program is distributed in the hope that it will be useful,
9    but WITHOUT ANY WARRANTY; without even the implied warranty of
10    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
11    GNU General Public License for more details.
12 
13    You should have received a copy of the GNU General Public License
14    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
15 
16 int
17 main ()
18 {							/* TAG: main prologue */
19     asm ("main_label: .globl main_label");
20     asm ("loop_start: .globl loop_start");
21     int a, i;
22     i = 0;						/* TAG: loop assignment */
23     while (1)						/* TAG: loop line */
24       {
25 	asm ("loop_condition: .globl loop_condition");
26 	if (i >= 10) break;				/* TAG: loop condition */
27 	asm ("loop_code: .globl loop_code");
28 	a = i;						/* TAG: loop code */
29 	asm ("loop_increment: .globl loop_increment");
30 	i++;						/* TAG: loop increment */
31 	asm ("loop_jump: .globl loop_jump");
32       }
33     asm ("main_return: .globl main_return");
34     return 0;						/* TAG: main return */
35 }
36