-module(gs2). -vsn(1). -behaviour(gen_server). -export([is_operation_ok/1]). -export([init/1, handle_call/3, handle_cast/2, handle_info/2, terminate/2, code_change/3]). is_operation_ok(Op) -> gen_server:call(gs2, {is_operation_ok, Op}). init([Data]) -> {ok, []}. handle_call({is_operation_ok, Op}, _From, State) -> Data = gs1:get_data(), Reply = lists2:assoc(Op, Data), {reply, Reply, State}. handle_cast(_Request, State) -> {noreply, State}. handle_info(_Info, State) -> {noreply, State}. terminate(_Reason, _State) -> ok. code_change(_OldVsn, State, _Extra) -> {ok, State}.