!
!
!
!       CACHE MANAGEMENT EXTERNAL ENTRY ROUTINES
!
!
!       Andie Ness 3/3/88
!
!
%externalroutinespec insert page(%bytearray p(0:24,0:39),
                                        %integer pn,
                                        %byte chan,
                                        %string(255) f,comments)

%externalintegerfnspec match(%integer page,channel,
                             %string(255)filename,%integer i)

%externalpredicatespec extract page(%integer record no,
                                    %bytearrayname page(0:24,0:39),
                                    %string(255) filename)

%externalstring(255)%fnspec extract comments(%integer record no,%integername left)