Current section

Files

Jump to
squirrel src squirrel.erl
Raw

src/squirrel.erl

-module(squirrel).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
-export([main/0]).
-spec main() -> nil.
main() ->
_assert_subject = begin
_pipe = <<"<path-to-sql-file>"/utf8>>,
squirrel@internal@query:from_file(_pipe)
end,
{ok, Queries} = case _assert_subject of
{ok, _} -> _assert_subject;
_assert_fail ->
erlang:error(#{gleam_error => let_assert,
message => <<"Assertion pattern match failed"/utf8>>,
value => _assert_fail,
module => <<"squirrel"/utf8>>,
function => <<"main"/utf8>>,
line => 9})
end,
_assert_subject@1 = squirrel@internal@database@postgres:main(Queries),
{ok, Queries@1} = case _assert_subject@1 of
{ok, _} -> _assert_subject@1;
_assert_fail@1 ->
erlang:error(#{gleam_error => let_assert,
message => <<"Assertion pattern match failed"/utf8>>,
value => _assert_fail@1,
module => <<"squirrel"/utf8>>,
function => <<"main"/utf8>>,
line => 13})
end,
gleam@list:each(
Queries@1,
fun(Query) ->
simplifile:append(
<<"<output-file>"/utf8>>,
<<(squirrel@internal@query:to_function(Query))/binary,
"\n\n"/utf8>>
)
end
).