да, кстати ФВМ в СПФе перегружен несколько. Можно %10 выкинуть без проблем.

[b]garbler[/b]
вообще, основная проблема не портирование ФВМ, а потирование слов работающих с системой, то есть всяких инициализаций, подключений, системных вызовов (по опыту возни с форком)

[b]m/^\s*CODE\s+(\S+)/[/b] - даже беглого наброска хватает, чтобы получить список:

[code]spf419\devel\~af\lib\decr.f
1-!

spf419\devel\~af\lib\c\capi.f
(CAPI-CALL) CAPI-CALL _CAPI-CODE _CVAPI-CODE

spf419\devel\~day\common\code.f
HERE @4+@ VECT->

spf419\devel\~day\common\temps.f
TEMP-DOES |TEMP-DOES |TEMP-DOES! |DOES_CODE |DROP

spf419\devel\~moleg\lib\asm\sample\memory.f
@ ! B@ B! C@ C! W@ W! 2@ 2! 1+! +! A@ A! ACHANGE

spf419\devel\~moleg\lib\math\math.f
UD/

spf419\devel\~pinka\lib\tools\GenTimer.f
GetTicks

spf419\devel\~profit\misc\countBits-bac4th.f
?bits

spf419\devel\~profit\misc\movecode.f
b2

spf419\devel\~yz\lib\filename.f
last-character

spf419\lib\win\api-call\altwinapi.f
_WINAPI-CODE

spf419\lib\win\api-call\capi.f
(CAPI-CALL) CAPI-CALL _CAPI-CODE _CVAPI-CODE

spf419\src\spf_defkern.f
_CREATE-CODE _CONSTANT-CODE _USER-CODE USER+ _USER-VALUE-CODE _USER-VECT-CODE
_VECT-CODE _TOVALUE-CODE _TOUSER-VALUE-CODE _SLITERAL-CODE _CLITERAL-CODE _---CODE

spf419\src\spf_floatkern.f
2.E 10.E FPI FLG2 FLN2 FL2T FL2E .E 1.E F0= F0< F< F= FMAX FMIN FNEGATE FCOS
FSIN FSINCOS FABS F* F+ F- F/ FSQRT FDROP FDUP FOVER FINT FSWAP FROT FDEPTH
F1+ D>F DF! DF@ F! FLOAT>DATA DATA>FLOAT FLOAT>DATA32 DATA>FLOAT32 F@ SF! SF@
FLN FLNP1 FLOG FEXP FEXPM1 F** FTAN FATAN FATAN2 FACOS FASIN F>DEG F>RAD FINIT
SETFPUCW GETFPUCW DS>F F>DS F--DS GETFPUSW FLOG2 F[LOG] TRUNC-MODE ROUND-MODE
UP-MODE LOW-MODE F>D F10* F10/ F>ENV FENV> FSAVE FRSTOR FD< `F1+ F**2 `F1-
_FLIT-CODE8 _FLIT-CODE10 FNOP

spf419\src\spf_forthproc.f
DUP 2DUP DROP MAX MIN UMAX UMIN 0MAX 2DROP SWAP 2SWAP OVER 2OVER NIP ROT -ROT
PICK ROLL TUCK 2>R 2R> R@ 2R@ @ ! C@ C! W@ W! 2@ 2! 1+ 1- 2+ 2- 2* + CELL+
CELL- CELLS D+ D- - 1+! 0! COUNT * AND OR XOR INVERT NEGATE ABS DNEGATE NOOP
S>D D>S U>D C>S UM* / U/ +! MOD /MOD UMOD UM/MOD 2/ U2/ */MOD M* LSHIFT RSHIFT
ARSHIFT SM/REM FM/MOD DIGIT = <> < > WITHIN D< D> U< U> 0< 0= 0<> D0= D= D2* D2/
-TRAILING COMPARE SEARCH CMOVE CMOVE> FILL ASCIIZ> SP! RP! SP@ RP@ TlsIndex! TlsIndex@
FS@ FS! J C-DO C-?DO ADD[ESP],EAX C-I C->R C-R> C-RDROP C-?DUP C-EXECUTE DRMOVE
NR> N>R NRCOPY RP+@ RP+ RP+! RALLOT (RALLOT) RFREE (LocalsExit) TIMER@ TRAP-CODE (ENTER)

spf419\src\compiler\spf_defwords.f
(DOES2)

spf419\src\compiler\spf_find.f
CDR-BY-NAME

spf419\src\compiler\spf_wordlist.f
NAME> NAME>C NAME>F NAME>L CDR

spf419\src\win\spf_win_api.f
AO_INI API-CALL _WINAPI-CODE _WNDPROC-CODE[/code]

[quote="Mihail"][quote="kzagradskiy"]Насколько я понял, в качестве target compiler сейчас используется jpf. А в исходниках только часть слов определяется через ассемблер и словарь jpf, который позже отключается.[/quote]

Я не особо въезжаю в проблему. По моему, она связана с превратным представлением о target compiler.
Целевой компилятор представляет собой набор слов управляющих компиляцией, своего рода директивы.
Все слова целевой системы присутствуют в исходных текстах. Т.е. подключай другой ассемблер
и все слова использующие ассемблер будут выявлены.[/quote]

Я так и предполагал. Только до конца не был уверен. Действительно, так просто. Вопрос исчерпан. Спасибо.

[quote="kzagradskiy"]Насколько я понял, в качестве target compiler сейчас используется jpf. А в исходниках только часть слов определяется через ассемблер и словарь jpf, который позже отключается.[/quote]

Я не особо въезжаю в проблему. По моему, она связана с превратным представлением о target compiler.
Целевой компилятор представляет собой набор слов управляющих компиляцией, своего рода директивы.
Все слова целевой системы присутствуют в исходных текстах. Т.е. подключай другой ассемблер
и все слова использующие ассемблер будут выявлены.

Минимум слов в SPF-исходниках, которые нужно переписать под конкретную платформу (другой ассемблер). Насколько я понял, в качестве target compiler сейчас используется jpf. А в исходниках только часть слов определяется через ассемблер и словарь jpf, который позже отключается. Остальные слова определяются, через слова, определенные на первом этапе, т.е. платформонезависимые. Какие слова, в каких файлах зависять от jpf и ассемблера т.е. платформозависимы?