blob: d7e774c113edbe53439fe64bbe713ef22aa75bf5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
-module (binary_native).
-export ([int_to_u32/1, int_from_u32/1]).
int_to_u32(I) when 0 =< I, I < 4294967296 ->
{ok, <<I:32>>};
int_to_u32(_) ->
{error, nil}.
int_from_u32(<<I:32>>) ->
{ok, I};
int_from_u32(_) ->
{error, nil}.
|
