version 1.87, 2015/08/04 06:20:45 |
version 1.88, 2015/08/06 10:01:53 |
|
|
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* |
* |
* $OpenXM: OpenXM_contrib2/asir2000/parse/glob.c,v 1.86 2015/03/16 00:08:32 noro Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/parse/glob.c,v 1.87 2015/08/04 06:20:45 noro Exp $ |
*/ |
*/ |
#include "ca.h" |
#include "ca.h" |
#include "al.h" |
#include "al.h" |
#include "parse.h" |
#include "parse.h" |
#include "ox.h" |
#include "ox.h" |
#if !defined(VISUAL) && !defined(_PA_RISC1_1) && !defined(linux) && !defined(SYSV) && !defined(__CYGWIN__) && !defined(__INTERIX) && !defined(__FreeBSD__) |
#if !defined(VISUAL) && !defined(__MINGW32__) && !defined(__MINGW64__) && !defined(_PA_RISC1_1) && !defined(linux) && !defined(SYSV) && !defined(__CYGWIN__) && !defined(__INTERIX) && !defined(__FreeBSD__) |
#include <sgtty.h> |
#include <sgtty.h> |
#endif |
#endif |
|
|
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) || defined(__MINGW64__) |
#include <io.h> |
#include <io.h> |
#include <direct.h> |
#include <direct.h> |
#else |
#else |
|
|
#include <sys/ttold.h> |
#include <sys/ttold.h> |
#endif |
#endif |
|
|
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) || defined(__MINGW64__) |
#define HISTORY asir_history |
#define HISTORY asir_history |
#endif |
#endif |
|
|
Line 143 struct oF oF_TRUE,oF_FALSE; |
|
Line 143 struct oF oF_TRUE,oF_FALSE; |
|
F F_TRUE = &oF_TRUE; |
F F_TRUE = &oF_TRUE; |
F F_FALSE = &oF_FALSE; |
F F_FALSE = &oF_FALSE; |
|
|
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) || defined(__MINGW64__) |
char cppname[BUFSIZ] = "c:\\asir\\stdlib\\cpp "; |
char cppname[BUFSIZ] = "c:\\asir\\stdlib\\cpp "; |
#else |
#else |
char cppname[BUFSIZ] = "/lib/cpp "; |
char cppname[BUFSIZ] = "/lib/cpp "; |
Line 282 void sprompt(char *ptr) |
|
Line 282 void sprompt(char *ptr) |
|
sprintf(ptr,"[%d] ",APVS->n); |
sprintf(ptr,"[%d] ",APVS->n); |
} |
} |
|
|
#if !defined(VISUAL) |
#if !defined(VISUAL) && !defined(__MINGW32__) && !defined(__MINGW64__) |
static int which(char *prog, char *path, char *buf, size_t size) |
static int which(char *prog, char *path, char *buf, size_t size) |
{ |
{ |
char *tok; |
char *tok; |
Line 315 static int which(char *prog, char *path, char *buf, si |
|
Line 315 static int which(char *prog, char *path, char *buf, si |
|
|
|
void cppname_init() |
void cppname_init() |
{ |
{ |
#if !defined(VISUAL) |
#if !defined(VISUAL) && !defined(__MINGW32__) && !defined(__MINGW64__) |
char *oxhome; |
char *oxhome; |
char oxcpp[BUFSIZ]; |
char oxcpp[BUFSIZ]; |
#define OXCPP "/bin/ox_cpp" |
#define OXCPP "/bin/ox_cpp" |
Line 389 void process_args(int ac,char **av) |
|
Line 389 void process_args(int ac,char **av) |
|
void GC_set_max_heap_size(int); |
void GC_set_max_heap_size(int); |
|
|
GC_set_max_heap_size(atoi(*(av+1))); av += 2; ac -= 2; |
GC_set_max_heap_size(atoi(*(av+1))); av += 2; ac -= 2; |
#if !defined(VISUAL) |
#if !defined(VISUAL) && !defined(__MINGW32__) && !defined(__MINGW64__) |
} else if ( !strcmp(*av,"-display") && (ac >= 2) ) { |
} else if ( !strcmp(*av,"-display") && (ac >= 2) ) { |
strcpy(displayname,*(av+1)); av += 2; ac -= 2; |
strcpy(displayname,*(av+1)); av += 2; ac -= 2; |
#endif |
#endif |
Line 418 void process_args(int ac,char **av) |
|
Line 418 void process_args(int ac,char **av) |
|
#include <signal.h> |
#include <signal.h> |
|
|
void sig_init() { |
void sig_init() { |
#if !defined(VISUAL) |
#if !defined(VISUAL) && !defined(__MINGW32__) && !defined(__MINGW64__) |
signal(SIGINT,int_handler); |
signal(SIGINT,int_handler); |
#else |
#else |
void register_ctrlc_handler(); |
void register_ctrlc_handler(); |
Line 439 void sig_init() { |
|
Line 439 void sig_init() { |
|
signal(SIGILL,ill_handler); |
signal(SIGILL,ill_handler); |
#endif |
#endif |
|
|
#if !defined(VISUAL) |
#if !defined(VISUAL) && !defined(__MINGW32__) && !defined(__MINGW64__) |
signal(SIGBUS,bus_handler); |
signal(SIGBUS,bus_handler); |
#endif |
#endif |
} |
} |
Line 469 void resetenv(char *s) |
|
Line 469 void resetenv(char *s) |
|
while ( NEXT(asir_infile) ) |
while ( NEXT(asir_infile) ) |
closecurrentinput(); |
closecurrentinput(); |
resetpvs(); |
resetpvs(); |
#if !defined(VISUAL) |
#if !defined(VISUAL) && !defined(__MINGW32__) && !defined(__MINGW64__) |
if ( do_server_in_X11 ) |
if ( do_server_in_X11 ) |
#endif |
#endif |
show_debug_window(0); |
show_debug_window(0); |
Line 480 void resetenv(char *s) |
|
Line 480 void resetenv(char *s) |
|
/* restore states */ |
/* restore states */ |
reset_engine(); |
reset_engine(); |
reset_io(); |
reset_io(); |
#if !defined(VISUAL) |
#if !defined(VISUAL) && !defined(__MINGW32__) && !defined(__MINGW64__) |
reset_timer(); |
reset_timer(); |
#endif |
#endif |
LONGJMP(main_env,1); |
LONGJMP(main_env,1); |
Line 511 void int_handler(int sig) |
|
Line 511 void int_handler(int sig) |
|
caught_intr = 1; |
caught_intr = 1; |
return; |
return; |
} |
} |
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) || defined(__MINGW64__) |
suspend_timer(); |
suspend_timer(); |
#endif |
#endif |
signal(SIGINT,SIG_IGN); |
signal(SIGINT,SIG_IGN); |
#if !defined(VISUAL) |
#if !defined(VISUAL) && !defined(__MINGW32__) && !defined(__MINGW64__) |
if ( do_server_in_X11 ) { |
if ( do_server_in_X11 ) { |
debug(PVSS?((VS)BDY(PVSS))->usrf->f.usrf->body:0); |
debug(PVSS?((VS)BDY(PVSS))->usrf->f.usrf->body:0); |
restore_handler(); |
restore_handler(); |
Line 609 void int_handler(int sig) |
|
Line 609 void int_handler(int sig) |
|
} |
} |
|
|
void restore_handler() { |
void restore_handler() { |
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) || defined(__MINGW64__) |
resume_timer(); |
resume_timer(); |
#endif |
#endif |
#if defined(SIGINT) |
#if defined(SIGINT) |
Line 697 void error(char *s) |
|
Line 697 void error(char *s) |
|
{ |
{ |
SNODE *snp=0; |
SNODE *snp=0; |
|
|
#if !defined(VISUAL) |
#if !defined(VISUAL) && !defined(__MINGW32__) && !defined(__MINGW64__) |
if ( !error_in_timer && timer_is_set ) |
if ( !error_in_timer && timer_is_set ) |
alrm_handler(SIGNAL_FOR_TIMER); |
alrm_handler(SIGNAL_FOR_TIMER); |
#endif |
#endif |
Line 734 void goto_toplevel(char *s) |
|
Line 734 void goto_toplevel(char *s) |
|
{ |
{ |
SNODE *snp=0; |
SNODE *snp=0; |
|
|
#if !defined(VISUAL) |
#if !defined(VISUAL) && !defined(__MINGW32__) && !defined(__MINGW64__) |
if ( timer_is_set ) |
if ( timer_is_set ) |
alrm_handler(SIGNAL_FOR_TIMER); |
alrm_handler(SIGNAL_FOR_TIMER); |
#endif |
#endif |
Line 749 void goto_toplevel(char *s) |
|
Line 749 void goto_toplevel(char *s) |
|
resetenv("return to toplevel"); |
resetenv("return to toplevel"); |
} |
} |
|
|
#if !defined(VISUAL) |
#if !defined(VISUAL) && !defined(__MINGW32__) && !defined(__MINGW64__) |
#include <sys/time.h> |
#include <sys/time.h> |
|
|
void set_timer(int interval) |
void set_timer(int interval) |
Line 826 char *scopyright() |
|
Line 826 char *scopyright() |
|
return notice; |
return notice; |
} |
} |
|
|
#if defined(VISUAL) |
#if defined(VISUAL) || defined(__MINGW32__) || defined(__MINGW64__) |
void check_intr() |
void check_intr() |
{ |
{ |
extern int recv_intr; |
extern int recv_intr; |