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

interval-maps: bit of unsafe.

John Benediktsson 2013-03-07 10:46:41 -08:00
parent 5004c49ca2
commit bd115175b6
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/interval-maps/interval-maps.factor
View File

@ -52,7 +52,7 @@ PRIVATE>
check-interval-map array>> [ value ] map ; check-interval-map array>> [ value ] map ;
: <interval-map> ( specification -- map ) : <interval-map> ( specification -- map )
all-intervals [ first second ] sort-with all-intervals [ first-unsafe second-unsafe ] sort-with
>intervals ensure-disjoint interval-map boa ; >intervals ensure-disjoint interval-map boa ;
: <interval-set> ( specification -- map ) : <interval-set> ( specification -- map )