Parent Directory | Revision Log | Patch
revision 28 by dpavlin, Mon Jul 30 15:52:22 2007 UTC | revision 29 by dpavlin, Mon Jul 30 17:32:41 2007 UTC | |
---|---|---|
# | Line 117 int main(int argc, char **argv) { | Line 117 int main(int argc, char **argv) { |
117 | "use M6502; print \"Loaded M6502 module\n\";"}; | "use M6502; print \"Loaded M6502 module\n\";"}; |
118 | my_perl = perl_alloc(); | my_perl = perl_alloc(); |
119 | perl_construct(my_perl); | perl_construct(my_perl); |
120 | if (perl_parse(my_perl, NULL, 3, command_line, (char **)NULL)) { | if (perl_parse(my_perl, xs_init, 3, command_line, (char **)NULL)) { |
121 | printf("Failed to parse\n"); | printf("Failed to parse\n"); |
122 | return 0; | return 0; |
123 | } | } |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |