how to get the return address in Fortran?

From: Sean (seanatpurdue_at_hotmail.com)
Date: 03/18/05 

Date: Thu, 17 Mar 2005 18:16:33 -0500

We know the return address in C can be accessed by reading memory of
4(%esp). So, the following code can get the return address in C.
int callee()
{
....
asm("mov, 4(%esp), %eax);
}

How can I get return address in Fortran? Thank you very much.
I think my question really is "where can I find out the run-time stack
layout of Fortran program".

Many thanks