diff options
author | Eric <[email protected]> | 2013-05-09 17:04:18 -0700 |
---|---|---|
committer | Eric <[email protected]> | 2013-05-09 17:04:18 -0700 |
commit | efbdfbe117939cd50d0252a210b9b7634de42bb4 (patch) | |
tree | 74b0bad39d3a5b25bd4199728c16c0b1a4ade703 /src/rcl_goal.peg | |
parent | 0d5a803a28010cc956948b614408b9d38997e9a1 (diff) | |
download | relx-efbdfbe117939cd50d0252a210b9b7634de42bb4.tar.gz relx-efbdfbe117939cd50d0252a210b9b7634de42bb4.tar.bz2 relx-efbdfbe117939cd50d0252a210b9b7634de42bb4.zip |
Basic file rename from rcl to rlx
Diffstat (limited to 'src/rcl_goal.peg')
-rw-r--r-- | src/rcl_goal.peg | 55 |
1 files changed, 0 insertions, 55 deletions
diff --git a/src/rcl_goal.peg b/src/rcl_goal.peg deleted file mode 100644 index bfac607..0000000 --- a/src/rcl_goal.peg +++ /dev/null @@ -1,55 +0,0 @@ - -constraint <- ws? app_name ws? between_op ws? version ws? "," ws? version ws? !. - / ws? app_name ws? constraint_op ws? version ws? !. - / ws? app_name ws? !. - - ` - case Node of - [_,AppName,_, _] -> - {ok, AppName}; - [_,AppName,_,Op,_,Vsn,_, _] -> - {ok, - {AppName, - rcl_goal_utils:to_vsn(Vsn), - rcl_goal_utils:to_op(Op)}}; - [_,AppName,_,Op,_,Vsn1,_,_,_,Vsn2,_,_] -> - {ok, - {AppName, - rcl_goal_utils:to_vsn(Vsn1), - rcl_goal_utils:to_vsn(Vsn2), - rcl_goal_utils:to_op(Op)}}; - _ -> - io:format("~p~n", [Node]) - end - ` ; - -ws <- [ \t\n\s\r] ; - -app_name <- [a-zA-Z0-9_]+ - ` erlang:list_to_atom(erlang:binary_to_list(erlang:iolist_to_binary(Node))) ` ; - -between_op <- - ":" ws? ( "btwn" / "between" ) ws? ":" - ` case Node of - [C,_,Op,_,C] -> erlang:iolist_to_binary([C,Op,C]); - _ -> Node - end - ` ; - -constraint_op <- "=" / "-" / "<=" / "<" / "~>" / ">=" / ">" / word_constraint_op / ":" ; - -word_constraint_op <- - ":" ws? ( "gte" / "lte" / "gt" / "lt" / "pes" ) ws? ":" - ` case Node of - [C,_,Op,_,C] -> erlang:iolist_to_binary([C,Op,C]); - _ -> Node - end - ` ; - - -version <- [0-9a-zA-Z-+.]+ ; - -%% This only exists to get around a bug in erlang where if -%% warnings_as_errors is specified `nowarn` directives are ignored - - `-compile(export_all).`
\ No newline at end of file |