Trailing-Edge
-
PDP-10 Archives
-
BB-P363B-SM_1985
-
mcb/nml/nmunfl.bli
There is 1 other file named nmunfl.bli in the archive. Click here to see a list.
module NMUFIL (
ident = 'DUMMY'
) =
begin
!
! COPYRIGHT (c) 1980, 1981, 1982
! DIGITAL EQUIPMENT CORPORATION
! Maynard, Massachusetts
!
! This software is furnished under a license and may be used
! and copied only in accordance with the terms of such license
! and with the inclusion of the above copyright notice. This
! software or any other copies thereof may not be provided or
! otherwise made available to any other person. No title to
! and ownership of the software is hereby transferred.
!
! The information in this software is subject to change
! without notice and should not be construed as a commitment
! by DIGITAL EQUIPMENT CORPORATION.
!
! DIGITAL assumes no responsibility for the use or reliability
! of its software on equipment which is not supplied by
! DIGITAL.
!
!++
! Facility: LSG DECnet Network Management
!
! Abstract:
!
! Dummy module for NMUFIL.
!
! Environment: User Mode on TOPS-20, TOPS-10, RSX-11/MCB
!
! Author: Steven M. Jenness & Dale C. Gunn, Creation date: 19-Jun-81
!
!--
!
! Include files:
!
library 'NMULIB'; ! Get all required definitions
!
! Table of contents
!
forward routine
NMU$FILE_INITIALIZE : novalue, ! Initialize file interface
NMU$FILE_OPEN, ! Open file for access
NMU$FILE_READ,
NMU$FILE_WRITE,
NMU$FILE_SEEK,
NMU$FILE_SKIP,
NMU$FILE_CLOSE;
!
! Equated symbols:
!
!
! Own storage:
!
!
! External references:
!
%global_routine ('NMU$FILE_INITIALIZE') : novalue =
begin
$NICE$ERR_UFO
end; ! End of NMU$FILE_INITIALIZE
%global_routine ('NMU$FILE_OPEN', FILE_TYPE, HOST, FILE_NAME, RSP_PTR) =
begin
$NICE$ERR_UFO
end; ! End of NMU$FILE_OPEN
%global_routine ('NMU$FILE_READ', FILE_ID, DEST_PTR, DEST_COUNT, RSP_PTR) =
begin
$NICE$ERR_UFO
end; ! End of NMU$FILE_READ
%global_routine ('NMU$FILE_WRITE', FILE_ID, SOURCE_PTR, WRITE_COUNT, RSP_PTR) =
begin
$NICE$ERR_UFO
end; ! End of NMU$FILE_WRITE
%global_routine ('NMU$FILE_SEEK', FILE_ID, BYTE_POSITION, RSP_PTR) =
begin
$NICE$ERR_UFO
end; ! End of NMU$FILE_SEEK
%global_routine ('NMU$FILE_SKIP', FILE_ID, BYTE_COUNT, RSP_PTR) =
begin
$NICE$ERR_UFO
end; ! End of NMU$FILE_SKIP
%global_routine ('NMU$FILE_CLOSE', FILE_ID, RSP_PTR) =
begin
$NICE$ERR_UFO
end; ! End of NMU$FILE_CLOSE
end ! End of Module NMUFIL
eludom
! Local Modes:
! Mode:BLISS
! Auto Save Mode:2
! Comment Column:40
! Comment Rounding:+1
! End: