

; Bliss-32 7.352	Saturday 22-AUG-1978 03:44:55	DBB3:[COPY.SRC]COPYGBL.B32;2					Page 1

; Digital Equipment Corporation

;

;	0001	MODULE copygbl (	! Declarations of global variables for the COPY utility

;	0002	                LANGUAGE (BLISS32),

;	0003	                IDENT = 'X00001'

;	0004	                ) =

;	0005	BEGIN

;	0006	

;	0007	!

;	0008	! Copyright (c) 1978

;	0009	! Digital Equipment Corporation, Maynard, Massachusetts 01754

;	0010	!

;	0011	! This software is furnished  under a license for use only on a single

;	0012	! computer  system and  may be  copied only with  the inclusion of the

;	0013	! above copyright notice.  This software, or any other copies thereof,

;	0014	! may not be provided or  otherwise made available to any other person

;	0015	! except for use on such system and to one who agrees to these license

;	0016	! terms.  Title to and  ownership of the  software  shall at all times

;	0017	! remain in DEC.

;	0018	!

;	0019	! The information in this software is subject to change without notice

;	0020	! and should  not be construed  as a commitment  by Digital  Equipment

;	0021	! Corporation.

;	0022	!

;	0023	! DEC assumes  no  responsibility  for  the use or  reliability of its

;	0024	! software on equipment which is not supplied by DEC.

;	0025	

;	0026	!++

;	0027	! FACILITY:	COPY Command

;	0028	!

;	0029	! ABSTRACT:

;	0030	!

;	0031	!	This module contains declarations of some of the global variables

;	0032	!	used in the COPY utility.

;	0033	!

;	0034	! ENVIRONMENT:

;	0035	!

;	0036	!	VAX/VMS operating system, unprivileged user mode utility,

;	0037	!	operates at non-AST level.

;	0038	!

;	0039	!--

;	0040	!++

;	0041	!

;	0042	! AUTHOR:	Carol Peters,	CREATION DATE:	20 April 1978 08:44

;	0043	!

;	0044	! REVISION HISTORY:

;	0045	!

;	0046	!--



; Bliss-32 7.352	Saturday 22-AUG-1978 03:44:55	DBB3:[COPY.SRC]COPYGBL.B32;2					Page 2

; Digital Equipment Corporation

;

;	0047	!

;	0048	! Global variables

;	0049	!

;	0050	GLOBAL

;	0051	    copy$cli_result,					! Contains address of CLI callback routine

;	0052	    copy$cli_status					! COPY status word used by CLI interface

;	0053	                        : BITVECTOR [32] INITIAL (0),

;	0054	    copy$sem_status					! COPY status word that describes semantics

;	0055				: BITVECTOR [16] INITIAL (WORD (0)),

;	0056	    COPY$B_INCOMPAT	: BYTE INITIAL (BYTE (0));	! INCOMPATIBLE MESSAGE ALREADY GIVEN



; Bliss-32 7.352	Saturday 22-AUG-1978 03:44:55	DBB3:[COPY.SRC]COPYGBL.B32;2					Page 3

; Digital Equipment Corporation

;

;	0057	END

;	0058	ELUDOM





							    .TITLE  COPYGBL

							    .IDENT  \X00001\



							    .PSECT  $GLOBAL$,NOEXE,2



					      00000 COPY$CLI_RESULT::

							    .BLKB   4

					      00004 COPY$CLI_STATUS::

							    .LONG   0							      ;

					      00008 COPY$SEM_STATUS::

							    .WORD   0							      ;

					      0000A COPY$B_INCOMPAT::

							    .BYTE   0							      ;









;				       PSECT SUMMARY

;

;	Name		 Bytes			       Attributes

;

;  $GLOBAL$       	    11    WRT,  RD ,NOEXE,NOSHR,  LCL,  REL,  CON,NOPIC,ALIGN(2)

;  $CODE$         	     0  NOWRT,  RD ,  EXE,NOSHR,  LCL,  REL,  CON,NOPIC,ALIGN(2)











; Size:		0 code + 11 data bytes

; Run Time:	00:00.5

; Elapsed Time:	00:00.9

; Memory Used:	6 pages

; Compilation Complete

