diff --git a/src/io/io.c b/src/io/io.c index 7e6a3c0..e9990e9 100644 --- a/src/io/io.c +++ b/src/io/io.c @@ -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 ); diff --git a/where-does-it-break.sh b/where-does-it-break.sh deleted file mode 100755 index 4d70041..0000000 --- a/where-does-it-break.sh +++ /dev/null @@ -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