diff options
Diffstat (limited to 'externals/grill/py/source')
-rw-r--r-- | externals/grill/py/source/main.cpp | 4 | ||||
-rw-r--r-- | externals/grill/py/source/main.h | 2 | ||||
-rw-r--r-- | externals/grill/py/source/pyargs.cpp | 110 | ||||
-rw-r--r-- | externals/grill/py/source/pyext.cpp | 15 |
4 files changed, 76 insertions, 55 deletions
diff --git a/externals/grill/py/source/main.cpp b/externals/grill/py/source/main.cpp index dbcd27f9..84698211 100644 --- a/externals/grill/py/source/main.cpp +++ b/externals/grill/py/source/main.cpp @@ -2,7 +2,7 @@ py/pyext - python external object for PD and MaxMSP -Copyright (c) 2002-2003 Thomas Grill (xovo@gmx.net) +Copyright (c) 2002-2004 Thomas Grill (xovo@gmx.net) For information on usage and redistribution, and for a DISCLAIMER OF ALL WARRANTIES, see the file, "license.txt," in this distribution. @@ -13,7 +13,7 @@ WARRANTIES, see the file, "license.txt," in this distribution. V py::lib_setup() { post(""); - post("py/pyext %s - python script objects, (C)2002,2003 Thomas Grill",PY__VERSION); + post("py/pyext %s - python script objects, (C)2002-2004 Thomas Grill",PY__VERSION); post(""); FLEXT_SETUP(pyobj); diff --git a/externals/grill/py/source/main.h b/externals/grill/py/source/main.h index b0bf4711..407fc8df 100644 --- a/externals/grill/py/source/main.h +++ b/externals/grill/py/source/main.h @@ -29,7 +29,7 @@ WARRANTIES, see the file, "license.txt," in this distribution. #error You need at least flext version 0.4.5 #endif -#define PY__VERSION "0.1.2" +#define PY__VERSION "0.1.3pre" #define PYEXT_MODULE "pyext" // name for module diff --git a/externals/grill/py/source/pyargs.cpp b/externals/grill/py/source/pyargs.cpp index 5ed3a89c..cf6d41d0 100644 --- a/externals/grill/py/source/pyargs.cpp +++ b/externals/grill/py/source/pyargs.cpp @@ -10,60 +10,72 @@ WARRANTIES, see the file, "license.txt," in this distribution. #include "main.h" +static PyObject *MakePyAtom(const t_atom &at) +{ + if(flext::IsFloat(at)) return PyFloat_FromDouble((D)flext::GetFloat(at)); + else if(flext::IsInt(at)) return PyInt_FromLong(flext::GetInt(at)); + else if(flext::IsSymbol(at)) return PyString_FromString(flext::GetString(at)); +// else if(flext::IsPointer(at)) return NULL; // not handled + else return NULL; +} PyObject *py::MakePyArgs(const t_symbol *s,const AtomList &args,I inlet,BL withself) { PyObject *pArgs; - BL any = IsAnything(s); - pArgs = PyTuple_New(args.Count()+(any?1:0)+(inlet >= 0?1:0)); - - I pix = 0; - - if(inlet >= 0) { - PyObject *pValue = PyInt_FromLong(inlet); - - // reference stolen: - PyTuple_SetItem(pArgs, pix++, pValue); - } - - I ix; - PyObject *tmp; - if(!withself || args.Count() < (any?1:2)) tmp = pArgs,ix = pix; - else tmp = PyTuple_New(args.Count()+(any?1:0)),ix = 0; - - if(any) { - PyObject *pValue = PyString_FromString(GetString(s)); - - // reference stolen here: - PyTuple_SetItem(tmp, ix++, pValue); - } - - for(I i = 0; i < args.Count(); ++i) { - PyObject *pValue = NULL; - - if(IsFloat(args[i])) pValue = PyFloat_FromDouble((D)GetFloat(args[i])); - else if(IsInt(args[i])) pValue = PyInt_FromLong(GetInt(args[i])); - else if(IsSymbol(args[i])) pValue = PyString_FromString(GetString(args[i])); - else if(IsPointer(args[i])) pValue = NULL; // not handled - - if(!pValue) { - post("py/pyext: cannot convert argument %i",any?i+1:i); - continue; - } - - /* pValue reference stolen here: */ - PyTuple_SetItem(tmp, ix++, pValue); - } - - if(tmp != pArgs) { - PyTuple_SetItem(pArgs, pix++, tmp); -#if PY_VERSION_HEX >= 0x02020000 - _PyTuple_Resize(&pArgs,pix); -#else - _PyTuple_Resize(&pArgs,pix,0); -#endif - } +/* + if(!s && args.Count() == 1) { + pArgs = MakePyAtom(args[0]); + if(!pArgs) + post("py/pyext: cannot convert argument(s)"); + } + else +*/ + { + BL any = IsAnything(s); + pArgs = PyTuple_New(args.Count()+(any?1:0)+(inlet >= 0?1:0)); + + I pix = 0; + + if(inlet >= 0) { + PyObject *pValue = PyInt_FromLong(inlet); + + // reference stolen: + PyTuple_SetItem(pArgs, pix++, pValue); + } + + I ix; + PyObject *tmp; + if(!withself || args.Count() < (any?1:2)) tmp = pArgs,ix = pix; + else tmp = PyTuple_New(args.Count()+(any?1:0)),ix = 0; + + if(any) { + PyObject *pValue = PyString_FromString(GetString(s)); + + // reference stolen here: + PyTuple_SetItem(tmp, ix++, pValue); + } + + for(I i = 0; i < args.Count(); ++i) { + PyObject *pValue = MakePyAtom(args[i]); + if(!pValue) { + post("py/pyext: cannot convert argument %i",any?i+1:i); + continue; + } + + /* pValue reference stolen here: */ + PyTuple_SetItem(tmp, ix++, pValue); + } + + if(tmp != pArgs) { + PyTuple_SetItem(pArgs, pix++, tmp); + #if PY_VERSION_HEX >= 0x02020000 + _PyTuple_Resize(&pArgs,pix); + #else + _PyTuple_Resize(&pArgs,pix,0); + #endif + } + } return pArgs; } diff --git a/externals/grill/py/source/pyext.cpp b/externals/grill/py/source/pyext.cpp index b8763771..799de20a 100644 --- a/externals/grill/py/source/pyext.cpp +++ b/externals/grill/py/source/pyext.cpp @@ -2,7 +2,7 @@ py/pyext - python script object for PD and MaxMSP -Copyright (c) 2002-2003 Thomas Grill (xovo@gmx.net) +Copyright (c) 2002-2004 Thomas Grill (xovo@gmx.net) For information on usage and redistribution, and for a DISCLAIMER OF ALL WARRANTIES, see the file, "license.txt," in this distribution. @@ -339,10 +339,19 @@ void pyext::m_set(int argc,const t_atom *argv) post("%s - set: Python variable %s not found",thisName(),ch); } else { - PyObject *pval = MakePyArgs(sym_list,AtomList(argc-1,argv+1),-1,false); - if(!pval) + PyObject *pval = MakePyArgs(NULL,AtomList(argc-1,argv+1),-1,false); + + if(!pval) PyErr_Print(); else { + if(PySequence_Size(pval) == 1) { + // reduce lists of one element to element itself + + PyObject *val1 = PySequence_GetItem(pval,0); + Py_DECREF(pval); + pval = val1; + } + PyObject_SetAttrString(pyobj,ch,pval); Py_DECREF(pval); } |