|
|
1.1 root 1: /*
2: * mjm: originally in rhftoa.c;
3: * separate out so can use /lib/libS.a printf
4: */
5: /* printf here to force loading of pfloat is printf is called. */
6:
7: printf(arg0)
8: char *arg0;
9: {
10: extern int putchar();
11: return(format(putchar,"%r",&arg0));
12: }
13:
14: __dummy() {
15: extern pfloat(); /* force pfloat and pscien to be loaded */
16: pfloat();
17: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.