string unescape()
{
//escape
if(is_escape())
{
array<ascii> result;
self buffer;
//parse
tokenizer tokenizer=get();
check(buffer.extract_escape(result,tokenizer));
check(tokenizer.is_empty());
return result;
}
//any
return string_();
}
string boolean::literal()
{
return string_();
}
#define device_(dev) extern gx_device dev;
#include "gconfig.h"
#undef device_
/* Set up the device table. */
#define device_(dev) &dev,
gx_device *gx_device_list[] = {
#include "gconfig.h"
0
};
#undef device_
#define device_(dev)
/* Set up the .ps file name string array. */
/* We fill in the lengths at initialization time. */
#define ref_(t) struct { struct tas_s tas; t value; }
#define string_(s)\
{ {(t_string<<r_type_shift)+a_readonly, 0}, s },
#undef psfile_
#define psfile_(fns) string_(fns)
ref_(const char *) gs_init_file_array[] = {
#include "gconfig.h"
string_(0)
};
/* Some C compilers insist on executable code here, so.... */
void
gconfig_dummy()
{
}
#include "iminst.h"
#include "iplugin.h"
/* Define the default values for an interpreter instance. */
const gs_main_instance gs_main_instance_init_values =
{gs_main_instance_default_init_values};
/* Set up the .ps file name string array. */
/* We fill in the lengths at initialization time. */
#define ref_(t) struct { struct tas_s tas; t value; }
#define string_(s,len)\
{ { (t_string<<r_type_shift) + a_readonly + avm_foreign, len }, s },
#define psfile_(fns,len) string_(fns,len)
const ref_(const char *) gs_init_file_array[] = {
#include "gconf.h"
string_(0, 0)
};
#undef psfile_
/* Set up the emulator name string array similarly. */
#define emulator_(ems,len) string_(ems,len)
const ref_(const char *) gs_emulator_name_array[] = {
#include "gconf.h"
string_(0, 0)
};
#undef emulator_
/* Set up the function type table similarly. */
#define function_type_(i,proc) extern build_function_proc(proc);
#include "gconf.h"
#undef function_type_
string literal()
{
return string_();
}
bool is_text()
{
return string_().is(&ascii::is_text);
}
bool is_multiline_text()
{
return string_().is(&ascii::is_multiline_text);
}
