CPL語言

CPL（，原名），一種計算機程式語言。源自於ALGOL 60，在1963年，由英国的剑桥大学和伦敦大学首先開發出來。CPL语言在ALGOL 60的基础上更接近硬件一些，但规模比较大，难以实现。BCPL是它的後繼語言。

例子
函数MAX由Peter Norvig公式化为如下：
Max(Items, ValueFunction) = value of
§ (Best, BestVal) = (NIL, -∞)
  while Items do §
    (Item, Val) = (Head(Items), ValueFunction(Head(Items)))
    if Val > BestVal then (Best, BestVal) := (Item, Val)
    Items := Rest(Items) §⃒
  result is Best §⃒

与开符号§相匹配的闭符号是有竖杠贯穿的§。这个符号在Unicode中可以复合为§⃒，它是§（U+00A7）复合于 ⃒（U+20D2），但在浏览器中不一定能正确的显示出来这个§⃒。

 实现 
据认为CPL在1960年代从未被完全实现，它是作为具有一些关于部份实现的研究工作的理论性构造而存在的。

Peter Norvig曾经用Yapps（一个Python编译器生成器）为现代机器写出了一个简单的CPL到Python转译器。

引用

参考书目
 Collected papers of Christopher Strachey, section pertaining to CPL, archived at the Bodleian Library, Oxford; CSAC 71.1.80/C.136-C.184

 J. Buxton, J. C. Gray, and D. Park. CPL Elementary Programming Manual, Edition II (Cambridge).
 University of London Institute of Computer Science and The Mathematical Laboratory, Cambridge. CPL Working Papers.

Category:过程式编程语言