!R1224
program main
	integer a
	a=1
	contains
	function p()
!error: return with expression can only appear in subroutine
	return(8)
	end
end
