steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

sequences: Add assert-string=. 

assert-sequence= prints strings as sequences of numbers, which is less
useful for writing unit tests.
modern-harvey2
Doug Coleman 2017-09-16 16:45:42 -05:00
parent f32b6a171c
commit 3c8da3722d
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
core/sequences/sequences.factor
View File

@ -694,6 +694,11 @@ ERROR: assert-sequence got expected ;
: assert-sequence= ( a b -- ) : assert-sequence= ( a b -- )
2dup sequence= [ 2drop ] [ assert-sequence ] if ; 2dup sequence= [ 2drop ] [ assert-sequence ] if ;
ERROR: assert-string got expected ;
: assert-string= ( a b -- )
2dup sequence= [ 2drop ] [ assert-string ] if ;
<PRIVATE <PRIVATE
: sequence-hashcode-step ( oldhash newpart -- newhash ) : sequence-hashcode-step ( oldhash newpart -- newhash )