A bunch of modules received a recompiling protection entry function. (#1902)

Author: joa-quim

src/grd2cpt.jl

@@ -65,11 +65,13 @@ To see the full documentation type: ``@? grd2cpt``
 """
 grd2cpt(cmd0::String; kwargs...) = grd2cpt_helper(cmd0, nothing; kwargs...)
 grd2cpt(arg1; kwargs...)         = grd2cpt_helper("", arg1; kwargs...)
+function grd2cpt_helper(cmd0::String, arg1; kwargs...)
+	d = init_module(false, kwargs...)[1]		# Also checks if the user wants ONLY the HELP mode
+	grd2cpt_helper(cmd0, arg1, d)
+end
 
 # ---------------------------------------------------------------------------------------------------
-function grd2cpt_helper(cmd0::String, arg1; kw...)
-
-	d = init_module(false, kw...)[1]			# Also checks if the user wants ONLY the HELP mode
+function grd2cpt_helper(cmd0::String, arg1, d::Dict{Symbol, Any})
 
 	cmd, = parse_common_opts(d, "", [:R :V_params :b :h :t])
 	cmd, Tvec = helper_cpt(d, cmd)
@@ -80,7 +82,7 @@ function grd2cpt_helper(cmd0::String, arg1; kw...)
 
 	cmd, got_fname, arg1 = find_data(d, cmd0, cmd, arg1)
 	N_used = got_fname == 0 ? 1 : 0			# To know whether a cpt will go to arg1 or arg2
-    isa(arg1, GMTgrid) && ((val = find_in_kwargs(kw, CPTaliases)[1]) === nothing) && (d[:C] = (arg1.cpt != "") ? arg1.cpt : :turbo)
+    isa(arg1, GMTgrid) && ((val = is_in_dict(d, CPTaliases)) === nothing) && (d[:C] = (arg1.cpt != "") ? arg1.cpt : :turbo)
 	cmd, arg1, arg2, = add_opt_cpt(d, cmd, CPTaliases, 'C', N_used, arg1)
 
 	r = common_grd(d, "grd2cpt " * cmd, arg1, arg2)		# r may be a tuple if -E+f was used

src/grd2xyz.jl

@@ -38,11 +38,14 @@ Parameters
 """
 grd2xyz(cmd0::String; kwargs...) = grd2xyz_helper(cmd0, nothing; kwargs...)
 grd2xyz(arg1; kwargs...)         = grd2xyz_helper("", arg1; kwargs...)
+function grd2xyz_helper(cmd0::String, arg1; kwargs...)
+	d = init_module(false, kwargs...)[1]		# Also checks if the user wants ONLY the HELP mode
+	grd2xyz_helper(cmd0, arg1, d)
+end
 
 # ---------------------------------------------------------------------------------------------------
-function grd2xyz_helper(cmd0::String, arg1; kwargs...)
+function grd2xyz_helper(cmd0::String, arg1, d::Dict{Symbol, Any})
 
-	d = init_module(false, kwargs...)[1]		# Also checks if the user wants ONLY the HELP mode
 	cmd, = parse_common_opts(d, "", [:R :V_params :bo :d :f :h :o :s])
 	cmd  = parse_these_opts(cmd, d, [[:C :rcnumbers :row_col :rowcol], [:L :hvline], [:T :stl :STL], [:W :weight], [:Z :onecol :one_col]])
 	((val = find_in_dict(d, [:name :save])[1]) !== nothing) && (cmd *=  " > " * string(val))

src/grdcontour.jl

@@ -73,7 +73,7 @@ function grdcontour_helper(cmd0::String, arg1; first=true, kw...)
 	d, K, O = init_module(first, kw...)		# Also checks if the user wants ONLY the HELP mode
 	_grdcontour_helper(cmd0, arg1, O, K, d)
 end
-function _grdcontour_helper(cmd0::String, arg1, O::Bool, K::Bool, d::Dict)
+function _grdcontour_helper(cmd0::String, arg1, O::Bool, K::Bool, d::Dict{Symbol, Any})
 	arg2, arg3 = nothing, nothing
 	dict_auto_add!(d)					# The ternary module may send options via another channel
 

src/grdinfo.jl

@@ -47,11 +47,14 @@ To see the full documentation type: ``@? grdinfo``
 """
 grdinfo(cmd0::String; kwargs...) = grdinfo_helper(cmd0, nothing; kwargs...)
 grdinfo(arg1; kwargs...)         = grdinfo_helper("", arg1; kwargs...)
+function grdinfo_helper(cmd0::String, arg1; kwargs...)
+	d = init_module(false, kwargs...)[1]		# Also checks if the user wants ONLY the HELP mode
+	grdinfo_helper(cmd0, arg1, d)
+end
 
 # ---------------------------------------------------------------------------------------------------
-function grdinfo_helper(cmd0::String, arg1; kwargs...)::Union{GMTdataset, String}
+function grdinfo_helper(cmd0::String, arg1, d::Dict{Symbol, Any})::Union{GMTdataset, String}
 
-	d = init_module(false, kwargs...)[1]		# Also checks if the user wants ONLY the HELP mode
 	cmd, = parse_common_opts(d, "", [:R :V_params :f :o])
 	(is_in_dict(d, [:numeric], del=true) !== nothing) && (cmd *= " -Cn")
 	cmd  = parse_these_opts(cmd, d, [[:C :oneliner], [:D :tiles], [:E :extrema :extreme], [:F :report_ingeog],

src/grdlandmask.jl

@@ -42,11 +42,14 @@ To see the full documentation type: ``@? grdlandmask``
 grdlandmask(cmd0::String; kwargs...) = grdlandmask_helper(cmd0, nothing; kwargs...)
 grdlandmask(arg1::GItype; kwargs...) = grdlandmask_helper("", arg1; kwargs...)
 grdlandmask(; kwargs...)             = grdlandmask_helper("", nothing; kwargs...)
+function grdlandmask_helper(cmd0::String, arg1; kwargs...)
+	d = init_module(false, kwargs...)[1]		# Also checks if the user wants ONLY the HELP mode
+	grdlandmask_helper(cmd0, arg1, d)
+end
 
 # ---------------------------------------------------------------------------------------------------
-function grdlandmask_helper(cmd0::String, arg1; kwargs...)
+function grdlandmask_helper(cmd0::String, arg1, d::Dict{Symbol, Any})
 
-	d = init_module(false, kwargs...)[1]		# Also checks if the user wants ONLY the HELP mode
     cmd::String, prj::String = "", ""
 	if (arg1 !== nothing)
 		prj = getproj(arg1, proj4=true)

src/grdmask.jl

@@ -47,11 +47,14 @@ To see the full documentation type: ``@? grdmask``
 """
 grdmask(cmd0::String; kwargs...) = grdmask_helper(cmd0, nothing; kwargs...)
 grdmask(arg1; kwargs...)         = grdmask_helper("", arg1; kwargs...)
+function grdmask_helper(cmd0::String, arg1; kwargs...)
+	d = init_module(false, kwargs...)[1]		# Also checks if the user wants ONLY the HELP mode
+	grdmask_helper(cmd0, arg1, d)
+end
 
 # ---------------------------------------------------------------------------------------------------
-function grdmask_helper(cmd0::String, arg1; kwargs...)
+function grdmask_helper(cmd0::String, arg1, d::Dict{Symbol, Any})
 
-	d = init_module(false, kwargs...)[1]	    	# Also checks if the user wants ONLY the HELP mode
 	cmd, = parse_common_opts(d, "", [:G :RIr :V_params :a :e :f :g :j :n :yx :x :w])
 	cmd  = parse_these_opts(cmd, d, [[:A :steps :straight_lines], [:C :clober], [:N :out_edge_in], [:S :search_radius]])
 	if (cmd0 != "")

src/grdsample.jl

@@ -29,13 +29,15 @@ To see the full documentation type: ``@? grdsample``
 """
 grdsample(cmd0::String; kwargs...) = grdsample_helper(cmd0, nothing; kwargs...)
 grdsample(arg1; kwargs...)         = grdsample_helper("", arg1; kwargs...)
+function grdsample_helper(cmd0::String, arg1; kwargs...)
+	d = init_module(false, kwargs...)[1]		# Also checks if the user wants ONLY the HELP mode
+	grdsample_helper(cmd0, arg1, d)
+end
 
 # ---------------------------------------------------------------------------------------------------
-function grdsample_helper(cmd0::String, arg1; kwargs...)
+function grdsample_helper(cmd0::String, arg1, d::Dict{Symbol, Any})
 
-	d = init_module(false, kwargs...)[1]		# Also checks if the user wants ONLY the HELP mode
 	cmd, = parse_common_opts(d, "", [:G :RIr :V_params :f :n :x])
 	cmd  = parse_these_opts(cmd, d, [[:T :toggle]])
-
 	common_grd(d, cmd0, cmd, "grdsample ", arg1)		# Finish build cmd and run it
 end

src/grdtrack.jl

@@ -9,9 +9,12 @@ That is, both of this will work: ``D = grdtrack([0 0], Grid);``  or  ``D = grdtr
 
 To see the documentation, type: ``@? grdtrack``
 """
-function grdtrack(cmd0::String="", arg1=nothing, arg2=nothing; kwargs...)
-
+function grdtrack(cmd0::String, arg1=nothing, arg2=nothing; kwargs...)
 	d = init_module(false, kwargs...)[1]		# Also checks if the user wants ONLY the HELP mode
+	grdtrack_helper(cmd0, arg1, arg2, d)
+end
+
+function grdtrack_helper(cmd0::String, arg1, arg2, d::Dict{Symbol, Any})
 
 	cmd, = parse_common_opts(d, "", [:R :V_params :bi :bo :di :e :f :g :h :i :n :o :s :w :yx])
 	cmd  = parse_these_opts(cmd, d, [[:A :interp_path :resample], [:C :crossprofile :equidistant], [:D :dfile],

src/grdtrend.jl

@@ -24,9 +24,12 @@ Parameters
 
 To see the full documentation type: ``@? grdtrend``
 """
-function grdtrend(cmd0::String="", arg1=nothing, arg2=nothing; kwargs...)
-
+function grdtrend(cmd0::String, arg1=nothing, arg2=nothing; kwargs...)
 	d = init_module(false, kwargs...)[1]		# Also checks if the user wants ONLY the HELP mode
+	grdtrend_helper(cmd0, arg1, arg2, d)
+end
+
+function grdtrend_helper(cmd0::String, arg1, arg2, d::Dict{Symbol, Any})
 
 	cmd, = parse_R(d, "")
 	cmd = parse_V_params(d, cmd)

src/grdview.jl

@@ -53,7 +53,7 @@ function grdview_helper(cmd0::String, arg1; first=true, kwargs...)
 	d, K, O = init_module(first, kwargs...)			# Also checks if the user wants ONLY the HELP mode
 	invokelatest(grdview_helper, cmd0, arg1, O, K, d)
 end
-function grdview_helper(cmd0::String, arg1, O::Bool, K::Bool, d::Dict)
+function grdview_helper(cmd0::String, arg1, O::Bool, K::Bool, d::Dict{Symbol, Any})
 
 	arg2 = nothing;	arg3 = nothing;	arg4 = nothing;	arg5 = nothing;
 	first = !O