ft: 代码修改

include/eTpf.hrl

@@ -13,7 +13,7 @@
    , tcmNestStruct => 6
 }).
 
--define(defPoolId, defPoolId).
+-define(eTpfPoolId, eTpfPoolId).
 
 %% 类型声明
 -export_type([input/0, userInput/0, traceOpts/0, tracerOpts/0]).

src/eTpf.erl

@@ -34,7 +34,7 @@ do_trace(InputList, TracerMod, TracerOpts, TraceOpts) ->
    _ = application:ensure_all_started(eTpf),
 
    %% Start the pool of tracer processes.
-   PoolID = maps:get(poolId, TraceOpts, ?defPoolId),
+   PoolID = maps:get(poolId, TraceOpts, ?eTpfPoolId),
    PoolSize = maps:get(poolSize, TraceOpts, erlang:system_info(schedulers)),
    true = PoolSize > 0,
    {ok, PoolPid} = supervisor:start_child(eTpf_sup, #{
@@ -110,7 +110,7 @@ traceInput([Mod | Tail], TracerState, Opts) when is_atom(Mod) ->
    traceInput(Tail, TracerState, Opts).
 
 stop() ->
-   stop(?defPoolId).
+   stop(?eTpfPoolId).
 
 %% @todo Confirm that we don't need to stop tracing,
 %% that just terminating the tracers is enough. The