From 508a6d2a69e5d3395816fa353d813adb61aa835f Mon Sep 17 00:00:00 2001 From: Kostis Sagonas Date: Thu, 18 Nov 2010 17:30:26 +0200 Subject: Shut off some dialyzer warnings --- lib/asn1/src/asn1ct.erl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lib/asn1/src/asn1ct.erl') diff --git a/lib/asn1/src/asn1ct.erl b/lib/asn1/src/asn1ct.erl index 968468cb7f..fb2614aa2c 100644 --- a/lib/asn1/src/asn1ct.erl +++ b/lib/asn1/src/asn1ct.erl @@ -149,7 +149,7 @@ compile1(File,Options) when is_list(Options) -> inline(true,Name,Module,Options) -> RTmodule = get_runtime_mod(Options), IgorOptions = igorify_options(remove_asn_flags(Options)), - IgorName = filename:rootname(filename:basename(Name)), + IgorName = list_to_atom(filename:rootname(filename:basename(Name))), % io:format("*****~nName: ~p~nModules: ~p~nIgorOptions: ~p~n*****~n", % [IgorName,Modules++RTmodule,IgorOptions]), report_verbose("Inlining modules: ~p in ~p~n",[[Module]++RTmodule,IgorName],Options), @@ -1183,6 +1183,7 @@ is_inline(Options) -> _ -> lists:keymember(inline,1,Options) end. + inline_output(Options,Default) -> case [X||{inline,X}<-Options] of [OutputName] -> -- cgit v1.2.3