Merge branch 'feature/17' into develop
This commit is contained in:
commit
86ccdfa4be
|
@ -378,13 +378,13 @@ void collect_meta( struct cons_pointer stream, char *url ) {
|
|||
meta =
|
||||
add_meta_integer( meta, L"size",
|
||||
( intmax_t ) statbuf.st_size );
|
||||
|
||||
/*
|
||||
meta = add_meta_time( meta, L"modified", &statbuf.st_mtime );
|
||||
*/
|
||||
}
|
||||
break;
|
||||
case CFTYPE_CURL:
|
||||
curl_easy_setopt( s->handle.curl, CURLOPT_VERBOSE, 1L );
|
||||
curl_easy_setopt( s->handle.curl, CURLOPT_HEADER, 1L );
|
||||
curl_easy_setopt( s->handle.curl, CURLOPT_HEADERFUNCTION,
|
||||
write_meta_callback );
|
||||
curl_easy_setopt( s->handle.curl, CURLOPT_HEADERDATA, stream );
|
||||
|
|
|
@ -1,29 +0,0 @@
|
|||
#!/bin/bash
|
||||
|
||||
# Not really a unit test, but a check to see where bignum addition breaks
|
||||
|
||||
broken=0
|
||||
i=11529215046068469750
|
||||
# we've already proven we can successfullu get up to here
|
||||
increment=1
|
||||
|
||||
while [ $broken -eq "0" ]
|
||||
do
|
||||
expr="(+ $i $increment)"
|
||||
# Use sbcl as our reference implementation...
|
||||
expected=`echo "$expr" | sbcl --noinform | grep -v '*'`
|
||||
actual=`echo "$expr" | target/psse | tail -1 | sed 's/\,//g'`
|
||||
|
||||
echo -n "adding $increment to $i: "
|
||||
|
||||
if [ "${expected}" = "${actual}" ]
|
||||
then
|
||||
echo "OK"
|
||||
else
|
||||
echo "Fail: expected '${expected}', got '${actual}'"
|
||||
broken=1
|
||||
exit 1
|
||||
fi
|
||||
|
||||
i=$expected
|
||||
done
|
Loading…
Reference in a new issue