basis: Fix a couple of trivial regressions.

basis/http/http-tests.factor

@@ -52,12 +52,14 @@ blah
     ] with-string-reader
 ] unit-test
 
+<<
 CONSTANT: read-request-test-1' [[ POST /bar HTTP/1.1
 content-length: 4
 content-type: application/octet-stream
 some-header: 1; 2
 
 blah]]
+>>
 
 array[ read-request-test-1' ] [
     read-request-test-1 lf>crlf

basis/typed/typed-tests.factor

@@ -1,7 +1,7 @@
 USING: accessors compiler.units effects eval kernel kernel.private layouts
 literals math namespaces quotations tools.test typed words words.symbol
 combinators.short-circuit compiler.tree.debugger prettyprint definitions
-sequences classes.intersection strings classes.union ;
+sequences classes.intersection strings classes.union combinators.smart.syntax ;
 IN: typed.tests
 
 TYPED: f+ ( a: float b: float -- c: float )