roswell.roswell/src/cmd-run.h
SZTK bae37247f1
Fix declaration-definition disagreement in src/cmd-run.h (see Issue #604) (#605)
* Fix declaration-definition disagreement in src/cmd-run.h (see Issue #604)

* Also fix the return type of register_runtime_options in src/cmd-run.h L27
2025-08-13 04:03:03 +09:00

40 lines
1.5 KiB
C

#ifndef __CMD_RUN_H__
#define __CMD_RUN_H__
#include "opt.h"
#define ROS_RUN_REPL "run"
#define DEFAULT_IMPL "sbcl-bin"
typedef char** (*cmd_run_impl)(int argc,char** argv,struct sub_command* cmd);
struct run_impl_t {
char* name;
cmd_run_impl impl;
};
extern char** cmd_run_sbcl(int argc,char** argv,struct sub_command* cmd);
extern char** cmd_run_ccl(int argc,char** argv,struct sub_command* cmd);
extern char** cmd_run_clasp(int argc,char** argv,struct sub_command* cmd);
extern char** cmd_run_clisp(int argc,char** argv,struct sub_command* cmd);
extern char** cmd_run_ecl(int argc,char** argv,struct sub_command* cmd);
extern char** cmd_run_abcl(int argc,char** argv,struct sub_command* cmd);
extern char** cmd_run_cmu(int argc,char** argv,struct sub_command* cmd);
extern char** cmd_run_acl(int argc,char** argv,struct sub_command* cmd);
extern char** cmd_run_lispworks(int argc,char** argv,struct sub_command* cmd);
extern char** cmd_run_mkcl(int argc,char** argv,struct sub_command* cmd);
extern char** cmd_run_npt(int argc,char** argv,struct sub_command* cmd);
extern struct proc_opt* register_runtime_options(struct proc_opt* cmd);
int setup(char* target,char* env,char* impl);
#define SETUP_SYSTEM(sys,msg) {\
cond_printf(0,"%s",msg); \
cond_printf(1,"%s\n",sys); \
int ret=System(sys); \
s(sys); \
if(ret) { \
lock_apply("setup",1); \
return ret; \
} \
}
#endif