- Timestamp:
- May 21, 2007, 3:38:16 PM (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/kapa-mods-2007-05/Ohana/src/opihi/dvo/dbStackMath.c
r13443 r13454 1 # include " opihi.h"1 # include "dvoshell.h" 2 2 3 d voStack *dbBinary (dvoStack *V1, dvoStack *V2, char *op, float *fields, int Nfields) {3 dbStack *dbBinary (dbStack *V1, dbStack *V2, char *op, float *fields) { 4 4 5 int N; 5 6 float M1, M2; 7 dbStack *OUT; 6 8 7 9 if (V1->type == 'F') { … … 19 21 } 20 22 21 ALLOCATE (OUT, d voStack, 1);23 ALLOCATE (OUT, dbStack, 1); 22 24 OUT->type = 'T'; 23 25 … … 85 87 } 86 88 87 d voStack *dbUnary (dvoStack *V1, dvoStack *V2, char *op, float *fields, int Nfields) {89 dbStack *dbUnary (dbStack *V1, char *op, float *fields) { 88 90 91 int N; 89 92 float M1; 93 dbStack *OUT; 90 94 91 95 if (V1->type == 'F') { … … 96 100 } 97 101 98 ALLOCATE (OUT, d voStack, 1);102 ALLOCATE (OUT, dbStack, 1); 99 103 OUT->type = 'T'; 100 104 … … 133 137 if (!strcmp (op, "isnan")) { OUT->Float = isnan(M1); } 134 138 135 return ( TRUE);139 return (OUT); 136 140 }
Note:
See TracChangeset
for help on using the changeset viewer.
