Return to special1.c CVS log

Up to [Research Unix] / researchv9 / jerq / sgs / ld

Annotation of researchv9/jerq/sgs/ld/special1.c, revision 1.1.1.1

1.1       root        1: static char ID[] = "@(#) special1.c: 1.1 1/7/82";
                      2: 
                      3: #include <stdio.h>
                      4: 
                      5: #include "system.h"
                      6: #include "structs.h"
                      7: #include "extrns.h"
                      8: 
                      9: 
                     10: 
                     11: #if TRVEC
                     12: void
                     13: chktvorg(org, tvbndadr)
                     14: 
                     15: long   org, *tvbndadr;
                     16: {
                     17:        /*
                     18:         * check user-supplied .tv origin for legality
                     19:         * if illegal, side-effect tvspec.tvbndadr
                     20:         *  and issue warning message
                     21:         */
                     22: 
                     23:                        if( (org & 0xf) != 0 )
                     24:                                yyerror("tv origin (%10.0lx) must be a multiple of 16", org);
                     25:                        *tvbndadr = (org + 0xfL) & ~0xfL;
                     26: 
                     27: }
                     28: #endif
                     29: 
                     30: void
                     31: specflags(flgname, argptr)
                     32: char *flgname;
                     33: char **argptr;
                     34: {
                     35: 
                     36:        /*
                     37:         * process special flag specifications for m32ld
                     38:         * these flags have fallen through switch of argname in ld00.c
                     39:         */
                     40: 
                     41:        switch ( *flgname ) {
                     42: 
                     43:                case 'n':
                     44:                        break;
                     45:                default:
                     46:                        yyerror("unknown flag: %s", flgname);
                     47: 
                     48:                }
                     49: }

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