YaK:: FORTH Archive [Changes]   [Calendar]   [Search]   [Index]   [PhotoTags]   
[mega_changes]
[photos]

FORTH Archive

The most useful documents I've found for understanding how to build a FORTH:

Sorry, definitely NOT FORTH.

  • unithorpe-2004-11-30.tgz

    Archive (to help avoid internet rot):

  • fig-FORTH_Manuals_May79.pdf
  • thinking-forth-color.pdf
  • sysguidefig.pdf
  • jonesforth-AlexandreAbreu-clone.tgz
  • Build-Your-Own-FORTH---The-Heart-Of-FORTH.tgz
  • forth-rc2.pdf

  • 1802_FORTH--FORTH.ASM
  • 1802_FORTH--FORTH.HEX
  • 1802_FORTH--FORTH.LST
  • 1802_FORTH--hart_figforth.txt
  • retro_combinators.forth.txt (Thank you crcx: https://gist.github.com/crcx/8060687 )
  • MovingForth--BradRodriguez.tgz ( archived from http://www.bradrodriguez.com/papers/ )

    words defined at https://repl.it/repls/SinfulTidyMining running in javascript:

    finish warm quit help blank list l +thru thru +load .line screen load evaluate to recurse [compile] ['] ' endcase endof of case unloop ?leave leave +loop loop ?do do until again repeat while begin endif then else if next for .r u.r . u. d.r d. (d.) #s # (s ( \ [char] char .( s( query accept word key key? does> : ; fvariable variable value fconstant constant create abort" >number du* .' s' ." c" s" skip scan ,' ," compile, ?exec ?comp abort literal c/s l/s c/l fit outfile state >in tib base last scr blk current context debugger warnings casesensitive false true compliance esc bl 2 cell 1 0 -1 loadhelp infolines tail all random epoch ms enter confirm alert eval hex decimal bye .allocated free allocate f, 1/f pi f. fmax fmin fsqrt falog fln f** facos fatan2 fatan fasin ftan fcos fsin f/ f* f- f+ s>f f>d d>f fdepth fround fabs fnegate f0> f0< f0<> f0= f< f> f<> f= f! f@ fover fswap fdup fdrop f.s vocs previous also order definitions teststuff hidden forth only vocabulary bufstats empty-buffers save-buffers update block buffer localcapacity capacity (marker) heap unused :noname name .name [ ] immediate body> >body find c, , allot here words digit -trailing cmove move j i perform execute #> sign hold <# within u> u< 0> 0< 0<> 0= < > <> = invert xor and or ud/mod um/mod d= d< m* um* d+ dabs dnegate s>d range chars cells +! >> rshift << lshift abs negate */mod /mod mod */ / * - + 2/ 2* cell- 1- char+ cell+ 1+ cookie@ cookie! !source source slow fast parse .s prompt cls page type emit space spaces cr pad aligned align /string erase fill off on exchange skim count c! c@ 2! 2@ ! @ roll pick depth 2r@ 2r> 2>r rdrop r@ r> >r max min 2over 2swap 2drop 2dup nip tuck -rot rot over swap drop ?dup dup newerror throw catch exit jsf ans f83 f79 foerthchen fig elapsed startclock info stackeffect box)

  • (unless otherwise marked) Copyright 2002-2014 YakPeople. All rights reserved.
    (last modified 2018-08-13)       [Login]
    (No back references.)