/* $Id: top.sv,v 1.1 2005/04/06 06:44:22 drich Exp drich $ */
/* dave_rich@mentor.com  */

module top;
import VPI::*;

string pathname = "top.";
integer A=2;

chandle my_handle;

initial begin
	my_handle = handle_by_name({pathname,"A"});

	$display("top.A is %d",get_value(my_handle));

	put_value(my_handle, 3);

	$display("top.A is %d",get_value(my_handle));
	end

endmodule