Google
 

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: