Return to alloc.c CVS log

Up to [CSRG BSD Unix] / 43BSDReno / games / hack

Annotation of 43BSDReno/games/hack/alloc.c, revision 1.1.1.1

1.1       root        1: /* alloc.c - version 1.0.2 */
                      2: #ifdef LINT
                      3: 
                      4: /*
                      5:    a ridiculous definition, suppressing
                      6:        "possible pointer alignment problem" for (long *) malloc()
                      7:        "enlarg defined but never used"
                      8:        "ftell defined (in <stdio.h>) but never used"
                      9:    from lint
                     10: */
                     11: #include <stdio.h>
                     12: long *
                     13: alloc(n) unsigned n; {
                     14: long dummy = ftell(stderr);
                     15:        if(n) dummy = 0;        /* make sure arg is used */
                     16:        return(&dummy);
                     17: }
                     18: 
                     19: #else
                     20: 
                     21: extern char *malloc();
                     22: extern char *realloc();
                     23: 
                     24: long *
                     25: alloc(lth)
                     26: register unsigned lth;
                     27: {
                     28:        register char *ptr;
                     29: 
                     30:        if(!(ptr = malloc(lth)))
                     31:                panic("Cannot get %d bytes", lth);
                     32:        return((long *) ptr);
                     33: }
                     34: 
                     35: long *
                     36: enlarge(ptr,lth)
                     37: register char *ptr;
                     38: register unsigned lth;
                     39: {
                     40:        register char *nptr;
                     41: 
                     42:        if(!(nptr = realloc(ptr,lth)))
                     43:                panic("Cannot reallocate %d bytes", lth);
                     44:        return((long *) nptr);
                     45: }
                     46: 
                     47: #endif LINT

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