Branch: Tag:

1998-10-10

1998-10-10 00:23:49 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Prepared for the updated module_support.c

Rev: src/builtin_functions.c:1.127

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: builtin_functions.c,v 1.126 1998/10/09 23:12:45 grubba Exp $"); + RCSID("$Id: builtin_functions.c,v 1.127 1998/10/10 00:23:49 grubba Exp $");   #include "interpret.h"   #include "svalue.h"   #include "pike_macros.h"
608:    INT32 len;    int i;    -  get_all_args("string_to_unicode", args, "%S", &in); +  get_all_args("string_to_unicode", args, "%W", &in);       switch(in->size_shift) {    case 0:
716:       get_all_args("unicode_to_string", args, "%S", &in);    -  if (in->size_shift) { -  error("unicode_to_string(): Argument in not an 8bit string.\n"); -  } -  +     if (in->len & 1) {    error("unicode_to_string(): String length is odd.\n");    }