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），但在浏览器中不一定能正确的显示出来这个§⃒。

引用

参考书目
 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.

过程式编程语言