file XMesaCmplr24.mesa - create PJames 8/10/89
from AR 452
DIRECTORY
XMesaCmplr24DefsA,
XMesaCmplr24DefsB;
XMesaCmplr24:
MONITOR
IMPORTS XMesaCmplr24DefsA
SHARES XMesaCmplr24DefsB = {
Delete:
PROCEDURE [volumePath: XMesaCmplr24DefsB.Reader]
RETURNS [
BOOLEAN ←
FALSE] = {
IF
NOT XMesaCmplr24DefsA.IsLastByteNull[volumePath]
THEN
ERROR;
RETURN[
FALSE];
};
}.