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

Fix regression

db4
Slava Pestov 2008-02-10 01:34:26 -06:00
parent ce1602bc2c
commit 765f9bfb43
2 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
core/inference/backend/backend.factor
View File

@ -370,6 +370,7 @@ TUPLE: effect-error word effect ;
init-inference init-inference
dependencies off dependencies off
dup word-def over dup infer-quot-recursive dup word-def over dup infer-quot-recursive
end-infer
finish-word finish-word
current-effect current-effect
] with-scope ] with-scope

5
core/inference/inference-tests.factor
View File

@ -537,3 +537,8 @@ TUPLE: custom-error ;
! This was a false trigger of the undecidable quotation ! This was a false trigger of the undecidable quotation
! recursion bug ! recursion bug
{ 2 1 } [ find-last-sep ] must-infer-as { 2 1 } [ find-last-sep ] must-infer-as
! Regression
: missing->r-check >r ;
[ [ missing->r-check ] infer ] must-fail