Changeset 38404 for branches/eam_branches/ohana.20150429/src/libfits/test

Timestamp:

Jun 6, 2015, 7:55:16 AM (11 years ago)

Author:

eugene

Message:

direct copy if bscale,bzero = 1,0

Location:

branches/eam_branches/ohana.20150429/src/libfits/test

Files:

• compress.sh (modified) (3 diffs)
• ricetest.c (modified) (1 diff)
• tablecomp.c (modified) (1 diff)
• zlib.c (modified) (3 diffs)

branches/eam_branches/ohana.20150429/src/libfits/test/compress.sh

@@ -330 +330 @@
  # lrnd generates rnd int between 0 and 0x7fffff (2^31 - 1 inclusive)
 
- $NPT = 1000
+ # $NPT = 1000
+ $NPT = 30
  create ni 0 $NPT -int
  set Achar  = lrnd(ni) & 0x7f
@@ -339 +340 @@
  create nf 0 $NPT
  set Ffloat = drnd(nf)*1e20
- set Fdouble = drnd(nf)*1e100
+ set Fdouble = drnd(nf)*1e50
 
  local format
@@ -346 +347 @@
  $format = BIJKED
 
+ #$fields = Ffloat
+ #$format = E
+
  write -fits test test.raw.tbl $fields -format $format
  write -fits test test.cmp.tbl $fields -format $format -compress-mode $cmpmode

branches/eam_branches/ohana.20150429/src/libfits/test/ricetest.c

@@ -16 +16 @@
   char cmpdata[NBYTE];
   char outdata[NBYTE];
+
+  // ok (1, "failure");
 
   if (1) { 

branches/eam_branches/ohana.20150429/src/libfits/test/tablecomp.c

@@ -11 +11 @@
 int main (int argc, char **argv) {
   
-  plan_tests (286);
+  plan_tests (668);
 
   diag ("libfits tablecomp.c tests");
+
+  // test_compress ("RICE_1");
+  // test_compress_fullrange ("RICE_1");
 
 # if (1)

branches/eam_branches/ohana.20150429/src/libfits/test/zlib.c

@@ -53 +53 @@
     err = deflateInit(&zdn, 5);
     // fprintf (stderr, "inp buffers cmp 0: %d => %d => %d\n", zdn.avail_in, zdn.avail_out, (int) zdn.total_out);
-    if (err != Z_OK) { fprintf (stderr, "error 1: %d vs %d\n", err, Z_OK); exit (1); }
+    if (err != Z_OK) { fprintf (stdout, "not ok: error 1: %d vs %d\n", err, Z_OK); exit (1); }
   
     err = deflate(&zdn, Z_FINISH);
     // fprintf (stderr, "out buffers cmp 1: %d => %d => %d\n", zdn.avail_in, zdn.avail_out, (int) zdn.total_out);
-    if (err != Z_STREAM_END) { fprintf (stderr, "error 2: %d vs %d\n", err, Z_STREAM_END); exit (2); }
+    if (err != Z_STREAM_END) { fprintf (stdout, "not ok: error 2: %d vs %d\n", err, Z_STREAM_END); exit (2); }
     // fprintf (stderr, "out buffers cmp 2: %d => %d => %d\n", zdn.avail_in, zdn.avail_out, (int) zdn.total_out);
 
@@ -92 +92 @@
     err = inflateInit(&zup);
     // fprintf (stderr, "out buffers unc 0: %d => %d => %d\n", zup.avail_in, zup.avail_out, (int) zup.total_out);
-    if (err != Z_OK) { fprintf (stderr, "error 1: %d vs %d\n", err, Z_OK); exit (1); }
+    if (err != Z_OK) { fprintf (stdout, "not ok: error 1: %d vs %d\n", err, Z_OK); exit (1); }
   
     err = inflate(&zup, Z_FINISH);
@@ -116 +116 @@
     }
   }
+
   return exit_status();
 }