From dd38d6f6cfae7e8e47f75a405b593cfd43f8f357 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Sat, 5 Nov 2005 08:52:41 +0000 Subject: [PATCH] Factor 0.79 --- TODO.FACTOR.txt | 8 +++----- library/collections/arrays.factor | 4 ++-- library/test/collections/sequences.factor | 2 ++ 3 files changed, 7 insertions(+), 7 deletions(-) diff --git a/TODO.FACTOR.txt b/TODO.FACTOR.txt index 8999d1ce63..419eeaf4ae 100644 --- a/TODO.FACTOR.txt +++ b/TODO.FACTOR.txt @@ -1,11 +1,7 @@ -0.79: ++ ui: - fix remaining GL issues - UI issue: try resizing slider while menu is open -- 3/2 { 1 2 3 } nth -> fep - -+ ui: - - make-pane: if no input, just return pane-output - keyboard completion - get outliner working with lots of lines of output @@ -60,6 +56,8 @@ + compiler: +- inference: try changing nth and set-nth array methods to call -unsafe, + unbalanced branches error - compile interruption checks - check that set-datastack and set-callstack compile correctly in the face of optimization diff --git a/library/collections/arrays.factor b/library/collections/arrays.factor index ed82210339..ce931b7775 100644 --- a/library/collections/arrays.factor +++ b/library/collections/arrays.factor @@ -18,8 +18,8 @@ IN: arrays M: array clone (clone) ; M: array length array-capacity ; -M: array nth bounds-check array-nth ; -M: array set-nth bounds-check set-array-nth ; +M: array nth bounds-check >r >fixnum r> array-nth ; +M: array set-nth bounds-check >r >fixnum r> set-array-nth ; M: array nth-unsafe >r >fixnum r> array-nth ; M: array set-nth-unsafe >r >fixnum r> set-array-nth ; M: array resize resize-array ; diff --git a/library/test/collections/sequences.factor b/library/test/collections/sequences.factor index ef0f270bf1..e94bbfac39 100644 --- a/library/test/collections/sequences.factor +++ b/library/test/collections/sequences.factor @@ -203,3 +203,5 @@ unit-test 4 "cache-test" get [ "wrong" ] cache-nth "cache-test" get ] unit-test + +[ 1 ] [ 1/2 { 1 2 3 } nth ] unit-test -- 2.34.1