Implement REQUIRE (Forth 2012)
[debian/pforth] / fth / loadp4th.fth
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, David 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
16 include? forget  forget.fth
17 include? >number numberio.fth
18 include? task-misc1.fth   misc1.fth
19 include? case    case.fth
20 include? $=      strings.fth
21 include? privatize   private.fth
22 include? (local) ansilocs.fth
23 include? {       locals.fth
24 include? fm/mod  math.fth
25 include? task-misc2.fth misc2.fth
26 include? [if]    condcomp.fth
27 include? save-input save-input.fth
28 include? read-line  file.fth
29 include? file?      filefind.fth
30 include? require    require.fth
31
32 \ load floating point support if basic support is in kernel
33 exists? F*
34    [IF]  include? task-floats.fth floats.fth
35    [THEN]
36
37 \ useful but optional stuff follows --------------------
38
39 include? task-member.fth   member.fth
40 include? :struct c_struct.fth
41 include? smif{   smart_if.fth
42 include? see     see.fth
43 include? words.like wordslik.fth
44 include? trace   trace.fth
45 include? ESC[    termio.fth
46 include? HISTORY history.fth
47
48 map