| summaryrefslogtreecommitdiff | 
diff options
| -rw-r--r-- | Makefile | 2 | ||||
| -rw-r--r-- | src/db/struct/db_model.erl | 4 | ||||
| -rw-r--r-- | src/shared/io/sh_database.erl | 2 | ||||
| -rw-r--r-- | src/shared/io/sh_timed_cache.erl | 2 | ||||
| -rw-r--r-- | src/shared/sh_roll.erl (renamed from src/battlemap/game-logic/bm_roll.erl) | 2 | ||||
| -rw-r--r-- | src/shared/struct/sh_db_item.erl | 6 | ||||
| -rw-r--r-- | src/shared/struct/sh_db_query.erl | 12 | 
7 files changed, 15 insertions, 15 deletions
| @@ -99,7 +99,7 @@ else  debug_run:  	$(MAKE) debug_rebuild  	$(DIALYZER_EXEC) --check_plt --plt $(DIALYZER_PLT_FILE) -	$(DIALYZER_EXEC) --get_warnings $(ERL_SRC_FILES) \\ +	$(DIALYZER_EXEC) --get_warnings $(ERL_SRC_FILES) \  		--src --plt $(DIALYZER_PLT_FILE)  endif diff --git a/src/db/struct/db_model.erl b/src/db/struct/db_model.erl index 1b21629..8097bcb 100644 --- a/src/db/struct/db_model.erl +++ b/src/db/struct/db_model.erl @@ -60,8 +60,8 @@ start (Model) ->     (        DBName,        [ -         {record_name, db_item:get_record_name()}, -         {attributes, db_item:get_record_info()}, +         {record_name, sh_db_item:get_record_name()}, +         {attributes, sh_db_item:get_record_info()},           {disc_copies, [node()|Neighbors]},           {disc_only_copies, []},           {ram_copies, []}, diff --git a/src/shared/io/sh_database.erl b/src/shared/io/sh_database.erl index a65b784..5fa791f 100644 --- a/src/shared/io/sh_database.erl +++ b/src/shared/io/sh_database.erl @@ -130,7 +130,7 @@ fetch (DB, ObjectID) ->     io:format("~ndb_shim:fetch(~p) -> ~p.~n", [{DB, ObjectID}, Reply]),     Reply. --spec commit (db_query:type()) -> 'ok'. +-spec commit (sh_db_query:type()) -> 'ok'.  commit (Query) ->     {atomic, ok} = rpc:call(get_db_node(), storage_access, query, [Query]),     io:format("~ndb_shim:commit(~p) -> ok.~n", [Query]), diff --git a/src/shared/io/sh_timed_cache.erl b/src/shared/io/sh_timed_cache.erl index de2f409..6f3d973 100644 --- a/src/shared/io/sh_timed_cache.erl +++ b/src/shared/io/sh_timed_cache.erl @@ -37,7 +37,7 @@  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%  -spec add_to_cache (atom(), any(), any()) -> any().  add_to_cache (DB, Owner, ObjectID) -> -   {ok, TimerPID} = sh_gen_server:start(?MODULE, {DB, {Owner, ObjectID}}, []), +   {ok, TimerPID} = gen_server:start(?MODULE, {DB, {Owner, ObjectID}}, []),     {ok, Data} = sh_database:fetch(DB, ObjectID),     ets:insert(DB, {{Owner, ObjectID}, TimerPID, Data}),     Data. diff --git a/src/battlemap/game-logic/bm_roll.erl b/src/shared/sh_roll.erl index be1cb9d..f2212b1 100644 --- a/src/battlemap/game-logic/bm_roll.erl +++ b/src/shared/sh_roll.erl @@ -1,4 +1,4 @@ --module(bm_roll). +-module(sh_roll).  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%  %% TYPES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% diff --git a/src/shared/struct/sh_db_item.erl b/src/shared/struct/sh_db_item.erl index 98a1cb4..3692a88 100644 --- a/src/shared/struct/sh_db_item.erl +++ b/src/shared/struct/sh_db_item.erl @@ -47,7 +47,7 @@  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%  %% EXPORTED FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% --spec new (any(), db_user:permission(), any()) -> type(). +-spec new (any(), sh_db_user:permission(), any()) -> type().  new (ID, Permission, Value) ->     #db_item     { @@ -59,13 +59,13 @@ new (ID, Permission, Value) ->  -spec get_id (type()) -> any().  get_id (#db_item { id = Result }) -> Result. --spec get_permission (type()) -> db_user:permission(). +-spec get_permission (type()) -> sh_db_user:permission().  get_permission (#db_item { perm = Result }) -> Result.  -spec get_value (type()) -> any().  get_value (#db_item { val = Result }) -> Result. --spec set_permission (db_user:permission(), type()) -> type(). +-spec set_permission (sh_db_user:permission(), type()) -> type().  set_permission (Perm, Item) -> Item#db_item{ perm = Perm }.  -spec set_value (any(), type()) -> type(). diff --git a/src/shared/struct/sh_db_query.erl b/src/shared/struct/sh_db_query.erl index 4eb50ba..47d85d6 100644 --- a/src/shared/struct/sh_db_query.erl +++ b/src/shared/struct/sh_db_query.erl @@ -54,7 +54,7 @@     {        db :: atom(),        id :: any(), -      user :: db_user:user(), +      user :: sh_db_user:user(),        ops :: list(db_query_master_op())     }  ). @@ -76,7 +76,7 @@     [        new/4,        set_field/2, -      add_to_field/2, +      add_to_field/3,        update_indexed/3     ]  ). @@ -148,7 +148,7 @@ apply_op_to (Op, Elem) when is_record(Op, update_indexed) ->  apply_master_op_to (MOp, Elem) when is_record(MOp, set_perm) ->     NewPerm = MOp#set_perm.perm, -   sh_db_item:set_perm(NewPerm, Elem); +   sh_db_item:set_permission(NewPerm, Elem);  apply_master_op_to (MOp, Elem) when is_record(MOp, set_val) ->     NewVal = MOp#set_val.val, @@ -176,9 +176,9 @@ new (DBName, ObjectID, User, Ops) ->  set_field (Field, Value) ->     #set_field { field = Field, value = Value }. --spec add_to_field (non_neg_integer(), list(any())) -> op(). -add_to_field (Field, Values) -> -   #add_to_field { field = Field, values = Values }. +-spec add_to_field (non_neg_integer(), list(any()), boolean()) -> op(). +add_to_field (Field, Values, IsPrefix) -> +   #add_to_field { field = Field, values = Values, head = IsPrefix}.  -spec update_indexed     ( | 


