diff --git a/packages/squiggle-lang/src/js/rescript_interop.ts b/packages/squiggle-lang/src/js/rescript_interop.ts index 3bc7ccbb..7bb98b5d 100644 --- a/packages/squiggle-lang/src/js/rescript_interop.ts +++ b/packages/squiggle-lang/src/js/rescript_interop.ts @@ -96,7 +96,7 @@ export type squiggleExpression = | tagged<"number", number> | tagged<"date", Date> | tagged<"timeDuration", number> - | tagged<"record", { [key: string]: squiggleExpression }> + | tagged<"record", { [key: string]: squiggleExpression }>; export { lambdaValue }; diff --git a/packages/squiggle-lang/src/rescript/ReducerInterface/ReducerInterface_DateTime.res b/packages/squiggle-lang/src/rescript/ReducerInterface/ReducerInterface_DateTime.res index ee7b1a7c..0fcd04e9 100644 --- a/packages/squiggle-lang/src/rescript/ReducerInterface/ReducerInterface_DateTime.res +++ b/packages/squiggle-lang/src/rescript/ReducerInterface/ReducerInterface_DateTime.res @@ -1,11 +1,11 @@ module ExpressionValue = ReducerInterface_ExpressionValue type expressionValue = ExpressionValue.expressionValue -let dateDispatch = (call: ExpressionValue.functionCall, env: DistributionOperation.env): option< +let dateDispatch = (call: ExpressionValue.functionCall, _: DistributionOperation.env): option< result, > => { switch call { - | ("toString", [EvDate(t)]) => EvString(DateTime.Date.toString(t))->Ok->Some + | ("toString", [EvDate(t)]) => ExpressionValue.EvString(DateTime.Date.toString(t))->Ok->Some | ("makeDateFromYear", [EvNumber(year)]) => switch DateTime.Date.makeFromYear(year) { | Ok(t) => EvDate(t)->Ok->Some