record 소기

3720 단어 erlangrecord
오늘 rabbitMQ 코드를 읽다가 코드가 의심스러웠습니다.

try
        log(info, "liufan the #v is ~p~n", [#v1.stats_timer]),
        run({?MODULE, recvloop,
        run({?MODULE, recvloop,
             [Deb, switch_callback(rabbit_event:init_stats_timer(
                                     State, #v1.stats_timer),
                                   handshake, 8)]}),
        log(info, "closing AMQP connection ~p (~s)~n", [self(), Name])
    catch
        Ex -> log(case Ex of
                      connection_closed_abruptly -> warning;
                      _                          -> error
                  end, "closing AMQP connection ~p (~s):~n~p~n",
                  [self(), Name, Ex])
    after

일치 못 알아보다stats_timer의 뜻은 이 필드의 기본값인 undefined인 줄 알았는데 틀렸다

init_stats_timer(C, P) ->
    {ok, StatsLevel} = application:get_env(rabbit, collect_statistics),
    {ok, Interval}   = application:get_env(rabbit, collect_statistics_interval),   
    setelement(P, C, #state{level = StatsLevel, interval = Interval,               
                            timer = undefined}).

이치대로 말하면 정수일 텐데, 마지막에는 도대체 어떻게 된 일인지 보지 못하고 테스트 함수를 하나 썼다.

-module(test).

-export([start/0]).

-record(test, {a,b=1}).

start() ->
        io:format("~p~n", [#test.b]).

생성된 abstract code는 다음과 같습니다.

{ok,{test,
        [{abstract_code,
             {raw_abstract_v1,
                 [{attribute,1,file,{"test.erl",1}},
                  {attribute,1,module,test},
                  {attribute,3,export,[{start,0}]},
                  {attribute,5,record,
                      {test,
                          [{record_field,5,{atom,5,a}},
                           {record_field,5,{atom,5,b},{integer,5,1}}]}},
                  {function,7,start,0,
                      [{clause,7,[],[],
                           [{call,8,
                                {remote,8,{atom,8,io},{atom,8,format}},
                                [{string,8,"~p~n"},
                                 {cons,8,
                                     {record_index,8,test,{atom,8,b}},
                                     {nil,8}}]}]}]},
                  {eof,9}]}}]}}

원래 색인 값입니다.
비교해 보다

-module(test1).

-export([start/0]).

-record(test, {a,b=1}).

start() ->
        Tmp = #test{},
        io:format("~p~n", [Tmp#test.b]).

생성된 것은

{ok,
 {test1,
  [{abstract_code,
    {raw_abstract_v1,
     [{attribute,1,file,{"test1.erl",1}},
      {attribute,1,module,test1},
      {attribute,3,export,[{start,0}]},
      {attribute,5,record,
       {test,
        [{record_field,5,{atom,5,a}},
         {record_field,5,{atom,5,b},{integer,5,1}}]}},
      {function,7,start,0,
       [{clause,7,[],[],
         [{match,8,{var,8,'Tmp'},{record,8,test,[]}},
          {call,9,
           {remote,9,{atom,9,io},{atom,9,format}},
           [{string,9,"~p~n"},
            {cons,9,
             {record_field,9,{var,9,'Tmp'},test,{atom,9,b}},
             {nil,9}}]}]}]},
      {eof,10}]}}]}}

그래도 근원을 찾은 것 같아요.

좋은 웹페이지 즐겨찾기