summaryrefslogtreecommitdiffhomepage
path: root/src
diff options
context:
space:
mode:
authorYukihiro Matsumoto <[email protected]>2012-05-18 22:32:10 +0900
committerYukihiro Matsumoto <[email protected]>2012-05-18 22:32:10 +0900
commit00c419f0665a57eed8581676952f6ebc402f755c (patch)
tree27766bec44f47d959da50554b4e1d41b96f5ff6f /src
parent53f74d50ae341beb20e0f875a7ba7bf252c9101e (diff)
downloadmruby-00c419f0665a57eed8581676952f6ebc402f755c.tar.gz
mruby-00c419f0665a57eed8581676952f6ebc402f755c.zip
remove obsolete minimain.c
Diffstat (limited to 'src')
-rw-r--r--src/minimain.c123
1 files changed, 0 insertions, 123 deletions
diff --git a/src/minimain.c b/src/minimain.c
deleted file mode 100644
index ffaaf0d0b..000000000
--- a/src/minimain.c
+++ /dev/null
@@ -1,123 +0,0 @@
-/*
-** minimain.c -
-**
-** See Copyright Notice in mruby.h
-*/
-
-#include "mruby.h"
-#include "mruby/proc.h"
-
-#if 0
-#include "opcode.h"
-
-mrb_code fib_iseq[256];
-
-int fib_syms[4];
-
-mrb_irep fib_irep = {
- 1,
- MRB_IREP_NOFREE,
- 2,
- 5,
- fib_iseq,
- NULL,
- fib_syms,
-
- 256, 0, 4,
-};
-
-mrb_code main_iseq[256];
-
-int main_syms[2];
-
-mrb_irep main_irep = {
- 0,
- MRB_IREP_NOFREE,
- 1,
- 3,
- main_iseq,
- NULL,
- main_syms,
-
- 256, 0, 2,
-};
-
-int
-main(int argc, char **argv)
-{
- mrb_state *mrb = mrb_open();
- int sirep = mrb->irep_len;
- int n;
-
- main_syms[0] = mrb_intern(mrb, "fib");
- main_syms[1] = mrb_intern(mrb, "p");
- n = 0;
-
- main_iseq[n++] = MKOP_AB(OP_LAMBDA, 1, 1); /* r1 := lambda(1) */
- main_iseq[n++] = MKOP_AB(OP_METHOD, 1, 0); /* defmethod(r1) */
- main_iseq[n++] = MKOP_AB(OP_MOVE, 1, 0); /* r1 := r0 */
- main_iseq[n++] = MKOP_AB(OP_MOVE, 2, 0); /* r2 := r0 */
- main_iseq[n++] = MKOP_AsBx(OP_LOADI, 3, 35); /* r3 := 20 */
- main_iseq[n++] = MKOP_ABC(OP_SEND, 2, 0, 1); /* r2 .fib r3 */
- main_iseq[n++] = MKOP_ABC(OP_SEND, 1, 1, 1); /* r1 .p r2 */
- main_iseq[n++] = MKOP_ABC(OP_STOP, 1, 1, 2); /* stop */
- main_irep.ilen = n;
- main_irep.idx = sirep;
-
- fib_syms[0] = mrb_intern(mrb, "<");
- fib_syms[1] = mrb_intern(mrb, "-");
- fib_syms[2] = mrb_intern(mrb, "+");
- fib_syms[3] = mrb_intern(mrb, "fib");
- n = 0;
-
- fib_iseq[n++] = MKOP_AB(OP_MOVE, 2, 1); /* r2 := r1 */
- fib_iseq[n++] = MKOP_AsBx(OP_LOADI, 3, 3); /* r3 := 2 */
- fib_iseq[n++] = MKOP_ABC(OP_LT, 2, 0, 2); /* r2 .< r3 */
- fib_iseq[n++] = MKOP_AsBx(OP_JMPNOT, 2, 2); /* ifnot r2 :else */
- fib_iseq[n++] = MKOP_AsBx(OP_LOADI, 2, 1); /* r6 := 1 */
- fib_iseq[n++] = MKOP_A(OP_RETURN, 2); /* return r2 */
- fib_iseq[n++] = MKOP_AB(OP_MOVE, 3, 0); /* r3 := r0 :else */
- fib_iseq[n++] = MKOP_AB(OP_MOVE, 4, 1); /* r4 := r1 */
- fib_iseq[n++] = MKOP_ABC(OP_SUBI, 4, 1, 2); /* r4 .- 2 */
- fib_iseq[n++] = MKOP_ABC(OP_SEND, 3, 3, 1); /* r3 .fib r4 */
- fib_iseq[n++] = MKOP_AB(OP_MOVE, 4, 0); /* r4 := r0 */
- fib_iseq[n++] = MKOP_AB(OP_MOVE, 5, 1); /* r5 := r1 */
- fib_iseq[n++] = MKOP_ABC(OP_SUBI, 5, 1, 1); /* r5 .- 1 */
- fib_iseq[n++] = MKOP_ABC(OP_SEND, 4, 3, 1); /* r4 .fib :r5 */
- fib_iseq[n++] = MKOP_ABC(OP_ADD, 3, 2, 1); /* r3 .+ r4 */
- fib_iseq[n++] = MKOP_A(OP_RETURN, 3); /* return r3 */
- fib_irep.ilen = n;
- fib_irep.idx = sirep+1;
-
- mrb_add_irep(mrb, sirep+2);
- mrb->irep[sirep ] = &main_irep;
- mrb->irep[sirep+1] = &fib_irep;
-
- mrb_run(mrb, mrb_proc_new(mrb, &main_irep), mrb_nil_value());
-}
-
-#else
-#include "compile.h"
-
-int
-main()
-{
- mrb_state *mrb = mrb_open();
- int n;
-
- n = mrb_compile_string(mrb, "\
-def fib(n)\n\
- if n<2\n\
- n\n\
- else\n\
- fib(n-2)+fib(n-1)\n\
- end\n\
-end\n\
-p(fib(30), \"\\n\")\n\
-");
- mrb_run(mrb, mrb_proc_new(mrb, mrb->irep[n]), mrb_nil_value());
-
- return 0;
-}
-
-#endif