\
\ The Original Code is: BOOTLOAD.FS
\ 
\ Last_change: KS 04.09.2010 18:56:37
\
\ MicroCore load screen for a program that is synthesised into the core
\ It will execute immediately after the FPGA configuration
\ and it can be used to e.g. realise a boot loader to load the program
\ proper off an external storage device
\
Only Forth also definitions hex

[IFDEF] empty unpatch close-port empty [ENDIF] Marker empty

include gforth-config.fs        \ Some System word (re)definitions for a more sympathetic environment
include vhdl.fs                 \ simple VHDL interpreter for constants
include ../uCore/constants.vhd
include microcore.fs            \ the cross-compiler
include images.fs               \ object code output files
include disasm.fs               \ the disassembler
include constants.fs            \ MicroCore Register addresses and bits

new Target                      \ reset target compiler and go into target compilation mode

0 code-origin
0 data-origin

] BEGIN REPEAT [            \ immediately go to the preset program memory

end

Boot-file ..\uCore\bootload.vhd  .( bootload.fs written to bootload.vhd )