Return to rnmtst.f CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / usr.lib / libU77 / test

BSD 4.3tahoe

	program rnmtst
	integer rename
	external rename

	open(1, file="abc")
	close(1)
	call system ("ls -l abc def")
	write(*,*) "rename:", rename("abc", "def")
	call system ("ls -l abc def")
	end

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.