diff options
Diffstat (limited to 'test/spass/vector.c')
-rw-r--r-- | test/spass/vector.c | 120 |
1 files changed, 120 insertions, 0 deletions
diff --git a/test/spass/vector.c b/test/spass/vector.c new file mode 100644 index 00000000..bd16424a --- /dev/null +++ b/test/spass/vector.c @@ -0,0 +1,120 @@ +/**************************************************************/ +/* ********************************************************** */ +/* * * */ +/* * GLOBAL SYSTEM VECTOR * */ +/* * * */ +/* * $Module: VECTOR * */ +/* * * */ +/* * Copyright (C) 1996, 2000, 2001 MPI fuer Informatik * */ +/* * * */ +/* * This program is free software; you can redistribute * */ +/* * it and/or modify it under the terms of the GNU * */ +/* * General Public License as published by the Free * */ +/* * Software Foundation; either version 2 of the License, * */ +/* * or (at your option) any later version. * */ +/* * * */ +/* * This program is distributed in the hope that it will * */ +/* * be useful, but WITHOUT ANY WARRANTY; without even * */ +/* * the implied warranty of MERCHANTABILITY or FITNESS * */ +/* * FOR A PARTICULAR PURPOSE. See the GNU General Public * */ +/* * License for more details. * */ +/* * * */ +/* * You should have received a copy of the GNU General * */ +/* * Public License along with this program; if not, write * */ +/* * to the Free Software Foundation, Inc., 59 Temple * */ +/* * Place, Suite 330, Boston, MA 02111-1307 USA * */ +/* * * */ +/* * * */ +/* $Revision: 21527 $ * */ +/* $State$ * */ +/* $Date: 2005-04-24 21:10:28 -0700 (Sun, 24 Apr 2005) $ * */ +/* $Author: duraid $ * */ +/* * * */ +/* * Contact: * */ +/* * Christoph Weidenbach * */ +/* * MPI fuer Informatik * */ +/* * Stuhlsatzenhausweg 85 * */ +/* * 66123 Saarbruecken * */ +/* * Email: weidenb@mpi-sb.mpg.de * */ +/* * Germany * */ +/* * * */ +/* ********************************************************** */ +/**************************************************************/ + + +/* $RCSfile$ */ + +#include "vector.h" + +/**************************************************************/ +/* Global Variables */ +/**************************************************************/ + +VECTOR vec_VECTOR; +int vec_MAX; + + +/**************************************************************/ +/* Functions */ +/**************************************************************/ + +void vec_Swap(int i, int j) +/********************************************************** + INPUT: Two integers i and j which designate the i-th and + the j-th cell of the vector. + RETURNS: None. + CAUTION: The values in the i-th and the j-th cell in the + vector are interchanged. +********************************************************/ +{ + POINTER help; + + help = vec_GetNth(i); + vec_PutNth(i, vec_GetNth(j)); + vec_PutNth(j, help); + +} + + +void vec_PrintSel(int beg, int end, void (*ElementPrint)(POINTER)) +/********************************************************** + INPUT: An int for the start position, an int for + the end position and a print function for + elements. + RETURNS: None. + EFFECT: Writes the vector from beg to end to stdout. + CAUTION: None. +********************************************************/ +{ + int i; + + if (vec_ActMax() > 0) { + for (i = beg; i < end; i++){ + printf("Entry %d:\t",i); + ElementPrint(vec_GetNth(i)); + putchar('\n'); + } + } else + puts("Vector is empty"); +} + + +void vec_PrintAll(void (*ElementPrint)(POINTER)) +/********************************************************** + INPUT: A print function for the elements of the vector. + RETURNS: None. + EFFECT: Writes the vector to stdout. + CAUTION: None. +********************************************************/ +{ + int i; + + if (vec_ActMax() > 0) { + for (i = 0; i < vec_ActMax(); i++) { + printf("Entry %d:\t", i); + ElementPrint(vec_GetNth(i)); + putchar('\n'); + } + } else + puts("Vector is empty"); +} |