Add skip_ada_tests to more Ada testcases
[binutils-gdb.git] / gdb / testsuite / gdb.ada / info_auto_lang.exp
index 31d706241ab79bbcffad6f62218c283c37c259f0..152a884d0da781f5b1fc051ba24c4c94353bea69 100644 (file)
@@ -1,4 +1,4 @@
-# Copyright 2018 Free Software Foundation, Inc.
+# Copyright 2018-2020 Free Software Foundation, Inc.
 #
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -15,6 +15,8 @@
 
 load_lib "ada.exp"
 
+if { [skip_ada_tests] } { return -1 }
+
 # This test verifies that the commands
 #   info [functions|variables|types]
 # respect the 'set language auto|ada|c' setting, whatever the language
@@ -53,10 +55,7 @@ set func_in_c(ada_syntax)    "${decimal}:    procedure proc_in_c;"
 set func_in_ada(c_syntax)    "${decimal}:      void proc_in_ada\\\(void\\\);"
 set func_in_ada(ada_syntax)  "${decimal}:      procedure proc_in_ada;"
 
-set type_in_c(c_syntax) [multi_line \
-                           "${decimal}:        typedef struct {" \
-                           "    int some_component_in_c;" \
-                           "} some_type_in_c;" ]
+set type_in_c(c_syntax) "${decimal}:   typedef struct {\\.\\.\\.} some_type_in_c;"
 set type_in_c(ada_syntax) [multi_line \
                              "${decimal}:      record" \
                              "    some_component_in_c: int;" \