-# Copyright 2020 Free Software Foundation, Inc.
+# Copyright 2020-2024 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
load_lib dwarf.exp
-if {![dwarf2_support]} {
- return 0
-}
+require dwarf2_support
# Test with 32-bit and 64-bit DWARF.
foreach_with_prefix is_64 {false true} {
}
}
- loclists -is-64 $is_64 {
+ loclists {is-64 $is_64} {
# The lists in this table are accessed by direct offset
# (DW_FORM_sec_offset).
- table {
+ table {} {
foo_location_list: list_ {
start_length $func1_addr $func1_len {
DW_OP_constu 0x123456
}
}
- table -post-header-label cu2_table {
+ table {post-header-label cu2_table} {
bar_location_list: list_ {
start_length $func3_addr $func3_len {
DW_OP_constu 0x345678
}
}
- table -with-offset-array false {
+ table {with-offset-array false} {
baz_location_list: list_ {
start_length $func5_addr $func5_len {
DW_OP_constu 0x567890
}
if { ![runto_main] } {
- fail "can't run to main"
return
}