-/* @(#) pfcompil.h 96/12/18 1.11 */\r
-\r
-#ifndef _pforth_compile_h\r
-#define _pforth_compile_h\r
-\r
-/***************************************************************\r
-** Include file for PForth Compiler\r
-**\r
-** Author: Phil Burk\r
-** Copyright 1994 3DO, Phil Burk, Larry Polansky, David 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
-***************************************************************/\r
-\r
-#ifdef __cplusplus\r
-extern "C" {\r
-#endif\r
-\r
-Err ffPushInputStream( FileStream *InputFile );\r
-ExecToken NameToToken( const ForthString *NFA );\r
-FileStream * ffConvertSourceIDToStream( cell id );\r
-FileStream *ffPopInputStream( void );\r
-cell ffConvertStreamToSourceID( FileStream *Stream );\r
-cell ffFind( const ForthString *WordName, ExecToken *pXT );\r
-cell ffFindC( const char *WordName, ExecToken *pXT );\r
-cell ffFindNFA( const ForthString *WordName, const ForthString **NFAPtr );\r
-cell ffNumberQ( const char *FWord, cell *Num );\r
-cell ffRefill( void );\r
-cell ffTokenToName( ExecToken XT, const ForthString **NFAPtr );\r
-cell *NameToCode( ForthString *NFA );\r
-PForthDictionary pfBuildDictionary( int32 HeaderSize, int32 CodeSize );\r
-char *ffWord( char c );\r
-const ForthString *NameToPrevious( const ForthString *NFA );\r
-int32 FindSpecialCFAs( void );\r
-int32 FindSpecialXTs( void );\r
-int32 NotCompiled( const char *FunctionName );\r
-void CreateDicEntry( ExecToken XT, const ForthStringPtr FName, uint32 Flags );\r
-void CreateDicEntryC( ExecToken XT, const char *CName, uint32 Flags );\r
-void ff2Literal( cell dHi, cell dLo );\r
-void ffALiteral( cell Num );\r
-void ffColon( void );\r
-void ffCreate( void );\r
-void ffCreateSecondaryHeader( const ForthStringPtr FName);\r
-void ffDefer( void );\r
-void ffFinishSecondary( void );\r
-void ffLiteral( cell Num );\r
-void ffStringCreate( ForthStringPtr FName);\r
-void ffStringDefer( const ForthStringPtr FName, ExecToken DefaultXT );\r
-void pfHandleIncludeError( void );\r
-\r
-ThrowCode ffSemiColon( void );\r
-ThrowCode ffOK( void );\r
-ThrowCode ffInterpret( void );\r
-ThrowCode ffOuterInterpreterLoop( void );\r
-ThrowCode ffIncludeFile( FileStream *InputFile );\r
-\r
-#ifdef PF_SUPPORT_FP\r
-void ffFPLiteral( PF_FLOAT fnum );\r
-#endif\r
-\r
-#ifdef __cplusplus\r
-} \r
-#endif\r
-\r
-#endif /* _pforth_compile_h */\r
+/* @(#) pfcompil.h 96/12/18 1.11 */
+
+#ifndef _pforth_compile_h
+#define _pforth_compile_h
+
+/***************************************************************
+** Include file for PForth Compiler
+**
+** Author: Phil Burk
+** Copyright 1994 3DO, Phil Burk, Larry Polansky, David Rosenboom
+**
+** Permission to use, copy, modify, and/or distribute this
+** software for any purpose with or without fee is hereby granted.
+**
+** THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL
+** WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED
+** WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL
+** THE AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR
+** CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING
+** FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF
+** CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+** OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+**
+***************************************************************/
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+Err ffPushInputStream( FileStream *InputFile );
+ExecToken NameToToken( const ForthString *NFA );
+FileStream * ffConvertSourceIDToStream( cell_t id );
+FileStream *ffPopInputStream( void );
+cell_t ffConvertStreamToSourceID( FileStream *Stream );
+cell_t ffFind( const ForthString *WordName, ExecToken *pXT );
+cell_t ffFindC( const char *WordName, ExecToken *pXT );
+cell_t ffFindNFA( const ForthString *WordName, const ForthString **NFAPtr );
+cell_t ffNumberQ( const char *FWord, cell_t *Num );
+cell_t ffRefill( void );
+cell_t ffTokenToName( ExecToken XT, const ForthString **NFAPtr );
+cell_t *NameToCode( ForthString *NFA );
+PForthDictionary pfBuildDictionary( cell_t HeaderSize, cell_t CodeSize );
+char *ffWord( char c );
+char *ffLWord( char c );
+const ForthString *NameToPrevious( const ForthString *NFA );
+cell_t FindSpecialCFAs( void );
+cell_t FindSpecialXTs( void );
+cell_t NotCompiled( const char *FunctionName );
+void CreateDicEntry( ExecToken XT, const ForthStringPtr FName, ucell_t Flags );
+void CreateDicEntryC( ExecToken XT, const char *CName, ucell_t Flags );
+void ff2Literal( cell_t dHi, cell_t dLo );
+void ffALiteral( cell_t Num );
+void ffColon( void );
+void ffCreate( void );
+void ffCreateSecondaryHeader( const ForthStringPtr FName);
+void ffDefer( void );
+void ffFinishSecondary( void );
+void ffLiteral( cell_t Num );
+void ffStringCreate( ForthStringPtr FName);
+void ffStringDefer( const ForthStringPtr FName, ExecToken DefaultXT );
+void pfHandleIncludeError( void );
+
+ThrowCode ffSemiColon( void );
+ThrowCode ffOK( void );
+ThrowCode ffInterpret( void );
+ThrowCode ffOuterInterpreterLoop( void );
+ThrowCode ffIncludeFile( FileStream *InputFile );
+
+#ifdef PF_SUPPORT_FP
+void ffFPLiteral( PF_FLOAT fnum );
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* _pforth_compile_h */
projects / pforth / blobdiff