1 /* Copyright (c) 1979 Regents of the University of California */ 2 3 static char sccsid[] = "@(#)EXPO.c 1.1 10/30/80"; 4 5 EXPO(value) 6 7 long value; 8 { 9 if (value == 0) 10 return 0; 11 return ((value & ~0xffff8000) >> 7) - 128; 12 } 13