Fix for failing test suite on MIPS machine, due to

gc failing to mark a local variable in txr_main.

1 files changed, 2 insertions, 2 deletions

diff --git a/txr.c b/txr.c
index 83ef0233..2d692bc9 100644
--- a/txr.c
+++ b/txr.c
@@ -138,7 +138,7 @@ static val remove_hash_bang_line(val spec)
   }
 }
 
-static int txr_main(int argc, char **argv);
+int txr_main(int argc, char **argv);
 
 int main(int argc, char **argv)
 {
@@ -148,7 +148,7 @@ int main(int argc, char **argv)
   return txr_main(argc, argv);
 }
 
-static int txr_main(int argc, char **argv)
+int txr_main(int argc, char **argv)
 {
   val specstring = nil;
   val spec = nil;