Google
 

Trailing-Edge - PDP-10 Archives - bb-bt99g-bb - defpt.c13
There is 1 other file named defpt.c13 in the archive. Click here to see a list.
 REP 19/1	;13C1
	!AUTHOR NORMA ABEL/HPW/JNG/DCE/TFV/EGM/CKS/AHM/TJK/AlB
 WIT
	!AUTHOR NORMA ABEL/HPW/JNG/DCE/TFV/EGM/CKS/AHM/TJK/AlB/MEM
 REP 24/1	;13C2
	GLOBAL BIND DEFPTV = #10^24 + 0^18 + #2522;	! Version Date:	8-MAR-85
 WIT
	GLOBAL BIND DEFPTV = #10^24 + 0^18 + #2550;	! Version Date:	11-Sep-85
 INS 153/1	;13C3
	2550	MEM	11-Sep-85
		Only parameters of a statement function were used to calculate the
		definition points of variables, however, the body of the statement
		function must be used in definition point calculations also. A 
		variable, other than a parameter to the statement function, may be 
		changed by itself being a parameter in a function call within the
		statement function.

 INS 32/9	;13C4
	%2550%		LOCAL BASE ARG1:SFNODE;
 INS 38/9	;13C5
	%2550%			ARG1 = .EXPR[ARG1PTR];	! Function name
	%2550%			IF .ARG1[IDATTRIBUT(SFN)]
	%2550%			THEN
	%2550%			BEGIN
	%2550%				SFNODE = .ARG1[IDSFNODE]; ! SFN node
	%2550%				IF .SFNODE[USRFNREF]
	%2550%				THEN
	%2550%				BEGIN
	%2550%					SFNODE = .SFNODE[SFNEXPR]; ! ASMNT NODE
	%2550%					FCNLOK(.SFNODE[RHEXP]);		
	%2550%				END;
	%2550%			END;
 SUM 156