private GSCore execWhile(GSCoreCollection args) { GSCoreCollection commands = args.getSublist(1); GSCore r = null; while (ExecuteElement(args.getSafe(0)).getBooleanValue()) { foreach (GSCore cmd in commands) { r = ExecuteElement(cmd); if (r is GSReturn) { break; } } if (r is GSReturn) { GSReturn ret = r as GSReturn; if (ret.Type == GSReturn.TYPE_BREAK) { break; } if (ret.Type == GSReturn.TYPE_RETURN) { return(ret); } } } return(GSVoid.Void); }
private GSCore execForeach(GSCoreCollection args) { if (args.Count < 4) { Debugger.Log(0, "", "Insufficient arguments for (FOREACH varName : list commands ) "); return(null); } GSCore t1 = args.getSafe(0); GSCore l1 = ExecuteElement(args.getSafe(2)); if (!(t1 is GSToken)) { Debugger.Log(0, "", "Token shoudl be second argument in FOREACH "); return(null); } if (!(l1 is GSList)) { Debugger.Log(0, "", "List should be fourth argument in FOREACH "); return(null); } GSToken tk = (GSToken)t1; GSList lst = (GSList)l1; GSCore r = null; int ik = 0; foreach (GSCore item in lst.Parts) { SetVariable(tk.Token, item); for (int i = 3; i < args.Count; i++) { r = ExecuteElement(args.getSafe(i)); if (r is GSReturn) { break; } } ik++; if (r is GSReturn) { GSReturn ret = r as GSReturn; if (ret.Type == GSReturn.TYPE_BREAK) { break; } if (ret.Type == GSReturn.TYPE_RETURN) { return(ret); } } } return(new GSInt64(ik)); }
public override GSCore ExecuteMessage(string token, GSCoreCollection args) { GSCore result = null; if (token.Equals("print")) { result = execPrint(args, false); } else if (token.Equals("println")) { result = execPrint(args, true); } else if (token.Equals("if")) { result = execIf(args); } else if (token.Equals("while")) { result = execWhile(args); } else if (token.Equals("foreach")) { result = execForeach(args); } else if (token.Equals("x")) { result = execMessage(args); } else if (token.Equals("do")) { result = execDo(args); } else if (token.Equals("return")) { result = new GSReturn(args.getSafe(0)); } else if (token.Equals("break")) { result = new GSReturn(GSReturn.TYPE_BREAK); } else if (token.Equals("continue")) { result = new GSReturn(GSReturn.TYPE_CONTINUE); } else if (token.Equals("set") && args.Count > 1) { result = execSet(args[0], args[1]); } else if (token.Equals("random")) { result = execRandom(args); } else { if (token.IndexOf('.') >= 0) { string[] tp = token.Split('.'); GSCore obj = this; for (int a = 0; a < tp.Length - 1; a++) { if (obj == null) { break; } obj = obj.GetPropertyValue(tp[a]); } if (obj != null) { return(obj.ExecuteMessage(tp[tp.Length - 1], args)); } } Debugger.Log(0, "", "UNKNOWN MESSAGE: " + token + " "); } return(result); }