XUSHSHP ;SF/STAFF - HASHING ROUTINE FOR SIG BLOCK IN FILE 200 ;4/24/89 15:26 ;
;;8.0;KERNEL;;Jul 10, 1995
HASH Q ; Primary entry point
;;
EN Q ; CALLED BY XUS3
;;
DE Q ; Called from XUAPURGE
EN1 ;
EN2 ;
EN3 Q
XUSHSHP ;SF/STAFF - HASHING ROUTINE FOR SIG BLOCK IN FILE 200 ;4/24/89 15:26 ;
+1 ;;8.0;KERNEL;;Jul 10, 1995
HASH ; Primary entry point
QUIT
+1 ;;
EN ; CALLED BY XUS3
QUIT
+1 ;;
DE ; Called from XUAPURGE
QUIT
EN1 ;
EN2 ;
EN3 QUIT