37     FILE * fout;  in main()  local
47     if ( !( fout = fopen( argv[1], "w" ) ) )  in main()
64         fprintf( fout, "/* Generated by mkjambase from Jambase */\n" );  in main()
65         fprintf( fout, "const char *jambase[] = {\n" );  in main()
77             fprintf( fout, "/* %s */\n", *argv );  in main()
79             fprintf( fout, "### %s ###\n", *argv );  in main()
96                 putc( '"', fout );  in main()
100                         case '\\': putc( '\\', fout ); putc( '\\', fout ); break;  in main()
101                         case '"' : putc( '\\', fout ); putc( '"' , fout ); break;  in main()
103                         default: putc( *p, fout ); break;  in main()
106                 fprintf( fout, "\\n\",\n" );  in main()
110                 fprintf( fout, "%s", buf );  in main()
118         fprintf( fout, "0 };\n" );  in main()
120     fclose( fout );  in main()