PageRenderTime 62ms CodeModel.GetById 29ms RepoModel.GetById 0ms app.codeStats 0ms

/fth/loadp4th.fth

https://github.com/cataska/pforth
Forth | 46 lines | 41 code | 5 blank | 0 comment | 2 complexity | ddb2643e0833ab00d2d5643cf456a2b2 MD5 | raw file
  1. \ @(#) loadp4th.fth 98/01/28 1.3
  2. \ Load various files needed by PForth
  3. \
  4. \ Author: Phil Burk
  5. \ Copyright 1994 3DO, Phil Burk, Larry Polansky, Devid Rosenboom
  6. \
  7. \ The pForth software code is dedicated to the public domain,
  8. \ and any third party may reproduce, distribute and modify
  9. \ the pForth software code or any derivative works thereof
  10. \ without any compensation or license. The pForth software
  11. \ code is provided on an "as is" basis without any warranty
  12. \ of any kind, including, without limitation, the implied
  13. \ warranties of merchantability and fitness for a particular
  14. \ purpose and their equivalents under the laws of any jurisdiction.
  15. include? forget forget.fth
  16. include? >number numberio.fth
  17. include? task-misc1.fth misc1.fth
  18. include? case case.fth
  19. include? $= strings.fth
  20. include? privatize private.fth
  21. include? (local) ansilocs.fth
  22. include? { locals.fth
  23. include? fm/mod math.fth
  24. include? task-misc2.fth misc2.fth
  25. include? [if] condcomp.fth
  26. \ load floating point support if basic support is in kernel
  27. exists? F*
  28. [IF] include? task-floats.fth floats.fth
  29. [THEN]
  30. \ useful but optional stuff follows --------------------
  31. include? task-member.fth member.fth
  32. include? :struct c_struct.fth
  33. include? smif{ smart_if.fth
  34. include? file? filefind.fth
  35. include? see see.fth
  36. include? words.like wordslik.fth
  37. include? trace trace.fth
  38. include? ESC[ termio.fth
  39. include? HISTORY history.fth
  40. include? SDAD savedicd.fth
  41. map