# HG changeset patch # User pouya@nohup.io # Date 1612720691 -3600 # Sun Feb 07 18:58:11 2021 +0100 # Node ID 898ed63c4ce66b2e17f230e1b05a454273d2c60a # Parent 560f527c245eecba05297d7f0d3348785e17745e remove leftover files diff --git a/sky/cmd/test_cmd.c b/sky/cmd/test_cmd.c deleted file mode 100644 --- a/sky/cmd/test_cmd.c +++ /dev/null @@ -1,92 +0,0 @@ -#include -#include -#include -#include - -#include "lex.h" - -#include "dat.h" -#include "fns.h" - -enum -{ - STACK = 256*1024, -}; - -double -runeatof(Rune *s) -{ - char cs[Ltoksize+1], *c; - int i; - - for(i=0, c=cs; istr); - a = runeatof(argv->str); - print("(%f) ", a); - sum += a; - } - print("=> %f\n", sum); - return 0; -} - -int -mult(Tok *argv, int argc) -{ - int i; - double a, prod; - - print("mult "); - for(i=0, prod=1; istr); - a = runeatof(argv->str); - print("(%f) ", a); - prod *= a; - } - print("=> %f\n", prod); - return 0; -} - -void -threadmain(int argc, char *argv[]) -{ - Cmdctxt *ctxt; - Cmd c; - - if((ctxt = mkcmdctxt(0)) == nil) - sysfatal("out of memory!"); - - runestrcpy(c.str, L"add"); - c.argc = 2; - c.argtyp[0] = c.argtyp[1] = c.argtyp[2] = Tdecimal; - c.fun = &add; - cmdreg(ctxt, &c); - - c.argc = 3; - cmdreg(ctxt, &c); - - runestrcpy(c.str, L"mult"); - c.argc = 2; - c.fun = &mult; - cmdreg(ctxt, &c); - - c.argc = 3; - cmdreg(ctxt, &c); - - proccreate(&cmdproc, ctxt, STACK); - - for(;;); -} diff --git a/sky/cmd/test_lex.c b/sky/cmd/test_lex.c deleted file mode 100644 --- a/sky/cmd/test_lex.c +++ /dev/null @@ -1,61 +0,0 @@ -#include -#include -#include -#include - -#include "lex.h" - -#include "dat.h" -#include "fns.h" - -enum -{ - STACK = 64*1024, -}; - -void -parseproc(void *arg) -{ - Lexer l; - Tok t; - - linit(&l, 0, lexstart()); - - while(t = lnexttok(&l), t.typ != Teof){ - print("next: %d > ", t.typ); - switch(t.typ){ - case Teof: - print("Teof: "); - break; - case Terror: - print("Terror: "); - break; - case Tcmd: - print("Tcmd: "); - break; - case Teos: - print("Teos: "); - break; - case Tidentifier: - print("Tidentifier: "); - break; - case Tdecimal: - print("Tdecimal: "); - break; - case Tstr: - print("Tstr: "); - break; - } - print("%S\n", t.str); - } - - exits(0); -} - -void -threadmain(int argc, char *argv[]) -{ - proccreate(&parseproc, nil, STACK); - - for(;;); -}