add missing d:source data
FossilOrigin-Name: 746d00862c208a73ef9ca13afc34c49834d24ac068582693341cd01a54687475
This commit is contained in:
parent
ce2cd05f97
commit
09ac843c9e
5 changed files with 773 additions and 731 deletions
|
@ -70,10 +70,10 @@ ENABLED += -DENABLE_MALLOC
|
|||
ENABLED += -DENABLE_BLOCKS
|
||||
|
||||
DEVICES ?=
|
||||
DEVICES += interface/devices.retro
|
||||
DEVICES += interface/ll.retro
|
||||
DEVICES += interface/dedup.retro
|
||||
DEVICES += interface/sources.retro
|
||||
DEVICES += interface/devices.retro
|
||||
DEVICES += interface/floatingpoint.retro
|
||||
DEVICES += interface/filesystem.retro
|
||||
DEVICES += interface/unix.retro
|
||||
|
|
|
@ -20,4 +20,29 @@
|
|||
#8000 'DEVICE:MULTICORE const
|
||||
#8100 'DEVICE:FFI const
|
||||
#8101 'DEVICE:UNSIGNED const
|
||||
|
||||
|
||||
'interface/devices.retro s:dedup
|
||||
dup 'DEVICE:UNSIGNED d:set-source
|
||||
dup 'DEVICE:FFI d:set-source
|
||||
dup 'DEVICE:MULTICORE d:set-source
|
||||
dup 'DEVICE:ERROR d:set-source
|
||||
dup 'DEVICE:IMAGE d:set-source
|
||||
dup 'DEVICE:MALLOC d:set-source
|
||||
dup 'DEVICE:RESERVED14 d:set-source
|
||||
dup 'DEVICE:RESERVED13 d:set-source
|
||||
dup 'DEVICE:RESERVED12 d:set-source
|
||||
dup 'DEVICE:RESERVED11 d:set-source
|
||||
dup 'DEVICE:RNG d:set-source
|
||||
dup 'DEVICE:SCRIPTING d:set-source
|
||||
dup 'DEVICE:UNIX d:set-source
|
||||
dup 'DEVICE:SOCKET d:set-source
|
||||
dup 'DEVICE:RESERVED6 d:set-source
|
||||
dup 'DEVICE:CLOCK d:set-source
|
||||
dup 'DEVICE:BLOCKS d:set-source
|
||||
dup 'DEVICE:FILES d:set-source
|
||||
dup 'DEVICE:FLOATS d:set-source
|
||||
dup 'DEVICE:KEYBOARD d:set-source
|
||||
dup 'DEVICE:OUTPUT d:set-source
|
||||
drop
|
||||
~~~
|
||||
|
|
|
@ -21,4 +21,15 @@
|
|||
:library:load
|
||||
dup library:contains? [ library:filename include ]
|
||||
[ 'ERROR:_Library_`%s`_was_not_found s:format s:put nl ] choose ;
|
||||
|
||||
'interface/library.retro s:dedup
|
||||
dup 'library:load d:set-source
|
||||
dup 'library:contains? d:set-source
|
||||
dup 'library:filename d:set-source
|
||||
dup 'library:.config d:set-source
|
||||
dup 'library:cwd d:set-source
|
||||
dup 'library:CWD d:set-source
|
||||
dup 'library:.CONFIG d:set-source
|
||||
dup 'HOME d:set-source
|
||||
drop
|
||||
~~~
|
||||
|
|
|
@ -13,6 +13,9 @@ each of the provided words are found in.
|
|||
~~~
|
||||
'build.retro s:dedup 'BUILD d:set-source
|
||||
'retro.forth s:dedup
|
||||
dup 'Ignoring d:set-source
|
||||
dup 'banner d:set-source
|
||||
dup 'TIB d:set-source
|
||||
dup 'listen d:set-source
|
||||
dup 'gc d:set-source
|
||||
dup 'bye d:set-source
|
||||
|
|
1463
vm/nga-c/image.c
1463
vm/nga-c/image.c
File diff suppressed because it is too large
Load diff
Loading…
Reference in a new issue