Add memsaved or memdelete to macros

This commit is contained in:
Holger Vogt 2021-07-13 12:03:15 +02:00
parent 8c5277a5e8
commit de00317e49
1 changed files with 17 additions and 3 deletions

View File

@ -19,24 +19,38 @@ Modified: 2004 Paolo Nenzi - (ng)spice integration
#define VECTOR_ALLOC(type, vec, n) { \
vec = TMALLOC(type *, n); \
memsaved(vec); \
}
#define MATRIX_ALLOC(type, mat, m, j) { \
int k; \
mat = TMALLOC(type **, m); \
memsaved(mat); \
for (k = 0; k < m; k++) { \
VECTOR_ALLOC(type, mat[k], j); \
} \
}
#define VECTOR_FREE(vec) tfree(vec)
#define VECTOR_FREE(vec) { \
memdeleted(vec); \
tfree(vec); \
}
#define MATRIX_FREE(mat, m, j) { \
int k; \
for (k = 0; k < m; k++) { \
tfree(mat[k]); \
memdeleted(mat[k]); \
tfree(mat[k]); \
} \
tfree(mat); \
memdeleted(mat); \
tfree(mat); \
}
#define CPLTFREE(ptr) { \
memdelete(ptr); \
tfree(ptr); \
}
#define MAX_DEG 8