X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=csrc%2Fpf_main.c;fp=csrc%2Fpf_main.c;h=df38d0ce8ee7853337d2b5a47f10a9b488709fc0;hb=1cb310e62eaf4422ee298d9d87c35f9dd6b4c71c;hp=6b07f3378f3e0388622085a68ca6def6f4a9e10e;hpb=970d32b553a44051cedd2caf34267b7b1cdbab78;p=debian%2Fpforth

diff --git a/csrc/pf_main.c b/csrc/pf_main.c
index 6b07f33..df38d0c 100644
--- a/csrc/pf_main.c
+++ b/csrc/pf_main.c
@@ -43,21 +43,13 @@
 #define TRUE (1)
 #define FALSE (0)
 #endif
-
-static const char *gErrorMsg32Bit = "ERROR - A long is not 4 bytes. Are we running on a 64-bit machine?!\n";
 
 #ifdef PF_EMBEDDED
 int main( void )
 {
     char IfInit = 0; 
     const char *DicName = NULL;
-    const char *SourceName = NULL;
-	// Check to make sure we are running in 32-bit mode.
-	if( sizeof(long) != 4 )
-	{
-		pfMessage(gErrorMsg32Bit);
-		return 1;
-	}
+    const char *SourceName = NULL;
     pfMessage("\npForth Embedded\n");
     return pfDoForth( DicName, SourceName, IfInit);
 }
@@ -74,21 +66,14 @@ int main( int argc, char **argv )
 	const char *SourceName = NULL;
 	char IfInit = FALSE;
 	char *s;
-	int32 i;
+	cell_t i;
 	int Result;
-
-	// Check to make sure we are running in 32-bit mode.
-	if( sizeof(long) != 4 )
-	{
-		ERR((gErrorMsg32Bit));
-		return 1;
-	}
-	
+
 /* For Metroworks on Mac */
 #ifdef __MWERKS__
 	argc = ccommand(&argv);
 #endif
-
+	
 /* Parse command line. */
 	for( i=1; i<argc; i++ )
 	{