summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/shared/struct/shr_portrait.erl.m469
1 files changed, 69 insertions, 0 deletions
diff --git a/src/shared/struct/shr_portrait.erl.m4 b/src/shared/struct/shr_portrait.erl.m4
new file mode 100644
index 0000000..2ea3ca0
--- /dev/null
+++ b/src/shared/struct/shr_portrait.erl.m4
@@ -0,0 +1,69 @@
+-module(shr_portrait).
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% TYPES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+-type id() :: binary().
+
+-record
+(
+ portrait,
+ {
+ id :: id(),
+ name :: binary(),
+ body_id :: binary(),
+ icon_id :: binary()
+ }
+).
+
+-opaque type() :: #portrait{}.
+
+-export_type([type/0, id/0]).
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% EXPORTS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%% Accessors
+-export
+(
+ [
+ get_id/1,
+ get_name/1,
+ get_body_id/1,
+ get_icon_id/1
+ ]
+).
+
+-export
+(
+ [
+ from_id/1
+ ]
+).
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% LOCAL FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% EXPORTED FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%% Accessors
+-spec get_id (type()) -> id().
+get_id (Pt) -> Pt#portrait.id.
+
+-spec get_name (type()) -> binary().
+get_name (Pt) -> Pt#portrait.name.
+
+-spec get_body_id (type()) -> binary().
+get_body_id (Pt) -> Pt#portrait.body_id.
+
+-spec get_icon_id (type()) -> binary().
+get_icon_id (Pt) -> Pt#portrait.icon_id.
+
+-spec from_id (id()) -> type().
+m4_include(__MAKEFILE_DATA_DIR/portrait/global.m4.conf)m4_dnl
+m4_include(__MAKEFILE_DATA_DIR/portrait/basic.m4d)m4_dnl
+from_id(_) ->
+ from_id(0).