diff options
| author | Travis Oliphant <oliphant@enthought.com> | 2006-03-08 22:47:17 +0000 |
|---|---|---|
| committer | Travis Oliphant <oliphant@enthought.com> | 2006-03-08 22:47:17 +0000 |
| commit | 704204550661e497888ac879e292cb69a55bbd8c (patch) | |
| tree | 2f0eb084f0e33475b2713079a63e30242efbb262 /numpy/f2py/common_rules.py | |
| parent | 07d036080bcac11ef5ff601b5f6a3215fed230c8 (diff) | |
| download | numpy-704204550661e497888ac879e292cb69a55bbd8c.tar.gz | |
Fix f2py to handle character arrays in common blocks
Diffstat (limited to 'numpy/f2py/common_rules.py')
| -rw-r--r-- | numpy/f2py/common_rules.py | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/numpy/f2py/common_rules.py b/numpy/f2py/common_rules.py index 6e8eee49d..2604f4a48 100644 --- a/numpy/f2py/common_rules.py +++ b/numpy/f2py/common_rules.py @@ -112,7 +112,7 @@ def buildhooks(m): cadd('\t%s(f2pyinit%s,F2PYINIT%s)(f2py_setup_%s);'\ %(F_FUNC,lower_name,string.upper(name),name)) cadd('}\n') - iadd('\tPyDict_SetItemString(d, \"%s\", PyFortranObject_New(f2py_%s_def,f2py_init_%s));'%(name,name,name)) + iadd('\tF2PyDict_SetItemString(d, \"%s\", PyFortranObject_New(f2py_%s_def,f2py_init_%s));'%(name,name,name)) tname = string.replace(name,'_','\\_') dadd('\\subsection{Common block \\texttt{%s}}\n'%(tname)) dadd('\\begin{description}') |