forked from KolibriOS/kolibrios
112 lines
3.5 KiB
FortranFixed
112 lines
3.5 KiB
FortranFixed
|
\ TSET-OPT
|
|||
|
0x10 TOMM_SIZE
|
|||
|
HERE TO TSAVE_LIMIT
|
|||
|
USER-HERE-SET TO RESERVE
|
|||
|
USER-HERE-SET USER-OFFS !
|
|||
|
\ DECIMAL
|
|||
|
\ TRUE WARNING ! \ <20>⮡<EFBFBD> <20>뫮
|
|||
|
\ ==============================================================
|
|||
|
\ <20><>砫<EFBFBD> <EFBFBD><EFBFBD>ࠧ<EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>-<EFBFBD><EFBFBD><EFBFBD>⥬<EFBFBD>
|
|||
|
\ S" src/USER.F" INCLUDED
|
|||
|
\ S" src/spf_defkern.f" INCLUDED
|
|||
|
CR .( S" src/spf_forthproc.f" INCLUDED)
|
|||
|
|
|||
|
S" src/spf_forthproc.f" INCLUDED
|
|||
|
|
|||
|
\ S" src/spf_floatkern.f" INCLUDED
|
|||
|
|
|||
|
S" src/spf_forthproc_hl.f" INCLUDED
|
|||
|
|
|||
|
|
|||
|
S" src/kol/spf_kol_const.f" INCLUDED
|
|||
|
|
|||
|
\ ==============================================================
|
|||
|
|
|||
|
S" src/kol\spf_kol_sys.f" INCLUDED
|
|||
|
|
|||
|
\ <20>࠭<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD>室<EFBFBD><EFBFBD><EFBFBD> ⥪<EFBFBD>⮢.
|
|||
|
\ <20><>ࠡ<EFBFBD>⪠ <EFBFBD>訡<EFBFBD><EFBFBD>.
|
|||
|
\ <20><>।<EFBFBD><EFBFBD><EFBFBD><EFBFBD>騥 <EFBFBD><EFBFBD>.
|
|||
|
\ <20><><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>ࠫ<EFBFBD>.
|
|||
|
\ <20><>ࠢ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>樥<EFBFBD>.
|
|||
|
\ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD>ࠢ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
|
|||
|
|
|||
|
S" src/compiler/spf_immed_lit.f" INCLUDED
|
|||
|
S" src/compiler/spf_defwords.f" INCLUDED
|
|||
|
|
|||
|
S" src/compiler/spf_immed_loop.f" INCLUDED
|
|||
|
|
|||
|
S" src/compiler/spf_error.f" INCLUDED
|
|||
|
TDIS-OPT
|
|||
|
S" src/compiler/spf_translate.f" INCLUDED
|
|||
|
S" src/compiler/spf_immed_transl.f" INCLUDED
|
|||
|
S" src/compiler/spf_literal.f" INCLUDED
|
|||
|
S" src/compiler/spf_immed_control.f" INCLUDED
|
|||
|
|
|||
|
\ ==============================================================
|
|||
|
\ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD>ᥫ <EFBFBD> <EFBFBD><EFBFBD>ப <EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
|
|||
|
\ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD>⥩.
|
|||
|
\ <20><><EFBFBD><EFBFBD><EFBFBD> <EFBFBD> <EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
|
|||
|
\ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD>३.
|
|||
|
\ S" src/temps4_.f" INCLUDED
|
|||
|
\ EOF
|
|||
|
S" src/compiler/spf_wordlist.f" INCLUDED
|
|||
|
S" src/compiler/spf_find.f" INCLUDED
|
|||
|
S" src/compiler/spf_words.f" INCLUDED
|
|||
|
S" src/compiler/spf_compile0.f" INCLUDED
|
|||
|
S" ~mak/~af/lib/c/zstr.f" INCLUDED
|
|||
|
' ALITERAL TO ALITERAL-CODE
|
|||
|
|
|||
|
\ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD>ࠡ<EFBFBD>⪠ <EFBFBD>᪫<EFBFBD>祭<EFBFBD><EFBFBD> (<EFBFBD><EFBFBD>.⠪<EFBFBD><EFBFBD> init)
|
|||
|
|
|||
|
S" src/spf_except.f" INCLUDED
|
|||
|
|
|||
|
\ ==============================================================
|
|||
|
\ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD>ᥫ
|
|||
|
|
|||
|
S" src/spf_print.f" INCLUDED
|
|||
|
S" src/kol\spf_kol_module.f" INCLUDED
|
|||
|
|
|||
|
\ ==============================================================
|
|||
|
\ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD> <EFBFBD><EFBFBD><EFBFBD>᮫<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>-<EFBFBD>뢮<EFBFBD> (kol-<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ᨬ<EFBFBD><EFBFBD>)
|
|||
|
|
|||
|
S" src/kol/spf_kol_con_io.f" INCLUDED
|
|||
|
S" src/spf_con_io.f" INCLUDED
|
|||
|
S" src/kol/spf_kol_io.f" INCLUDED
|
|||
|
\ ==============================================================
|
|||
|
\ <20><>ࠢ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
S" src/kol/spf_kol_memory.f" INCLUDED
|
|||
|
|
|||
|
\ ==============================================================
|
|||
|
\ <20><><EFBFBD>ய<EFBFBD><EFBFBD><EFBFBD>⠭<EFBFBD><EFBFBD>騪-<EFBFBD><EFBFBD>⨬<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
TRUE TO INLINEVAR
|
|||
|
CR .( S" src/macroopt.f" INCLUDED)
|
|||
|
MM_SIZE DUP H.
|
|||
|
0x10 TOMM_SIZE
|
|||
|
S" src/macroopt.f" INCLUDED
|
|||
|
DUP H. TOMM_SIZE
|
|||
|
S" src/compiler/spf_compile.f" INCLUDED
|
|||
|
|
|||
|
\ ==============================================================
|
|||
|
\ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD>室<EFBFBD><EFBFBD><EFBFBD><EFBFBD> ⥪<EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>-<EFBFBD>ணࠬ<EFBFBD>
|
|||
|
S" src/compiler/spf_parser.f" INCLUDED
|
|||
|
S" src/compiler/spf_read_source.f" INCLUDED
|
|||
|
|
|||
|
\ ==============================================================
|
|||
|
\ <20><><EFBFBD>樠<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD>६<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, startup
|
|||
|
CR .( S" src/spf_init.f" INCLUDED)
|
|||
|
S" src/spf_init.f" INCLUDED
|
|||
|
|
|||
|
\ ==============================================================
|
|||
|
S" src/compiler/spf_modules.f" INCLUDED
|
|||
|
S" src/MEFORTH.F" INCLUDED
|
|||
|
S" src/spf_last.f" INCLUDED
|
|||
|
\ S" src/tst.f" INCLUDED \EOF
|
|||
|
|
|||
|
\ EOF
|
|||
|
|
|||
|
CR .( =============================================================)
|
|||
|
CR .( Done.
|
|||
|
CR .( =============================================================)
|
|||
|
MM_SIZE H.
|