X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;f=lib%2Ffortran%2Fvpunch-help%2Fuse.c;h=992c7150fbd2650184f92df4a9180f1fe34f4765;hb=437b3ba835f66625031f4711cd0a963be67ccf5a;hp=f79401c612507c06cf101065710ac051cf340cff;hpb=008a15c07914ebf7f69e6243c4d2754c8f959a7f;p=h316.git diff --git a/lib/fortran/vpunch-help/use.c b/lib/fortran/vpunch-help/use.c index f79401c..992c715 100644 --- a/lib/fortran/vpunch-help/use.c +++ b/lib/fortran/vpunch-help/use.c @@ -19,11 +19,10 @@ char tw(char in){ } int main (int argc, char ** argv){ -// printf("Hallo, Welt!\n"); int c; int a; for (c=0; c<4096; c++) fontdata_8x16[c]=tw(fontdata_8x16[c]); - printf("\tSUBR\tFONT\n"); +// printf("\tSUBR\tFONT\n"); for (a=0; a<256; a++){ char * fd =fontdata_8x16 + (a<<4); if (a==0) printf("FONT\t"); else printf("\t");