Skip to content

Commit

Permalink
FIX: code refactoring
Browse files Browse the repository at this point in the history
  • Loading branch information
Oldes committed Feb 5, 2020
1 parent 62af92f commit e81fb8c
Showing 1 changed file with 6 additions and 6 deletions.
12 changes: 6 additions & 6 deletions src/core/t-vector.c
Original file line number Diff line number Diff line change
Expand Up @@ -586,15 +586,15 @@ void Set_Vector_Row(REBSER *ser, REBVAL *blk)
/*
***********************************************************************/
{
REBINT num;

if (mode == 3)
return VAL_SERIES(a) == VAL_SERIES(b) && VAL_INDEX(a) == VAL_INDEX(b);

REBINT n = Compare_Vector(a, b); // needs to be expanded for equality
if (mode >= 0) {
return n == 0;
}
if (mode == -1) return n >= 0;
return n > 0;
num = Compare_Vector(a, b);
if (mode >= 0) return (num == 0);
if (mode == -1) return (num >= 0);
return (num > 0);
}


Expand Down

0 comments on commit e81fb8c

Please sign in to comment.