--- runtime/Clib/cmain.c.orig	2018-12-18 16:52:09.913524598 -0700
+++ runtime/Clib/cmain.c	2018-12-18 16:52:25.221479441 -0700
@@ -116,10 +116,6 @@ bigloo_exit( obj_t val ) {
    
    n = (long)INTEGERP( val ) ? (long)CINT( val ) : 0;
    exit( n );
-   
-   BGL_MUTEX_UNLOCK( bgl_exit_mutex() );
-   
-   return val;
 }
 
 /*---------------------------------------------------------------------*/
--- runtime/Clib/cports.c.orig	2018-12-18 16:51:21.828666449 -0700
+++ runtime/Clib/cports.c	2018-12-18 16:52:25.222479438 -0700
@@ -1823,6 +1823,7 @@ bgl_input_port_seek( obj_t port, long po
 			"input-port does not support seeking",
 			port );
    }
+   return port;
 }
 
 /*---------------------------------------------------------------------*/
--- runtime/Clib/crgc.c.orig	2018-12-18 06:25:53.000000000 -0700
+++ runtime/Clib/crgc.c	2018-12-18 16:52:25.223479435 -0700
@@ -859,6 +859,7 @@ int rgc_debug_port( obj_t port, char *ms
 	    port, BSTRING_TO_STRING( INPUT_PORT_NAME( port ) ),
 	    matchstart, matchstop, forward, bufpos, bufsiz,
 	    eof ? "eof" : "" );
+   return 0;
 }