Beispiel #1
0
void
yarg_kw_init(char **knames, long *kglobs, int *kiargs)
{
  long n = kglobs[0];
  if (!n) {
    long *globs = kglobs+1;
    char *name;
    for (name=*knames++ ; name ; n++, name=*knames++)
      *(globs++) = yget_global(name, 0);
    kglobs[0] = n;
  }
  while (n-- > 0) *(kiargs++) = -1;
}
Beispiel #2
0
Datei: yusb.c Projekt: emmt/yusb
static void define_global_int(const char* name, int value)
{
  ypush_int(value);
  yput_global(yget_global(name, 0), 0);
  yarg_drop(1);
}