modernc.org/knuth@v0.0.4/vptovf/vptovf.ch (about)

     1  @x 59
     2  @d banner=='This is VPtoVF, Version 1.6' {printed when the program starts}
     3  @y
     4  @d banner=='This is VPtoVF, Version 1.6 (govptovf v0.0-prerelease)' {printed when the program starts}
     5  @z
     6  
     7  @x 75
     8  @d print_ln(#)==write_ln(#)
     9  @y
    10  @d print_ln(#)==write_ln(#)
    11  @d write_ln(#)==writeln(#)
    12  @d read_ln(#)==readln(#)
    13  @z
    14  
    15  @x 77:
    16  @p program VPtoVF(@!vpl_file,@!vf_file,@!tfm_file,@!output);
    17  @y
    18  @p program VPtoVF(@!vpl_file,@!vf_file,@!tfm_file,@!output,stderr);
    19  @z