Guido van Rossum | a330996 | 1993-07-28 09:05:47 +0000 | [diff] [blame] | 1 | #ifndef Py_CGENSUPPORT_H |
| 2 | #define Py_CGENSUPPORT_H |
| 3 | #ifdef __cplusplus |
| 4 | extern "C" { |
| 5 | #endif |
| 6 | |
Guido van Rossum | f70e43a | 1991-02-19 12:39:46 +0000 | [diff] [blame] | 7 | /*********************************************************** |
Guido van Rossum | 5799b52 | 1995-01-04 19:06:22 +0000 | [diff] [blame] | 8 | Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam, |
| 9 | The Netherlands. |
Guido van Rossum | f70e43a | 1991-02-19 12:39:46 +0000 | [diff] [blame] | 10 | |
| 11 | All Rights Reserved |
| 12 | |
Guido van Rossum | fd71b9e | 2000-06-30 23:50:40 +0000 | [diff] [blame^] | 13 | Copyright (c) 2000, BeOpen.com. |
| 14 | Copyright (c) 1995-2000, Corporation for National Research Initiatives. |
| 15 | Copyright (c) 1990-1995, Stichting Mathematisch Centrum. |
| 16 | All rights reserved. |
Guido van Rossum | f70e43a | 1991-02-19 12:39:46 +0000 | [diff] [blame] | 17 | |
Guido van Rossum | fd71b9e | 2000-06-30 23:50:40 +0000 | [diff] [blame^] | 18 | See the file "Misc/COPYRIGHT" for information on usage and |
| 19 | redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES. |
Guido van Rossum | f70e43a | 1991-02-19 12:39:46 +0000 | [diff] [blame] | 20 | |
| 21 | ******************************************************************/ |
| 22 | |
Guido van Rossum | 85a5fbb | 1990-10-14 12:07:46 +0000 | [diff] [blame] | 23 | /* Definitions used by cgen output */ |
| 24 | |
Guido van Rossum | 1818b77 | 1997-04-29 15:35:28 +0000 | [diff] [blame] | 25 | /* XXX This file is obsolete. It is *only* used by glmodule.c. */ |
| 26 | |
Guido van Rossum | 85a5fbb | 1990-10-14 12:07:46 +0000 | [diff] [blame] | 27 | typedef char *string; |
| 28 | |
Guido van Rossum | caa6380 | 1995-01-12 11:45:45 +0000 | [diff] [blame] | 29 | #define mknewlongobject(x) PyInt_FromLong(x) |
| 30 | #define mknewshortobject(x) PyInt_FromLong((long)x) |
| 31 | #define mknewfloatobject(x) PyFloat_FromDouble(x) |
| 32 | #define mknewcharobject(ch) Py_BuildValue("c", ch) |
Guido van Rossum | 85a5fbb | 1990-10-14 12:07:46 +0000 | [diff] [blame] | 33 | |
Guido van Rossum | 1818b77 | 1997-04-29 15:35:28 +0000 | [diff] [blame] | 34 | #define getichararg PyArg_GetChar |
| 35 | #define getidoublearray PyArg_GetDoubleArray |
| 36 | #define getifloatarg PyArg_GetFloat |
| 37 | #define getifloatarray PyArg_GetFloatArray |
| 38 | #define getilongarg PyArg_GetLong |
| 39 | #define getilongarray PyArg_GetLongArray |
| 40 | #define getilongarraysize PyArg_GetLongArraySize |
| 41 | #define getiobjectarg PyArg_GetObject |
| 42 | #define getishortarg PyArg_GetShort |
| 43 | #define getishortarray PyArg_GetShortArray |
| 44 | #define getishortarraysize PyArg_GetShortArraySize |
| 45 | #define getistringarg PyArg_GetString |
| 46 | |
Guido van Rossum | caf7837 | 1996-12-10 15:41:19 +0000 | [diff] [blame] | 47 | extern int PyArg_GetObject Py_PROTO((PyObject *args, int nargs, |
| 48 | int i, PyObject **p_a)); |
| 49 | extern int PyArg_GetLong Py_PROTO((PyObject *args, int nargs, |
| 50 | int i, long *p_a)); |
| 51 | extern int PyArg_GetShort Py_PROTO((PyObject *args, int nargs, |
| 52 | int i, short *p_a)); |
| 53 | extern int PyArg_GetFloat Py_PROTO((PyObject *args, int nargs, |
| 54 | int i, float *p_a)); |
| 55 | extern int PyArg_GetString Py_PROTO((PyObject *args, int nargs, |
| 56 | int i, string *p_a)); |
| 57 | extern int PyArg_GetChar Py_PROTO((PyObject *args, int nargs, |
| 58 | int i, char *p_a)); |
| 59 | extern int PyArg_GetLongArray Py_PROTO((PyObject *args, int nargs, |
| 60 | int i, int n, long *p_a)); |
| 61 | extern int PyArg_GetShortArray Py_PROTO((PyObject *args, int nargs, |
| 62 | int i, int n, short *p_a)); |
| 63 | extern int PyArg_GetDoubleArray Py_PROTO((PyObject *args, int nargs, |
| 64 | int i, int n, double *p_a)); |
| 65 | extern int PyArg_GetFloatArray Py_PROTO((PyObject *args, int nargs, |
| 66 | int i, int n, float *p_a)); |
| 67 | extern int PyArg_GetLongArraySize Py_PROTO((PyObject *args, int nargs, |
| 68 | int i, long *p_a)); |
| 69 | extern int PyArg_GetShortArraySize Py_PROTO((PyObject *args, int nargs, |
| 70 | int i, short *p_a)); |
| 71 | extern int PyArg_GetDoubleArraySize Py_PROTO((PyObject *args, int nargs, |
| 72 | int i, double *p_a)); |
| 73 | extern int PyArg_GetFloatArraySize Py_PROTO((PyObject *args, int nargs, |
| 74 | int i, float *p_a)); |
Guido van Rossum | a330996 | 1993-07-28 09:05:47 +0000 | [diff] [blame] | 75 | |
| 76 | #ifdef __cplusplus |
| 77 | } |
| 78 | #endif |
| 79 | #endif /* !Py_CGENSUPPORT_H */ |