aboutsummaryrefslogtreecommitdiff
path: root/gdb
diff options
context:
space:
mode:
Diffstat (limited to 'gdb')
-rw-r--r--gdb/python/lib/gdb/dap/sources.py16
-rw-r--r--gdb/testsuite/gdb.dap/sources.exp9
2 files changed, 16 insertions, 9 deletions
diff --git a/gdb/python/lib/gdb/dap/sources.py b/gdb/python/lib/gdb/dap/sources.py
index 7fa1ae4..00a7070 100644
--- a/gdb/python/lib/gdb/dap/sources.py
+++ b/gdb/python/lib/gdb/dap/sources.py
@@ -13,6 +13,8 @@
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
+import os
+
import gdb
from .server import request, capability
@@ -41,16 +43,20 @@ def make_source(fullname, filename):
if fullname in _source_map:
result = _source_map[fullname]
else:
- global _next_source
result = {
"name": filename,
"path": fullname,
- "sourceReference": _next_source,
}
+
+ if not os.path.exists(fullname):
+ global _next_source
+ result["sourceReference"] = _next_source
+
+ global _id_map
+ _id_map[_next_source] = result
+ _next_source += 1
+
_source_map[fullname] = result
- global _id_map
- _id_map[_next_source] = result
- _next_source += 1
return result
diff --git a/gdb/testsuite/gdb.dap/sources.exp b/gdb/testsuite/gdb.dap/sources.exp
index a12c208..f1b19ac 100644
--- a/gdb/testsuite/gdb.dap/sources.exp
+++ b/gdb/testsuite/gdb.dap/sources.exp
@@ -30,20 +30,21 @@ if {[dap_launch $testfile stop_at_main 1] == ""} {
}
set obj [dap_check_request_and_response loadedSources loadedSources]
-set ref 0
+set path ""
foreach src [dict get [lindex $obj 0] body sources] {
if {[file tail [dict get $src name]] == "sources.c"} {
- set ref [dict get $src sourceReference]
+ set path [dict get $src path]
}
}
-if {$ref == 0} {
+if {$path == ""} {
fail "sources.c in loadedSources"
} else {
pass "sources.c in loadedSources"
set obj [dap_check_request_and_response "get source" source \
- [format {o sourceReference [i %d]} $ref]]
+ [format {o source [o path [s %s]] \
+ sourceReference [i 0]} $path]]
set text [dict get [lindex $obj 0] body content]
gdb_assert {[string first "Distinguishing comment" $text] != -1}
}