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