1 1.1 christos # Check that loop insn works. 2 1.1 christos # mach: pru 3 1.1 christos 4 1.1.1.2 christos # Copyright (C) 2016-2024 Free Software Foundation, Inc. 5 1.1 christos # Contributed by Dimitar Dimitrov <dimitar@dinux.eu> 6 1.1 christos # 7 1.1 christos # This file is part of the GNU simulators. 8 1.1 christos # 9 1.1 christos # This program is free software; you can redistribute it and/or modify 10 1.1 christos # it under the terms of the GNU General Public License as published by 11 1.1 christos # the Free Software Foundation; either version 3 of the License, or 12 1.1 christos # (at your option) any later version. 13 1.1 christos # 14 1.1 christos # This program is distributed in the hope that it will be useful, 15 1.1 christos # but WITHOUT ANY WARRANTY; without even the implied warranty of 16 1.1 christos # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 17 1.1 christos # GNU General Public License for more details. 18 1.1 christos # 19 1.1 christos # You should have received a copy of the GNU General Public License 20 1.1 christos # along with this program. If not, see <http://www.gnu.org/licenses/>. 21 1.1 christos 22 1.1 christos .include "testutils.inc" 23 1.1 christos 24 1.1 christos start 25 1.1 christos 26 1.1 christos ldi r25, 0 27 1.1 christos ldi r26, 0 28 1.1 christos ldi r27, 0 29 1.1 christos ldi r28, 10 30 1.1 christos 31 1.1 christos add r27, r27, 1 32 1.1 christos loop 1f, r28 33 1.1 christos add r25, r25, 1 34 1.1 christos add r26, r26, 2 35 1.1 christos 1: 36 1.1 christos add r27, r27, 1 37 1.1 christos 38 1.1 christos qbne F, r25, 10 39 1.1 christos qbne F, r26, 20 40 1.1 christos qbne F, r27, 2 41 1.1 christos 42 1.1 christos pass 43 1.1 christos 44 1.1 christos F: fail 45