34 lines
1010 B
C
34 lines
1010 B
C
#include "scheme48.h"
|
|
|
|
extern void s48_init_window();
|
|
extern void s48_init_display();
|
|
extern void s48_init_type();
|
|
extern void s48_init_color();
|
|
extern void s48_init_colormap();
|
|
extern void s48_init_pixel();
|
|
extern void s48_init_gcontext();
|
|
extern void s48_init_event();
|
|
extern void s48_init_pixmap();
|
|
extern void s48_init_graphics();
|
|
extern void s48_init_font();
|
|
|
|
int main(){
|
|
s48_add_external_init(s48_init_window);
|
|
s48_add_external_init(s48_init_display);
|
|
s48_add_external_init(s48_init_type);
|
|
s48_add_external_init(s48_init_color);
|
|
s48_add_external_init(s48_init_color);
|
|
s48_add_external_init(s48_init_colormap);
|
|
s48_add_external_init(s48_init_pixel);
|
|
s48_add_external_init(s48_init_gcontext);
|
|
s48_add_external_init(s48_init_event);
|
|
s48_add_external_init(s48_init_pixmap);
|
|
s48_add_external_init(s48_init_graphics);
|
|
s48_add_external_init(s48_init_font);
|
|
|
|
s48_main(8000000, 64000,
|
|
"/afs/wsi/home/dfreese/i386_fbsd43/scsh-0.6/lib/scheme48/scsh.image",
|
|
0,(char**) 0);
|
|
}
|
|
|