Changeset 11697
- Timestamp:
- Feb 7, 2007, 4:42:46 PM (19 years ago)
- Location:
- trunk/psLib/src/mathtypes
- Files:
-
- 4 edited
-
psScalar.c (modified) (4 diffs)
-
psScalar.h (modified) (3 diffs)
-
psVector.c (modified) (1 diff)
-
psVector.h (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/psLib/src/mathtypes/psScalar.c
r10999 r11697 8 8 * @author Ross Harman, MHPCC 9 9 * 10 * @version $Revision: 1.2 6$ $Name: not supported by cvs2svn $11 * @date $Date: 2007-0 1-09 22:38:53$10 * @version $Revision: 1.27 $ $Name: not supported by cvs2svn $ 11 * @date $Date: 2007-02-08 02:42:46 $ 12 12 * 13 13 * Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii … … 31 31 } 32 32 33 psScalar* psScalarAlloc(double complex value, psElemType type) 33 psScalar* p_psScalarAlloc(const char *file, 34 unsigned int lineno, 35 const char *func, 36 double complex value, 37 psElemType type) 34 38 { 35 39 psScalar* scalar = NULL; 36 40 37 41 // Create scalar 38 scalar = (psScalar* ) p sAlloc(sizeof(psScalar));42 scalar = (psScalar* ) p_psAlloc(file, lineno, func, sizeof(psScalar)); 39 43 psMemSetDeallocator(scalar, (psFreeFunc)scalarFree); 40 44 scalar->type.dimen = PS_DIMEN_SCALAR; … … 98 102 99 103 100 psScalar* psScalarCopy(const psScalar *value) 104 psScalar* p_psScalarCopy(const char *file, 105 unsigned int lineno, 106 const char *func, 107 const psScalar *value) 101 108 { 102 109 psElemType dataType; … … 112 119 switch (dataType) { 113 120 case PS_TYPE_S8: 114 newScalar = p sScalarAlloc(value->data.S8, dataType);121 newScalar = p_psScalarAlloc(file, lineno, func, value->data.S8, dataType); 115 122 break; 116 123 case PS_TYPE_U8: 117 newScalar = p sScalarAlloc(value->data.U8, dataType);124 newScalar = p_psScalarAlloc(file, lineno, func, value->data.U8, dataType); 118 125 break; 119 126 case PS_TYPE_S16: 120 newScalar = p sScalarAlloc(value->data.S16, dataType);127 newScalar = p_psScalarAlloc(file, lineno, func, value->data.S16, dataType); 121 128 break; 122 129 case PS_TYPE_U16: 123 newScalar = p sScalarAlloc(value->data.U16, dataType);130 newScalar = p_psScalarAlloc(file, lineno, func, value->data.U16, dataType); 124 131 break; 125 132 case PS_TYPE_S32: 126 newScalar = p sScalarAlloc(value->data.S32, dataType);133 newScalar = p_psScalarAlloc(file, lineno, func, value->data.S32, dataType); 127 134 break; 128 135 case PS_TYPE_U32: 129 newScalar = p sScalarAlloc(value->data.U32, dataType);136 newScalar = p_psScalarAlloc(file, lineno, func, value->data.U32, dataType); 130 137 break; 131 138 case PS_TYPE_S64: 132 newScalar = p sScalarAlloc(value->data.S64, dataType);139 newScalar = p_psScalarAlloc(file, lineno, func, value->data.S64, dataType); 133 140 break; 134 141 case PS_TYPE_U64: 135 newScalar = p sScalarAlloc(value->data.U64, dataType);142 newScalar = p_psScalarAlloc(file, lineno, func, value->data.U64, dataType); 136 143 break; 137 144 case PS_TYPE_F32: 138 newScalar = p sScalarAlloc(value->data.F32, dataType);145 newScalar = p_psScalarAlloc(file, lineno, func, value->data.F32, dataType); 139 146 break; 140 147 case PS_TYPE_F64: 141 newScalar = p sScalarAlloc(value->data.F64, dataType);148 newScalar = p_psScalarAlloc(file, lineno, func, value->data.F64, dataType); 142 149 break; 143 150 case PS_TYPE_C32: 144 newScalar = p sScalarAlloc(value->data.C32, dataType);151 newScalar = p_psScalarAlloc(file, lineno, func, value->data.C32, dataType); 145 152 break; 146 153 case PS_TYPE_C64: 147 newScalar = p sScalarAlloc(value->data.C64, dataType);154 newScalar = p_psScalarAlloc(file, lineno, func, value->data.C64, dataType); 148 155 break; 149 156 default: -
trunk/psLib/src/mathtypes/psScalar.h
r11248 r11697 6 6 * 7 7 * @author Ross Harman, MHPCC 8 * @author Joshua Hoblitt, University of Hawaii 8 9 * 9 * @version $Revision: 1.2 1$ $Name: not supported by cvs2svn $10 * @date $Date: 2007-0 1-23 22:47:23$10 * @version $Revision: 1.22 $ $Name: not supported by cvs2svn $ 11 * @date $Date: 2007-02-08 02:42:46 $ 11 12 * Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii 12 13 */ … … 60 61 * @return psScalar* Pointer to a new psScalar. 61 62 */ 63 #ifdef DOXYGEN 62 64 psScalar* psScalarAlloc( 63 double complex value, ///< Data to be put into psScalar.64 psElemType type ///< Type of data to be held by psScalar.65 double complex value, ///< Data to be put into psScalar 66 psElemType type ///< Type of data to be held by psScalar 65 67 ); 68 #else // ifdef DOXYGEN 69 psScalar* p_psScalarAlloc( 70 const char *file, ///< File of caller 71 unsigned int lineno, ///< Line number of caller 72 const char *func, ///< Function name of caller 73 double complex value, ///< Data to be put into psScalar 74 psElemType type ///< Type of data to be held by psScalar 75 ); 76 #define psScalarAlloc(value, type) \ 77 p_psScalarAlloc(__FILE__, __LINE__, __func__, value, type) 78 #endif // ifdef DOXYGEN 66 79 67 80 … … 83 96 * @return psScalar* A copy of the input scalar 84 97 */ 98 #ifdef DOXYGEN 85 99 psScalar* psScalarCopy( 86 const psScalar *value ///< Scalar to copy.100 const psScalar *value ///< Scalar to copy 87 101 ); 102 #else // ifdef DOXYGEN 103 psScalar* p_psScalarCopy( 104 const char *file, ///< File of caller 105 unsigned int lineno, ///< Line number of caller 106 const char *func, ///< Function name of caller 107 const psScalar *value ///< Scalar to copy. 108 ); 109 #define psScalarCopy(value) \ 110 p_psScalarCopy(__FILE__, __LINE__, __func__, value) 111 #endif // ifdef DOXYGEN 112 88 113 89 114 /// @} -
trunk/psLib/src/mathtypes/psVector.c
r11696 r11697 8 8 * @author Ross Harman, MHPCC 9 9 * @author Robert DeSonia, MHPCC 10 * @author Joshua Hoblitt, University of Hawaii 10 11 * 11 * @version $Revision: 1.9 2$ $Name: not supported by cvs2svn $12 * @date $Date: 2007-02-08 02: 31:59$12 * @version $Revision: 1.93 $ $Name: not supported by cvs2svn $ 13 * @date $Date: 2007-02-08 02:42:46 $ 13 14 * 14 15 * Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii -
trunk/psLib/src/mathtypes/psVector.h
r11696 r11697 8 8 * @author Robert DeSonia, MHPCC 9 9 * @author Ross Harman, MHPCC 10 * 11 * @version $Revision: 1.63 $ $Name: not supported by cvs2svn $ 12 * @date $Date: 2007-02-08 02:31:59 $ 10 * @author Joshua Hoblitt, University of Hawaii 11 * 12 * @version $Revision: 1.64 $ $Name: not supported by cvs2svn $ 13 * @date $Date: 2007-02-08 02:42:46 $ 13 14 * Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii 14 15 */
Note:
See TracChangeset
for help on using the changeset viewer.
