~ubuntu-branches/ubuntu/raring/wcstools/raring

« back to all changes in this revision

Viewing changes to libwcs/binread.c

  • Committer: Package Import Robot
  • Author(s): Ole Streicher
  • Date: 2012-06-04 08:30:00 UTC
  • mto: This revision was merged to the branch mainline in revision 4.
  • Revision ID: package-import@ubuntu.com-20120604083000-28rvf30j9qlgxk8d
Tags: upstream-3.8.5
ImportĀ upstreamĀ versionĀ 3.8.5

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
/*** File libwcs/binread.c
2
 
 *** September 25, 2009
 
2
 *** September 16, 2011
3
3
 *** By Doug Mink, dmink@cfa.harvard.edu
4
4
 *** Harvard-Smithsonian Center for Astrophysics
5
 
 *** Copyright (C) 1998-2009
 
5
 *** Copyright (C) 1998-2011
6
6
 *** Smithsonian Astrophysical Observatory, Cambridge, MA, USA
7
7
 
8
8
    This library is free software; you can redistribute it and/or
44
44
static double *tdist;   /* Array of distances to sources from search center */
45
45
static int ndist = 0;
46
46
 
 
47
#include <stdlib.h>
47
48
#include <unistd.h>
48
 
#include <stdlib.h>
49
49
#include <stdio.h>
 
50
#include <fcntl.h>
 
51
#include <sys/file.h>
50
52
#include <math.h>
 
53
#include <errno.h>
51
54
#include <string.h>
52
 
#include <strings.h>
53
55
#include <sys/types.h>
54
 
#include <fcntl.h>
55
56
#include "wcs.h"
56
57
#include "fitsfile.h"
57
58
#include "wcscat.h"
1312
1313
            st->num = (double) st->xno;
1313
1314
            break;
1314
1315
        case 2:
1315
 
            bcopy ((char *)&st->xno, (char *) &ino, 4);
 
1316
            memcpy ((char *) &ino, (char *)&st->xno, 4);
1316
1317
            st->num = 0.0001 * (double) ino;
1317
1318
            break;
1318
1319
        case 3:
1319
 
            bcopy ((char *)&st->xno, (char *) &ino, 4);
 
1320
            memcpy ((char *) &ino, (char *)&st->xno, 4);
1320
1321
            st->num = 0.00001 * (double) ino;
1321
1322
            break;
1322
1323
        case 4:
1323
 
            bcopy ((char *)&st->xno, (char *) &ino, 4);
 
1324
            memcpy ((char *) &ino, (char *)&st->xno, 4);
1324
1325
            st->num = (double) ino;
1325
1326
            break;
1326
1327
        default:
1595
1596
 * Nov 28 2007  Move moveb() to catutil.c
1596
1597
 *
1597
1598
 * Sep 25 2009  Call movebuff() instead of moveb() and move mvebuff() to catutil.c
 
1599
 *
 
1600
 * Sep 16 2011  Change depricated bcopy() to memcpy()
1598
1601
 */