bs$find$record: PROCEDURE(board, record$type) WORD EXTERNAL; DECLARE board BYTE, record$type BYTE; END bs$find$record; bs$get$interconnect: PROCEDURE(slot$num, reg$num, excep$p) BYTE EXTERNAL; DECLARE slot$num BYTE; DECLARE reg$num WORD; DECLARE excep$p POINTER; END bs$get$interconnect; bs$set$interconnect: PROCEDURE(value, slot$num, reg$num, excep$p) EXTERNAL; DECLARE value BYTE; DECLARE slot$num BYTE; DECLARE reg$num WORD; DECLARE excep$p POINTER; END bs$set$interconnect;