seriyps

%% Single-roundtrip version of epgsql:equery/3
%%
%% It does parse-bind-execute sequence in 1 network roundtrip.
%% The cost is that user should manually provide the datatype information for
%% each bind-parameter.
%% Another potential problem is that connection will crash if epgsql does not
%% have a codec for any of result columns. Explicit type casting may save you
%% in this case: `SELECT my_enum::text FROM my_tab'. Or you can implement the
%% codec you need.
%%

seriyps

%% @doc Hepers to format common erlang constructs (records, stacktraces) in a more human-readable way
%% Inspired heavily by https://github.com/erlang-lager/lager
-module(log_format).
-export([record/2, f_record/2]).
-export([records/2, f_records/2]).
-export([stack/1, f_stack/1]).

%% @doc Converts record to a string using `#record{}', not `{tuple}' syntax
%%
%% `record(#my_record{a = 1, b = qwerty}, record_info(fields, my_record))'

seriyps

%% Version of epgsql:equery/3 that uses named statements and caches them in process dictionary
%%
%% Algorithm pseudocode is:
%% <pre>
%% stmt = cache_get(name)
%% if not stmt:
%%    stmt = parse_and_describe(name, sql)  # network roundtrip
%%    cache_put(name, stmt)
%% return bind_and_execute(stmt, params)    # network roundtrip
%% </pre>

seriyps

$ rebar3 dialyzer                                                                                                                                                                    [15:33:30]
===> Verifying dependencies...
===> Compiling mylib
===> Dialyzer starting, this may take a while...
===> Updating plt...
===> Resolving files...
===> Checking 202 files in "sandbox/mylib/_build/default/rebar3_23.0_plt"...
===> Doing success typing analysis...
===> Resolving files...
===> Analyzing 2 files with "sandbox/mylib/_build/default/rebar3_23.0_plt"...

seriyps

-module(proper_json).

-export([json/0, json/1]).

json() ->
  ?SIZED(Size, json(Size)).


json(0) ->
  j_literal();

seriyps

%%% @author sergey <me@seriyps.ru>
%%% @copyright (C) 2018, sergey
%%% @doc
%%% Given a liast of resources M and list of users N, N > M;
%%% Any resourse might be acquired by one or more users (by request from user).
%%% There is no bound on how many users can acquire single resource.
%%% User may release resource at any time.
%%% User must get resource that is used by least amount of other users.
%%% @end
%%% Created :  8 Oct 2018 by sergey <me@seriyps.ru>

seriyps

%% Prints source code of a function.
%%
%% Requires debug_info
%% Will not work for modules mocked by meck
%%
%% > io:format("~s~n", [rf:print_function(dict, new, 0)]).
%% new() ->
%%     Empty = mk_seg(16),
%%     #dict{empty = Empty, segs = {Empty}}.

seriyps

is_exported(M, F, A) ->
    %% make a cheap test first to avoid unnecessary calls to code server
    case erlang:module_loaded(M) of
        false -> code:ensure_loaded(M);
        true -> ok
    end,
    erlang:function_exported(M, F, A).

seriyps

# -*- coding: utf-8 -*-
'''
Created on 2012-10-07

@author: Sergey <me@seriyps.ru>

Альтернативный вариант решения из статьи http://habrahabr.ru/post/153595/
на базе модификации AST

@asynchronous

seriyps

%%% @author Sergey Prokhorov <me@seriyps.ru>
%%% @copyright (C) 2013, Sergey Prokhorov
%%% @doc
%%% Simple gettext .mo file format parser for Erlang.
%%% 
%%% Produce [{KeyPlurals::[binary()], TransPlurals::[binary()]}] orddict as
%%% output.
%%% Eg, for .po file (converted to .mo)
%%% <pre>
%%% msgid "Download"