Simplify

[pforth] / fth / loadp4th.fth

diff --git a/fth/loadp4th.fth b/fth/loadp4th.fth
index 3d454f0..0973fc9 100644 (file)
--- a/fth/loadp4th.fth
+++ b/fth/loadp4th.fth
@@ -26,6 +26,7 @@ include? task-misc2.fth misc2.fth
 include? [if]    condcomp.fth
 include? save-input save-input.fth
 include? read-line  file.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*
 
 \ load floating point support if basic support is in kernel
 exists? F*