module TESTOBJ
	%set debug_print_ccode=true
	%set debug_object_1=true
	%set debug_object_2=true
	%set debug_object_3=true
	%set list_object=true
import SAM from TESTOBJ2
procedure JOE ()
    SAM ()
endprocedure
endmodule