| # | Line 24 | Line 24 | extern double getflt(); | |
|---|---|---|
| 24 | extern long getint(); | |
| 25 | ||
| 26 | ||
| 27 | + | putambmagic(fp) /* write out ambient value magic number */ |
| 28 | + | FILE *fp; |
| 29 | + | { |
| 30 | + | putint((long)AMBMAGIC, 2, fp); |
| 31 | + | } |
| 32 | + | |
| 33 | + | |
| 34 | + | hasambmagic(fp) /* read in and check validity of magic # */ |
| 35 | + | FILE *fp; |
| 36 | + | { |
| 37 | + | register int magic; |
| 38 | + | |
| 39 | + | magic = getint(2, fp); |
| 40 | + | if (feof(fp)) |
| 41 | + | return(0); |
| 42 | + | return(magic == AMBMAGIC); |
| 43 | + | } |
| 44 | + | |
| 45 | + | |
| 46 | writambval(av, fp) /* write ambient value to stream */ | |
| 47 | register AMBVAL *av; | |
| 48 | FILE *fp; | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines (old) |
| > | Changed lines (new) |