diff options
| author | Mystery Man <unknown@mandriva.org> | 2005-04-05 19:41:54 +0000 |
|---|---|---|
| committer | Mystery Man <unknown@mandriva.org> | 2005-04-05 19:41:54 +0000 |
| commit | 1d9a4b73a37c6e942f909c2d42ca13b5c47e8362 (patch) | |
| tree | 5bab4266bc57a31d97ac6a8badc2ede721a42c9c /mdk-stage1/slang/slarrmis.c | |
| parent | 4691e29d1228b10abbe586c5ecb87ec9e13bd3ec (diff) | |
| download | drakx-backup-do-not-use-1d9a4b73a37c6e942f909c2d42ca13b5c47e8362.tar drakx-backup-do-not-use-1d9a4b73a37c6e942f909c2d42ca13b5c47e8362.tar.gz drakx-backup-do-not-use-1d9a4b73a37c6e942f909c2d42ca13b5c47e8362.tar.bz2 drakx-backup-do-not-use-1d9a4b73a37c6e942f909c2d42ca13b5c47e8362.tar.xz drakx-backup-do-not-use-1d9a4b73a37c6e942f909c2d42ca13b5c47e8362.zip | |
This commit was manufactured by cvs2svn to create tag 'V10_2_20mdk'.V10_2_20mdk
Diffstat (limited to 'mdk-stage1/slang/slarrmis.c')
| -rw-r--r-- | mdk-stage1/slang/slarrmis.c | 38 |
1 files changed, 0 insertions, 38 deletions
diff --git a/mdk-stage1/slang/slarrmis.c b/mdk-stage1/slang/slarrmis.c deleted file mode 100644 index 330dcb53f..000000000 --- a/mdk-stage1/slang/slarrmis.c +++ /dev/null @@ -1,38 +0,0 @@ -/* Misc Array Functions */ -/* Copyright (c) 1997, 1999, 2001 John E. Davis - * This file is part of the S-Lang library. - * - * You may distribute under the terms of either the GNU General Public - * License or the Perl Artistic License. - */ - -#include "slinclud.h" - -#include "slang.h" -#include "_slang.h" - -int SLang_get_array_element (SLang_Array_Type *at, int *indices, VOID_STAR data) -{ - int is_ptr; - - if ((at == NULL) - || (indices == NULL) - || (data == NULL)) - return -1; - - is_ptr = (at->flags & SLARR_DATA_VALUE_IS_POINTER); - if (is_ptr) *(VOID_STAR *) data = NULL; - return _SLarray_aget_transfer_elem (at, indices, data, at->sizeof_type, is_ptr); -} - -int SLang_set_array_element (SLang_Array_Type *at, int *indices, VOID_STAR data) -{ - if ((at == NULL) - || (indices == NULL) - || (data == NULL)) - return -1; - - return _SLarray_aput_transfer_elem (at, indices, data, at->sizeof_type, - at->flags & SLARR_DATA_VALUE_IS_POINTER); -} - |