IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 8131


Ignore:
Timestamp:
Aug 4, 2006, 2:23:47 AM (20 years ago)
Author:
eugene
Message:

use SelectScalar

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Ohana/src/opihi/cmd.data/concat.c

    r7917 r8131  
    44
    55  int  i, j, Nin;
    6   char *end;
    76  double value;
    87  Vector *ivec, *ovec;
     
    1716  if ((ovec = SelectVector (argv[2], ANYVECTOR, TRUE)) == NULL) return (FALSE);
    1817
    19   /* if argv[1] is a number, use just that */
    20   value = strtod (argv[1], &end);
    21   if (end == argv[1] + strlen(argv[1])) {
     18  if (SelectScalar (argv[1], &value)) {
    2219    Nin = ovec[0].Nelements;
    2320    ovec[0].Nelements++;
    2421    REALLOCATE (ovec[0].elements, float, ovec[0].Nelements);
    25     ovec[0].elements[Nin] = atof (argv[1]);
     22    ovec[0].elements[Nin] = value;
    2623    return (TRUE);
    2724  }
Note: See TracChangeset for help on using the changeset viewer.