Removed log messages
This commit is contained in:
parent
ac0baf94ed
commit
f9607006d5
|
@ -79,8 +79,7 @@ let fnn =
|
||||||
evaluationParams: ExpressionTypes.ExpressionTree.evaluationParams,
|
evaluationParams: ExpressionTypes.ExpressionTree.evaluationParams,
|
||||||
name,
|
name,
|
||||||
args: array(node),
|
args: array(node),
|
||||||
) =>{
|
) =>
|
||||||
Js.log3("HERE", name, args);
|
|
||||||
switch (
|
switch (
|
||||||
name,
|
name,
|
||||||
ExpressionTypes.ExpressionTree.Environment.get(
|
ExpressionTypes.ExpressionTree.Environment.get(
|
||||||
|
@ -121,4 +120,3 @@ let fnn =
|
||||||
| ("to", _) => to_(args)
|
| ("to", _) => to_(args)
|
||||||
| _ => Error("Function not found")
|
| _ => Error("Function not found")
|
||||||
};
|
};
|
||||||
}
|
|
||||||
|
|
|
@ -356,7 +356,6 @@ let fromString2 = str => {
|
||||||
Inside of this function, MathAdtToDistDst is called whenever a distribution function is encountered.
|
Inside of this function, MathAdtToDistDst is called whenever a distribution function is encountered.
|
||||||
*/
|
*/
|
||||||
let mathJsToJson = str |> pointwiseToRightLogShift |> Mathjs.parseMath;
|
let mathJsToJson = str |> pointwiseToRightLogShift |> Mathjs.parseMath;
|
||||||
Js.log2("HI", mathJsToJson);
|
|
||||||
let mathJsParse =
|
let mathJsParse =
|
||||||
E.R.bind(mathJsToJson, r => {
|
E.R.bind(mathJsToJson, r => {
|
||||||
switch (MathJsonToMathJsAdt.run(r)) {
|
switch (MathJsonToMathJsAdt.run(r)) {
|
||||||
|
@ -366,7 +365,6 @@ let fromString2 = str => {
|
||||||
});
|
});
|
||||||
|
|
||||||
let value = E.R.bind(mathJsParse, MathAdtToDistDst.run);
|
let value = E.R.bind(mathJsParse, MathAdtToDistDst.run);
|
||||||
Js.log3("HI", mathJsParse, value);
|
|
||||||
value;
|
value;
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
|
@ -108,15 +108,14 @@ module Internals = {
|
||||||
let runProgram = (inputs: inputs, p: ExpressionTypes.Program.program) => {
|
let runProgram = (inputs: inputs, p: ExpressionTypes.Program.program) => {
|
||||||
let ins = ref(inputs);
|
let ins = ref(inputs);
|
||||||
p
|
p
|
||||||
|> E.A.fmap(statement => {
|
|> E.A.fmap(
|
||||||
Js.log2("Running ling", statement);
|
fun
|
||||||
switch (statement) {
|
| `Assignment(name, node) => {
|
||||||
| `Assignment(name, node) =>
|
ins := addVariable(ins^, name, node);
|
||||||
ins := addVariable(ins^, name, node);
|
None;
|
||||||
None;
|
}
|
||||||
| `Expression(node) => Some(runNode(ins^, node))
|
| `Expression(node) => Some(runNode(ins^, node)),
|
||||||
};
|
)
|
||||||
})
|
|
||||||
|> E.A.O.concatSomes
|
|> E.A.O.concatSomes
|
||||||
|> E.A.R.firstErrorOrOpen;
|
|> E.A.R.firstErrorOrOpen;
|
||||||
};
|
};
|
||||||
|
@ -127,7 +126,6 @@ module Internals = {
|
||||||
|> E.R.bind(_, r =>
|
|> E.R.bind(_, r =>
|
||||||
E.A.last(r)
|
E.A.last(r)
|
||||||
|> E.O.toResult("No rendered lines")
|
|> E.O.toResult("No rendered lines")
|
||||||
|> (e => {Js.log2("EE", e); e})
|
|
||||||
|> E.R.fmap(Shape.T.normalize)
|
|> E.R.fmap(Shape.T.normalize)
|
||||||
);
|
);
|
||||||
};
|
};
|
||||||
|
|
Loading…
Reference in New Issue
Block a user