basis: Fix a couple of trivial regressions.
parent
0a7b50f208
commit
122a73b5ac
|
@ -52,12 +52,14 @@ blah
|
||||||
] with-string-reader
|
] with-string-reader
|
||||||
] unit-test
|
] unit-test
|
||||||
|
|
||||||
|
<<
|
||||||
CONSTANT: read-request-test-1' [[ POST /bar HTTP/1.1
|
CONSTANT: read-request-test-1' [[ POST /bar HTTP/1.1
|
||||||
content-length: 4
|
content-length: 4
|
||||||
content-type: application/octet-stream
|
content-type: application/octet-stream
|
||||||
some-header: 1; 2
|
some-header: 1; 2
|
||||||
|
|
||||||
blah]]
|
blah]]
|
||||||
|
>>
|
||||||
|
|
||||||
array[ read-request-test-1' ] [
|
array[ read-request-test-1' ] [
|
||||||
read-request-test-1 lf>crlf
|
read-request-test-1 lf>crlf
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
USING: accessors compiler.units effects eval kernel kernel.private layouts
|
USING: accessors compiler.units effects eval kernel kernel.private layouts
|
||||||
literals math namespaces quotations tools.test typed words words.symbol
|
literals math namespaces quotations tools.test typed words words.symbol
|
||||||
combinators.short-circuit compiler.tree.debugger prettyprint definitions
|
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
|
IN: typed.tests
|
||||||
|
|
||||||
TYPED: f+ ( a: float b: float -- c: float )
|
TYPED: f+ ( a: float b: float -- c: float )
|
||||||
|
|
Loading…
Reference in New Issue