gdb/testsuite/

[thirdparty/binutils-gdb.git] / gdb / testsuite / lib / dwarf.exp

diff --git a/gdb/testsuite/lib/dwarf.exp b/gdb/testsuite/lib/dwarf.exp
index 1d3eb03d8db5c52efe14343922dda1efe4d9fea9..39773843748004db19f4548f09bf14d3bcc84b9b 100644 (file)
--- a/gdb/testsuite/lib/dwarf.exp
+++ b/gdb/testsuite/lib/dwarf.exp
@@ -667,6 +667,14 @@ namespace eval Dwarf {
                    _op .sleb128 [lindex $line 2]
                }
 
+               DW_OP_deref_size {
+                   if {[llength $line] != 2} {
+                       error "usage: DW_OP_deref_size SIZE"
+                   }
+
+                   _op .byte [lindex $line 1]
+               }
+
                default {
                    if {[llength $line] > 1} {
                        error "Unimplemented: operands in location for $opcode"