diff options
Diffstat (limited to 'gdb/testsuite/gdb.c++/ref-types.exp')
-rw-r--r-- | gdb/testsuite/gdb.c++/ref-types.exp | 18 |
1 files changed, 10 insertions, 8 deletions
diff --git a/gdb/testsuite/gdb.c++/ref-types.exp b/gdb/testsuite/gdb.c++/ref-types.exp index 7f25590..2a9d337 100644 --- a/gdb/testsuite/gdb.c++/ref-types.exp +++ b/gdb/testsuite/gdb.c++/ref-types.exp @@ -1,4 +1,5 @@ -# Copyright (C) 1998 Free Software Foundation, Inc. +# Tests for reference types with short type variables in GDB. +# Copyright (C) 1998, 1999 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 @@ -19,12 +20,6 @@ # written by Elena Zannoni (ezannoni@cygnus.com) -# This file is part of the gdb testsuite -# -# tests for reference types -# with short type variables. -# - if $tracelevel then { strace $tracelevel } @@ -162,6 +157,7 @@ gdb_expect { send_gdb "ptype as\n" gdb_expect { -re "type = short \\\[4\\\].*$gdb_prompt $" { pass "ptype as" } + -re "type = short int \\\[4\\\].*$gdb_prompt $" { pass "ptype as" } -re ".*$gdb_prompt $" { fail "ptype as" } timeout { fail "(timeout) ptype as" } } @@ -197,7 +193,10 @@ send_gdb "print rs\n" gdb_expect { -re ".\[0-9\]* = \\(short &\\) @$hex: -1.*$gdb_prompt $" { pass "print value of rs" - } + } + -re ".\[0-9\]* = \\(short int &\\) @$hex: -1.*$gdb_prompt $" { + pass "print value of rs" + } -re ".*$gdb_prompt $" { fail "print value of rs" } timeout { fail "(timeout) print value of rs" } eof { fail "print rs ($GDB dumped core) (FIXME)" ; gdb_start_again ; } @@ -207,6 +206,7 @@ gdb_expect { send_gdb "ptype rs\n" gdb_expect { -re "type = short &.*$gdb_prompt $" { pass "ptype rs" } + -re "type = short int &.*$gdb_prompt $" { pass "ptype rs" } -re ".*$gdb_prompt $" { fail "ptype rs" } timeout { fail "(timeout) ptype rs" } } @@ -225,6 +225,7 @@ gdb_expect { send_gdb "ptype rps\n" gdb_expect { -re "type = short \\*&.*$gdb_prompt $" { pass "ptype rps" } + -re "type = short int \\*&.*$gdb_prompt $" { pass "ptype rps" } -re ".*$gdb_prompt $" { fail "ptype rps" } timeout { fail "(timeout) ptype rps" } } @@ -244,6 +245,7 @@ gdb_expect { send_gdb "ptype ras\n" gdb_expect { -re "type = short \\\(&\\\)\\\[4\\\].*$gdb_prompt $" { pass "ptype ras" } + -re "type = short int \\\(&\\\)\\\[4\\\].*$gdb_prompt $" { pass "ptype ras" } -re ".*$gdb_prompt $" { fail "ptype ras" } timeout { fail "(timeout) ptype ras" } } |