* acinclude.m4 (LIBGFOR_CHECK_ATTRIBUTE_VISIBILITY): New.

[pf3gnuchains/gcc-fork.git] / libgfortran / runtime / main.c

diff --git a/libgfortran/runtime/main.c b/libgfortran/runtime/main.c
index 4e1f78c..882946c 100644 (file)
--- a/libgfortran/runtime/main.c
+++ b/libgfortran/runtime/main.c
@@ -29,12 +29,11 @@ Boston, MA 02111-1307, USA.  */
 /* This is the offset (in bytes) required to cast from logical(8)* to
    logical(4)*. and still get the same result.  Will be 0 for little-endian
    machines and 4 for big-endian machines.  */
-int l8_to_l4_offset;
+int l8_to_l4_offset = 0;
 
 
 /* Figure out endianness for this machine.  */
 
-#define detetmine_endianness   prefix(determine_endianness)
 static void
 determine_endianness (void)
 {
@@ -95,12 +94,10 @@ init (void)
   if (argc > 1 && strcmp (argv[1], "--help") == 0)
     show_variables ();
 
-/*  if (argc > 1 && strcmp(argv[1], "--resume") == 0) resume();  */
+  /* if (argc > 1 && strcmp(argv[1], "--resume") == 0) resume();  */
 #endif
 
-  memory_init ();
   random_seed(NULL,NULL,NULL);
-
 }