-module(crash).

-export([init/0, create/0, test/0]).

-define(NODES, [node()]).

-record(serials, {k, v}).
-record(serial,  {k, v}).

init() ->
    mnesia:create_schema(?NODES),
    halt().

create() ->
    mnesia:start(),
    mnesia:create_table(?RECORD, [{attributes, record_info(fields, ?RECORD)},
				  {disc_copies, ?NODES}]),
    halt().

test() ->
    mnesia:start(),
    mnesia:info(),
    mnesia:stop(),
    halt().
