Imported Upstream version 4.8.1
[platform/upstream/gcc48.git] / gcc / testsuite / gcc.target / aarch64 / aapcs64 / aapcs64.exp
1 #  Copyright (C) 2009-2013 Free Software Foundation, Inc.
2 #  Contributed by ARM Ltd.
3 #
4 #  This file is part of GCC.
5 #
6 #  GCC is free software; you can redistribute it and/or modify it
7 #  under the terms of the GNU General Public License as published by
8 #  the Free Software Foundation; either version 3, or (at your option)
9 #  any later version.
10 #
11 #  GCC is distributed in the hope that it will be useful, but
12 #  WITHOUT ANY WARRANTY; without even the implied warranty of
13 #  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14 #  General Public License for more details.
15 #
16 #  You should have received a copy of the GNU General Public License
17 #  along with GCC; see the file COPYING3.  If not see
18 #  <http://www.gnu.org/licenses/>.  */
19
20 load_lib c-torture.exp
21 load_lib target-supports.exp
22 load_lib torture-options.exp
23
24 if { ![istarget aarch64*-*-*] } then {
25   return
26 }
27
28 torture-init
29 set-torture-options $C_TORTURE_OPTIONS
30 set additional_flags "-W -Wall -Wno-abi"
31
32 # Test parameter passing.
33 foreach src [lsort [glob -nocomplain $srcdir/$subdir/test_*.c]] {
34     if {[runtest_file_p $runtests $src]} {
35             c-torture-execute [list $src \
36                                     $srcdir/$subdir/abitest.S] \
37                                     $additional_flags
38     }
39 }
40
41 # Test unnamed argument retrieval via the va_arg macro.
42 foreach src [lsort [glob -nocomplain $srcdir/$subdir/va_arg-*.c]] {
43     if {[runtest_file_p $runtests $src]} {
44             c-torture-execute [list $src \
45                                     $srcdir/$subdir/abitest.S] \
46                                     $additional_flags
47     }
48 }
49
50 # Test function return value.
51 foreach src [lsort [glob -nocomplain $srcdir/$subdir/func-ret-*.c]] {
52     if {[runtest_file_p $runtests $src]} {
53             c-torture-execute [list $src \
54                                     $srcdir/$subdir/abitest.S] \
55                                     $additional_flags
56     }
57 }
58
59 # Test no internal compiler errors.
60 foreach src [lsort [glob -nocomplain $srcdir/$subdir/ice_*.c]] {
61     if {[runtest_file_p $runtests $src]} {
62             c-torture [list $src] \
63                             $additional_flags
64     }
65 }
66
67 torture-finish