include/lang/PyrPrimitive.h

   1 /*
   2         SuperCollider real time audio synthesis system
   3     Copyright (c) 2002 James McCartney. All rights reserved.
   4         http://www.audiosynth.com
   5
   6     This program is free software; you can redistribute it and/or modify
   7     it under the terms of the GNU General Public License as published by
   8     the Free Software Foundation; either version 2 of the License, or
   9     (at your option) any later version.
  10
  11     This program is distributed in the hope that it will be useful,
  12     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14     GNU General Public License for more details.
  15
  16     You should have received a copy of the GNU General Public License
  17     along with this program; if not, write to the Free Software
  18     Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301  USA
  19 */
  20 /*
  21
  22 Functions for defining language primitives.
  23
  24 */
  25
  26 #ifndef _PYRPRIMITIVE_H_
  27 #define _PYRPRIMITIVE_H_
  28
  29 #include "PyrSlot.h"
  30
  31 typedef int (*PrimitiveHandler)(struct VMGlobals *g, int numArgsPushed);
  32 typedef int (*PrimitiveWithKeysHandler)(struct VMGlobals *g, int numArgsPushed, int numKeyArgsPushed);
  33
  34 int nextPrimitiveIndex();
  35 int definePrimitive(int base, int index, const char *name, PrimitiveHandler handler, int numArgs, int varArgs);
  36 int definePrimitiveWithKeys(int base, int index, const char *name,
  37         PrimitiveHandler handler, PrimitiveWithKeysHandler keyhandler,
  38         int numArgs, int varArgs);
  39 int getPrimitiveNumArgs(int index);
  40 PyrSymbol* getPrimitiveName(int index);
  41
  42 #endif