umgeher/qdate
0
Fork 0
Code Issues Pull requests Releases Activity

Add before and after as operators

Browse source
This commit is contained in:
Jesse Gumm 2016-03-05 13:51:45 -06:00
parent f39b4edb92
commit 5e43673c34
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/qdate.erl
View file

@ -403,10 +403,12 @@ compare(A, Op, B) ->
'=/=' -> Comp =/= 0; '=/=' -> Comp =/= 0;
'/=' -> Comp =/= 0; '/=' -> Comp =/= 0;
'before'-> Comp =:= -1;
'<' -> Comp =:= -1; '<' -> Comp =:= -1;
'<=' -> Comp =:= -1 orelse Comp =:= 0; '<=' -> Comp =:= -1 orelse Comp =:= 0;
'=<' -> Comp =:= -1 orelse Comp =:= 0; '=<' -> Comp =:= -1 orelse Comp =:= 0;
'after' -> Comp =:= 1;
'>' -> Comp =:= 1; '>' -> Comp =:= 1;
'>=' -> Comp =:= 1 orelse Comp =:= 0; '>=' -> Comp =:= 1 orelse Comp =:= 0;
'=>' -> Comp =:= 1 orelse Comp =:= 0 '=>' -> Comp =:= 1 orelse Comp =:= 0