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     ! 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.