Merge branch 'expose-to_upper' of git://github.com/dvv/cowboy

src/cowboy_bstr.erl

@@ -18,6 +18,7 @@
 %% Binary strings.
 -export([capitalize_token/1]).
 -export([to_lower/1]).
+-export([to_upper/1]).
 
 %% Characters.
 -export([char_to_lower/1]).
@@ -51,6 +52,11 @@ capitalize_token(<< C, Rest/bits >>, false, Acc) ->
 to_lower(B) ->
 	<< << (char_to_lower(C)) >> || << C >> <= B >>.
 
+%% @doc Convert a binary string to uppercase.
+-spec to_upper(B) -> B when B::binary().
+to_upper(B) ->
+	<< << (char_to_upper(C)) >> || << C >> <= B >>.
+
 %% @doc Convert [A-Z] characters to lowercase.
 %% @end
 %% We gain noticeable speed by matching each value directly.