assembly_external
assembly_interface
object('System.Int32')
try...throw...catch...finally...end try
subroutine blah(s) character(len=*), intent(in) :: s assembly_interface(name='WriteLine') assembly_external(name='System.Console.WriteLine') foo call foo('{0}, world.', s) end subroutine
Integration with the Common Language Specification
(CLR = Common Language Runtime)
try call do_something catch(exception) call recover finally call cleanup_regardless end try
object("System.String")str,str1 Object('System.Object')obj character*10 fred fred="r" str=new@("System.String",fred) obj=cast@(str,"System.Object") str1=cast@(obj,"System.String") call wr(str1) end