add missing source data for a: and d: words

FossilOrigin-Name: 6cd7cec6ee8dff1be8774f32982625fd56ee36927d3452b733c41162392b0137

LICENSE

@@ -1,7 +1,5 @@
 RETRO is a personal, minimalistic Forth
 
-## Legalities
-
 Permission to use, copy, modify, and/or distribute this software
 for any purpose with or without fee is hereby granted, provided
 that the copyright notice and this permission notice appear in
@@ -19,7 +17,7 @@ OF THIS SOFTWARE.
 
 RETRO 12 is:
 
-    Copyright (c) 2008 - 2022, Charles Childers
+    Copyright (c) 2008 - 2023, Charles Childers
 
 Portions of the code derive from RETRO 11, which was:
 

RELEASE-NOTES

@@ -17,6 +17,6 @@
 - removed some unneeded files
 - update tools/missing-dsource.retro
 - add missing source data for vocabularies:
-  double: file: fll: mem: script:
+  a: d: double: file: fll: mem: script:
 
 ================================================================

interface/future.retro

@@ -3,7 +3,6 @@
 This contains a variety of words from my more recent systems
 and things that will be standard in the future.
 
-
 ~~~
 :d:use-hashes
   &eq? &d:lookup #5 - store
@@ -16,4 +15,7 @@ and things that will be standard in the future.
   &d:name &d:lookup #8 - store
   #0 &d:lookup store
   #0 &d:lookup n:inc store ;
+
+'interface/future.retro 'd:use-hashes d:set-source
+'interface/future.retro 'd:use-strings d:set-source
 ~~~

interface/sources.retro

@@ -7,6 +7,7 @@ each of the provided words are found in.
 
 ~~~
 :d:set-source (ss-) &s:dedup dip d:lookup d:source store ;
+'interface/sources.retro 'd:set-source d:set-source
 ~~~
 
 ~~~
@@ -46,6 +47,10 @@ dup 'a:eq? d:set-source
 dup 'a:middle d:set-source
 dup 'a:right d:set-source
 dup 'a:left d:set-source
+dup 'a:first d:set-source
+dup 'a:last d:set-source
+dup 'a:indices/string d:set-source
+dup 'a:hash d:set-source
 dup '} d:set-source
 dup '{ d:set-source
 dup 'a:temp d:set-source