From 0ed7a8b68dd73e2b0473b8127aeca99f3bac9061 Mon Sep 17 00:00:00 2001 From: Thomas Grill Date: Wed, 1 Apr 2009 21:13:09 +0000 Subject: cleaned up grill externals - replaced with svn:externals to svn.grrrr.org/ext/trunk/ svn path=/trunk/; revision=10951 --- externals/grill/vasp/source/oploop.h | 95 ------------------------------------ 1 file changed, 95 deletions(-) delete mode 100644 externals/grill/vasp/source/oploop.h (limited to 'externals/grill/vasp/source/oploop.h') diff --git a/externals/grill/vasp/source/oploop.h b/externals/grill/vasp/source/oploop.h deleted file mode 100644 index ec805c13..00000000 --- a/externals/grill/vasp/source/oploop.h +++ /dev/null @@ -1,95 +0,0 @@ -/* - -VASP modular - vector assembling signal processor / objects for Max/MSP and PD - -Copyright (c) 2002-2006 Thomas Grill (gr@grrrr.org) -For information on usage and redistribution, and for a DISCLAIMER OF ALL -WARRANTIES, see the file, "license.txt," in this distribution. - -*/ - -#ifndef __VASP_OPLOOP_H -#define __VASP_OPLOOP_H - -#define _D_BLOCK 4096 - -#define _D_MIN(a,b) ((a) < (b)?(a):(b)) - -#ifdef FLEXT_THREADS - - #define _D_LOOP(VAR,LEN) { \ - for(register int __i__ = 0; __i__ < LEN; flext_base::ThrYield()) { \ - register const I __m__ = _D_MIN(LEN,__i__+_D_BLOCK); \ - for(; __i__ < __m__; ++__i__) { VAR = __i__; - - #define _E_LOOP } if(__i__ < __m__) break; }} - - #define _D_WHILE(COND) { \ - for(; (COND) ; flext_base::ThrYield()) { \ - register I __i__ = 0; \ - for(; __i__ < _D_BLOCK && (COND); ++__i__) { - - #define _E_WHILE } if(__i__ < _D_BLOCK) break; }} - -#else - - #define _D_LOOP(VAR,LEN) { \ - for(VAR = 0; VAR < LEN; ++VAR) { - - #define _E_LOOP }} - - #define _D_WHILE(COND) { \ - while(COND) { - - #define _E_WHILE }} - -#endif - - -#define _DE_WHILE(COND,BODY) { _D_WHILE(COND) BODY; _E_WHILE } -#define _DF_LOOP(VAR,LEN,BODY) { _D_LOOP(VAR,LEN) BODY; _E_LOOP } - -#ifdef VASP_COMPACT - - #define _DE_LOOP(VAR,LEN,BODY) _DF_LOOP(VAR,LEN,BODY) - -#else - - #ifdef FLEXT_THREADS - - #define _DE_LOOP(VAR,LEN,BODY) { \ - for(VAR = 0; VAR < LEN; flext_base::ThrYield()) { \ - register const I __m__ = _D_MIN(LEN,VAR+_D_BLOCK); \ - for(; VAR <= __m__-4; ) { \ - BODY; ++VAR; \ - BODY; ++VAR; \ - BODY; ++VAR; \ - BODY; ++VAR; \ - } \ - for(; VAR < __m__; ++VAR) { \ - BODY; \ - } \ - } \ - } - - #else - - #define _DE_LOOP(VAR,LEN,BODY) { \ - for(VAR = 0; VAR <= LEN-4; ) { \ - BODY; ++VAR; \ - BODY; ++VAR; \ - BODY; ++VAR; \ - BODY; ++VAR; \ - } \ - for(; VAR < LEN; ++VAR) { \ - BODY; \ - } \ - } - - #endif - -#endif - -#define _DQ_LOOP(UNROLL,VAR,LEN,BODY) { if(UNROLL) _DE_LOOP(VAR,LEN,BODY) else _DF_LOOP(VAR,LEN,BODY) } - -#endif -- cgit v1.2.1