Return to make_errors.c CVS log

Up to [Research Unix] / researchv10no / cmd / sml / src / runtime

Annotation of researchv10no/cmd/sml/src/runtime/make_errors.c, revision 1.1.1.1

1.1       root        1: /* Copyright 1989 by AT&T Bell Laboratories */
                      2: #include <stdio.h>
                      3: #include "tags.h"
                      4: 
                      5: extern int sys_nerr;
                      6: extern char *sys_errlist[];
                      7: 
                      8: main()
                      9: {int i;
                     10:   for(i=0;i<sys_nerr;i++)
                     11:     printf("static struct {long tag; char s[%d];} e%d = { %d, \n      \"%s\\0\\0\\0\\0\"};\n",
                     12:            strlen(sys_errlist[i])+4,i,
                     13:            strlen(sys_errlist[i])*power_tags+tag_string,
                     14:            sys_errlist[i]);
                     15:        
                     16:   printf("int errstrings[]={ %d,\n", sys_nerr*power_tags+tag_array);
                     17:   for(i=0;i<sys_nerr;i++)
                     18:     printf("(int)e%d.s,\n",i);
                     19:   printf("};\n");
                     20:   exit(0);
                     21: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.