@@ -95,7 +95,7 @@ construct_cap_expression cap_string build_results = do
95 , param_count = out_param_count build_results
95 , param_count = out_param_count build_results
96 , param_ops = out_param_ops build_results
96 , param_ops = out_param_ops build_results
98− return $! expr `using` rdeepseq
98+ return (demanding expr (rnf expr))
100type CapParser a = GenParser Char BuildState a
100type CapParser a = GenParser Char BuildState a