File tree 2 files changed +7
-1
lines changed
2 files changed +7
-1
lines changed Original file line number Diff line number Diff line change @@ -158,7 +158,7 @@ static void No_Nones_Or_Logic(REBVAL *arg) {
158
158
}
159
159
if (IS_TYPESET (target )) {
160
160
if (TYPE_CHECK (target , VAL_TYPE (value ))) return index ;
161
- if (IS_DATATYPE (value ) && TYPE_CHECK (target , VAL_DATATYPE (value ))) return index ;
161
+ // if (IS_DATATYPE(value) && TYPE_CHECK(target, VAL_DATATYPE(value))) return index; //@@ issues/256
162
162
if (IS_TYPESET (value ) && EQUAL_TYPESET (value , target )) return index ;
163
163
}
164
164
if (flags & AM_FIND_MATCH ) break ;
Original file line number Diff line number Diff line change @@ -25,6 +25,12 @@ Rebol [
25
25
--test-- "find datatype!"
26
26
;@@ https://github.com/Oldes/Rebol-issues/issues/256
27
27
--assert found? find [#[datatype! string! ] #[datatype! binary! ]] #[datatype! binary! ]
28
+ --assert found? find reduce [string! binary! ] binary!
29
+ --assert found? find [#[datatype! string! ] #[datatype! binary! ]] #[datatype! binary! ]
30
+ --assert found? find ["test" ] string!
31
+ --assert found? find ["test" ] series!
32
+ --assert none? find reduce [integer! binary! ] series!
33
+ --assert ["aha" ] = find reduce [integer! "aha" ] series!
28
34
29
35
===end-group===
30
36
You can’t perform that action at this time.
0 commit comments