优化Lens库中foldlOf'函数的性能分析
2025-07-05 09:56:51作者:凌朦慧Richard
在Haskell的Lens库中,foldlOf'
函数是一个重要的折叠操作工具,但近期发现其在某些情况下性能表现不佳。本文将深入分析问题原因,并提出有效的优化方案。
问题背景
foldlOf'
函数是Lens库中用于严格左折叠的核心函数,其类型签名和实现如下:
foldlOf' :: Getting (Endo (Endo r)) s a -> (r -> a -> r) -> r -> s -> r
foldlOf' l f z0 xs = ...
与之相关的sumOf
函数则利用foldlOf'
实现数值求和:
sumOf :: Num a => Getting (Endo (Endo a)) s a -> s -> a
sumOf l = foldlOf' l (+) 0
性能瓶颈分析
通过基准测试发现,当使用sumOf
对列表或向量进行求和操作时,性能表现远低于预期。深入调查后发现问题的根源在于GHC的优化阶段:
- 内联时机不当:GHC不会内联
foldlOf'
的函数体,除非它接收到全部4个参数 - 特化失败:
sumOf
等组合子只传递了3个参数,导致无法正确特化 - 核心代码膨胀:生成的中间代码不够紧凑,影响了最终性能
优化方案
解决这一问题的关键在于调整参数传递方式,将xs
参数从左侧移到右侧的lambda表达式中:
xfoldlOf' :: Getting (Endo (Endo r)) s a -> (r -> a -> r) -> r -> s -> r
xfoldlOf' l f z0 = \xs ->
let f' x (Endo k) = Endo $ \z -> k $! f z x
in foldrOf l f' (Endo id) xs `appEndo` z0
这种修改带来了显著的性能提升:
- 列表求和:性能提升约8倍
- 向量求和:性能提升约50倍
- 内存分配:从2.080e6减少到160.1e3
基准测试验证
通过精心设计的基准测试验证了优化效果:
sumListLens :: [Double] -> Double
sumListLens = sumOf traverse
xsumListLens :: [Double] -> Double
xsumListLens = xsumOf traverse
foldlListLens :: [Double] -> Double
foldlListLens = foldlOf' traverse (+) 0
foldlListLensEtaExpand :: [Double] -> Double
foldlListLensEtaExpand xs = foldlOf' traverse (+) 0 xs
测试结果显示,优化后的版本在循环周期和内存分配上都有显著改善。
未来改进方向
- 自动化性能测试:考虑添加基于分配计数的测试,确保核心优化不被意外破坏
- 更广泛的基准测试:将微基准测试纳入项目测试套件
- 深入优化其他组合子:将类似优化应用于其他可能受益的高阶函数
结论
通过对foldlOf'
函数参数传递方式的简单调整,我们实现了显著的性能提升。这一案例再次证明了理解GHC优化行为的重要性,特别是在处理高阶函数和组合子时。这种优化不仅适用于Lens库,也为其他Haskell库的性能调优提供了有价值的参考。
登录后查看全文
热门项目推荐
HunyuanImage-3.0
HunyuanImage-3.0 统一多模态理解与生成,基于自回归框架,实现文本生成图像,性能媲美或超越领先闭源模型00ops-transformer
本项目是CANN提供的transformer类大模型算子库,实现网络在NPU上加速计算。C++043Hunyuan3D-Part
腾讯混元3D-Part00GitCode-文心大模型-智源研究院AI应用开发大赛
GitCode&文心大模型&智源研究院强强联合,发起的AI应用开发大赛;总奖池8W,单人最高可得价值3W奖励。快来参加吧~0286Hunyuan3D-Omni
腾讯混元3D-Omni:3D版ControlNet突破多模态控制,实现高精度3D资产生成00Spark-Chemistry-X1-13B
科大讯飞星火化学-X1-13B (iFLYTEK Spark Chemistry-X1-13B) 是一款专为化学领域优化的大语言模型。它由星火-X1 (Spark-X1) 基础模型微调而来,在化学知识问答、分子性质预测、化学名称转换和科学推理方面展现出强大的能力,同时保持了强大的通用语言理解与生成能力。Python00GOT-OCR-2.0-hf
阶跃星辰StepFun推出的GOT-OCR-2.0-hf是一款强大的多语言OCR开源模型,支持从普通文档到复杂场景的文字识别。它能精准处理表格、图表、数学公式、几何图形甚至乐谱等特殊内容,输出结果可通过第三方工具渲染成多种格式。模型支持1024×1024高分辨率输入,具备多页批量处理、动态分块识别和交互式区域选择等创新功能,用户可通过坐标或颜色指定识别区域。基于Apache 2.0协议开源,提供Hugging Face演示和完整代码,适用于学术研究到工业应用的广泛场景,为OCR领域带来突破性解决方案。00- HHowToCook程序员在家做饭方法指南。Programmer's guide about how to cook at home (Chinese only).Dockerfile09
- PpathwayPathway is an open framework for high-throughput and low-latency real-time data processing.Python00
项目优选
收起

deepin linux kernel
C
22
6

OpenHarmony documentation | OpenHarmony开发者文档
Dockerfile
161
2.05 K

Nop Platform 2.0是基于可逆计算理论实现的采用面向语言编程范式的新一代低代码开发平台,包含基于全新原理从零开始研发的GraphQL引擎、ORM引擎、工作流引擎、报表引擎、规则引擎、批处理引引擎等完整设计。nop-entropy是它的后端部分,采用java语言实现,可选择集成Spring框架或者Quarkus框架。中小企业可以免费商用
Java
8
0

React Native鸿蒙化仓库
C++
198
279

本项目是CANN提供的数学类基础计算算子库,实现网络在NPU上加速计算。
C++
535
62

Ascend Extension for PyTorch
Python
50
81

🎉 (RuoYi)官方仓库 基于SpringBoot,Spring Security,JWT,Vue3 & Vite、Element Plus 的前后端分离权限管理系统
Vue
950
556

旨在打造算法先进、性能卓越、高效敏捷、安全可靠的密码套件,通过轻量级、可剪裁的软件技术架构满足各行业不同场景的多样化要求,让密码技术应用更简单,同时探索后量子等先进算法创新实践,构建密码前沿技术底座!
C
1 K
397

本项目是CANN开源社区的核心管理仓库,包含社区的治理章程、治理组织、通用操作指引及流程规范等基础信息
385
19

openGauss kernel ~ openGauss is an open source relational database management system
C++
146
191