classes.intersection: Fix typo in commented-out unit-test.

char-rename
Doug Coleman 2017-06-04 16:14:22 -05:00
parent c520a7269f
commit 477900b075
1 changed files with 1 additions and 1 deletions

View File

@ -39,7 +39,7 @@ M: t4 g drop t4 ;
PREDICATE: odd-integer < integer odd? ;
! [ TUPLE: omg { a intersection{ fixnum odd-integer } initial: 2 } ;" eval( -- ) ]
! [ "TUPLE: omg { a intersection{ fixnum odd-integer } initial: 2 } ;" eval( -- ) ]
! [ bad-initial-value? ] must-fail-with
TUPLE: omg { a intersection{ fixnum odd-integer } initial: 1 } ;