Return to fixtop.c CVS log

Up to [MW Coherent from dump] / coherent / d / bin / cc / c / n1 / i8086

Annotation of coherent/d/bin/cc/c/n1/i8086/fixtop.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * C compiler.
                      3:  * Intel 8086/8088.
                      4:  * Adjust types at the top of a tree node.
                      5:  */
                      6: #ifdef   vax
                      7: #include "INC$LIB:cc1.h"
                      8: #else
                      9: #include "cc1.h"
                     10: #endif
                     11: 
                     12: /*
                     13:  * Make the top of a tree a computational type.
                     14:  */
                     15: fixtoptype(tp)
                     16: register TREE *tp;
                     17: {
                     18:        register type;
                     19: 
                     20:        type = tp->t_type;
                     21:        if (type == S8)
                     22:                tp->t_type = S16;
                     23:        else if (type == U8)
                     24:                tp->t_type = U16;
                     25:        else if (type == F32)
                     26:                tp->t_type = F64;
                     27: }

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