]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blobdiff - gdb/testsuite/gdb.ada/arr_acc_idx_w_gap.exp
Fix bugs in 'val and 'pos with range types
[thirdparty/binutils-gdb.git] / gdb / testsuite / gdb.ada / arr_acc_idx_w_gap.exp
index fd7ac44cb0546a2bf55b1d7d68f15d6e3b13dcec..c08070ea53c6e42101b415842bfcdf0088b1cc75 100644 (file)
@@ -53,3 +53,7 @@ gdb_test "print indexed_by_enum(lit2..lit4)" \
          " = \\(lit2 => 43, 42, 41\\)"
 gdb_test "print s(2..4)" \
          " = \"ell\""
+
+gdb_test "print v" " = lit3"
+gdb_test "print enum_subrange'pos(v)" " = 3"
+gdb_test "print enum_subrange'val(3)" " = lit3"