Return to lget.c CVS log

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

Annotation of coherent/d/bin/cc/c/common/lget.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * Standard stream library for the
                      3:  * C compiler and other compilers that use
                      4:  * C compiler factilities.
                      5:  * Input an lval_t.
                      6:  */
                      7: #include <stdio.h>
                      8: #ifdef   vax
                      9: #include "INC$LIB:mch.h"
                     10: #else
                     11: #include "mch.h"
                     12: #endif
                     13: 
                     14: lval_t
                     15: lget()
                     16: {
                     17:        register char *p;
                     18:        register n;
                     19:        lval_t   l;
                     20: 
                     21:        p = &l;
                     22:        n = sizeof(lval_t);
                     23:        do {
                     24:                *p++ = bget();
                     25:        } while (--n);
                     26:        return (l);
                     27: }

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