\ @(#) loadp4th.fth 98/01/28 1.3\ Load various files needed by PForth\\ Author: Phil Burk\ Copyright 1994 3DO, Phil Burk, Larry Polansky, David Rosenboom\\ The pForth software code is dedicated to the public domain,\ and any third party may reproduce, distribute and modify\ the pForth software code or any derivative works thereof\ without any compensation or license. The pForth software\ code is provided on an "as is" basis without any warranty\ of any kind, including, without limitation, the implied\ warranties of merchantability and fitness for a particular\ purpose and their equivalents under the laws of any jurisdiction.include? forget forget.fthinclude? >number numberio.fthinclude? task-misc1.fth misc1.fthinclude? case case.fthinclude? $= strings.fthinclude? privatize private.fthinclude? (local) ansilocs.fthinclude? { locals.fthinclude? fm/mod math.fthinclude? task-misc2.fth misc2.fthinclude? [if] condcomp.fthinclude? save-input save-input.fthinclude? read-line file.fthinclude? require require.fth\ load floating point support if basic support is in kernelexists? F* [IF] include? task-floats.fth floats.fth [THEN]\ useful but optional stuff follows --------------------include? task-member.fth member.fthinclude? :struct c_struct.fthinclude? smif{ smart_if.fthinclude? file? filefind.fthinclude? see see.fthinclude? words.like wordslik.fthinclude? trace trace.fthinclude? ESC[ termio.fthinclude? HISTORY history.fthmap
\ @(#) loadp4th.fth 98/01/28 1.3
\ Load various files needed by PForth
\
\ Author: Phil Burk
\ Copyright 1994 3DO, Phil Burk, Larry Polansky, David Rosenboom
\
\ The pForth software code is dedicated to the public domain,
\ and any third party may reproduce, distribute and modify
\ the pForth software code or any derivative works thereof
\ without any compensation or license. The pForth software
\ code is provided on an "as is" basis without any warranty
\ of any kind, including, without limitation, the implied
\ warranties of merchantability and fitness for a particular
\ purpose and their equivalents under the laws of any jurisdiction.
include? forget forget.fth
include? >number numberio.fth
include? task-misc1.fth misc1.fth
include? case case.fth
include? $= strings.fth
include? privatize private.fth
include? (local) ansilocs.fth
include? { locals.fth
include? fm/mod math.fth
include? task-misc2.fth misc2.fth
include? [if] condcomp.fth
include? save-input save-input.fth
include? read-line file.fth
include? require require.fth
\ load floating point support if basic support is in kernel
exists? F*
[IF] include? task-floats.fth floats.fth
[THEN]
\ useful but optional stuff follows --------------------
include? task-member.fth member.fth
include? :struct c_struct.fth
include? smif{ smart_if.fth
include? file? filefind.fth
include? see see.fth
include? words.like wordslik.fth
include? trace trace.fth
include? ESC[ termio.fth
include? HISTORY history.fth
map