~ubuntu-branches/ubuntu/precise/csound/precise

« back to all changes in this revision

Viewing changes to OOps/ugrw1.c

  • Committer: Package Import Robot
  • Author(s): Felipe Sateler
  • Date: 2012-04-19 09:26:46 UTC
  • mfrom: (3.2.19 sid)
  • Revision ID: package-import@ubuntu.com-20120419092646-96xbj1n6atuqosk2
Tags: 1:5.17.6~dfsg-1
* New upstream release
 - Do not build the wiimote opcodes (we need wiiuse).
* Add new API function to symbols file
* Disable lua opcodes, they were broken. Requires OpenMP to be enabled.
* Backport fixes from upstream:
  - Link dssi4cs with dl. Backport
  - Fix building of CsoundAC

Show diffs side-by-side

added added

removed removed

Lines of Context:
858
858
/*---------------------------------------------------------------------------*/
859
859
 
860
860
static int ftkrchkw(CSOUND *, TABLEW *p);
861
 
static int itblchkw(CSOUND *, TABLEW *p);
862
 
static int ptblchkw(CSOUND *, TABLEW *p);
 
861
       int itblchkw(CSOUND *, TABLEW *p);
 
862
static int tblchkw(CSOUND *, TABLEW *p);
863
863
 
864
864
/* Table write code
865
865
 *
875
875
 *
876
876
 * Also called by itablew().
877
877
 *
878
 
 * A similar function ptblchkw() does the same job at performance time
 
878
 * A similar function tblchkw() does the same job at performance time
879
879
 * - k processing cycles.
880
880
 *
881
881
 * Both these functions are virtually identical to those itblchk() and
886
886
 * 3 -  There is an igwmode parameter.
887
887
*/
888
888
 
889
 
static int itblchkw(CSOUND *csound, TABLEW *p)
 
889
int itblchkw(CSOUND *csound, TABLEW *p)
890
890
{
891
891
    /* Get pointer to the function table data structure of the table
892
892
     * number specified in xfn. Return 0 if it cannot be found.
928
928
 
929
929
/*************************************/
930
930
 
931
 
/* ptblchkw()
 
931
/* tblchkw()
932
932
 *
933
933
 * This is called at init time by tblsetwkt() to set up the TABLEW
934
934
 * data structure for subsequent k and a rate operations which are
946
946
 * ktablewkt tablewkt
947
947
 *
948
948
 */
949
 
static int ptblchkw(CSOUND *csound, TABLEW *p)
 
949
static int tblchkw(CSOUND *csound, TABLEW *p)
950
950
{
951
951
    /* TABLEW has an integer variable for the previous table number
952
952
     * (p->pfn).
964
964
 
965
965
/*---------------------------------------------------------------------------*/
966
966
 
967
 
/* tblsetw()
968
 
 *
969
 
 * This is called at init time to set up TABLEW for the a and k rate
970
 
 * table read functions which are expecting the table number to be
971
 
 * fixed at i time.
972
 
 *
973
 
 * Call the itblchkw() function to do the work.
974
 
 */
975
 
int tblsetw(CSOUND *csound, TABLEW *p)
976
 
{
977
 
    return itblchkw(csound, p);
978
 
}
979
 
 
980
967
/* tblsetwkt()
981
968
 *
982
969
 * This is called at init time to set up TABLEW for the a and k rate
983
970
 * table read functions which are expecting the table number to be a k
984
971
 * rate variable.
985
972
 *
986
 
 * Call the ptblchkw() function to do the work.  */
 
973
 * Call the tblchkw() function to do the work.  */
987
974
int tblsetwkt(CSOUND *csound, TABLEW *p)
988
975
{
989
 
    return ptblchkw(csound, p);
 
976
    return tblchkw(csound, p);
990
977
}
991
978
 
992
979
/* itablew()