跳转到内容

Modula-2

本页使用了标题或全文手工转换
维基百科,自由的百科全书
Modula-2
编程范型指令式结构化模块化数据和方法隐藏英语information hiding并发
语言家族Wirth Modula
设计者尼克劳斯·维尔特
发行时间1978年,​46年前​(1978
类型系统强,静态
系统平台Lilith英语Lilith (computer)AMD 2901英语AMD Am2900
操作系统跨平台
文件扩展名.mod .m2 .def .MOD .DEF .mi .md
网站www.modula2.org
主要实现产品
Niklaus Wirth编写的ETH编译器, GNU Modula-2, ADW Modula-2
派生副语言
PIM2、PIM3、PIM4、ISO
启发语言
Modula, Mesa, Pascal, ALGOL W, Euclid英语Euclid (programming language)
影响语言
Modula-3, Oberon, Ada, Fortran, Lua, Seed7英语Seed7, Zonnon英语Zonnon, Modula-GM

Modula-2,是一种通用的结构化过程式编程语言,由尼克劳斯·维尔特在1978年至1985年间于苏黎世联邦理工学院开发。它具有充分的灵活性用于系统编程,和更加广阔应用领域。特别是,它被设计为以一种直接的方式支持分离编译和数据抽象。它的很多语法基于了维尔特早先的周知语言Pascal

历史

[编辑]

在1976年至1977年年间,维尔特在Xerox Palo Alto研究中心,与一群设计Alto电脑的工作伙伴一同工作。1978年,维尔特在瑞士联邦理工学院信息研究所,根据其早期对Pascal编程语言Modula模块编程语言、及Alto电脑的经验,定义了Modula-2语言,他还开始了一个Lilith英语Lilith (computer)个人电脑项目。

Modula-2语言本身与Lilith结构之设计,都以优雅及简单为原则,是以Modula-2为Lilith的系统编程语言,而不需用到汇编器,并且以Lilith为Modula-2的组织架构。为此,Modula-2语言不仅要适用于编写高阶的应用程序,也要应适用于编写低端的与机器相关的编码程序,用于设备的操控与存储体的配置。

Modula-2提供了一些标准程序库模块,如异常处置、字符串处理、输入/输出及并发程序设计等,通过重复使用它们来降低语言本身的复杂度。在Lilith项目从1978年到1988年的整个生命期中,操作系统、绘图套装软件、数据库系统、网络协议、文件服务器,及许多其他系统和应用模块,都是借着Modula-2发展出来的。

描述

[编辑]

Modula-2被设计为显著的类似于Pascal,移除了一些元素和语法歧义,增补了“模块”这个重要概念,并且对多道程序有直接的语言支持。维尔特将Modula-2看作他早期的编程语言PascalModula的后继者[1][2]。主要的概念是:

  1. 模块是分离编译的编译单元。
  2. 协程并发处理的基本建造块。
  3. 类型和过程允许访问特定于机器的数据。

Modula-2提供了(有限的)单处理器并发(监视器协程和显式控制转移)和硬件访问(绝对地址、位操纵和中断)。它使用了名称类型系统英语nominal type system。Modula-2语言允许使用一趟编译器英语One-pass compilerGutknecht英语Jürg Gutknecht和维尔特的这种编译器大致上比早前的多趟编译器英语Multi-pass compiler要快上四倍[3]

Modula-2有两种主要方言:PIM和ISO/IEC 10514-1:1996,PIM得名于Niklaus Wirth的著作《Programming in Modula-2》[4],这本书一共有四个版本,成为方言的是PIM2(1983年)、PIM3(1985年)和PIM4(1988年)。

例子代码

[编辑]

下面是"Hello world"程序的Modula-2源代码例子:

MODULE Hello;
  FROM STextIO IMPORT WriteString;
BEGIN
  WriteString("Hello World!");
END Hello.

语言元素

[编辑]

保留字

[编辑]

PIM版本2、3、4定义了40个保留字

AND         ELSIF           LOOP       REPEAT
ARRAY       END             MOD        RETURN
BEGIN       EXIT            MODULE     SET
BY          EXPORT          NOT        THEN
CASE        FOR             OF         TO
CONST       FROM            OR         TYPE
DEFINITION  IF              POINTER    UNTIL
DIV         IMPLEMENTATION  PROCEDURE  VAR
DO          IMPORT          QUALIFIED  WHILE
ELSE        IN              RECORD     WITH

内置标识符

[编辑]

PIM版本3、4定义了29个内置标识符

ABS         EXCL            LONGINT    REAL
BITSET      FALSE           LONGREAL   SIZE
BOOLEAN     FLOAT           MAX        TRUE
CAP         HALT            MIN        TRUNC
CARDINAL    HIGH            NIL        VAL
CHAR        INC             ODD
CHR         INCL            ORD
DEC         INTEGER         PROC

模块

[编辑]

Modula-2的模块(module),可以用来封装一组有关的子程序和数据结构,并限制它们对程序其他部分的可见性。模块设计以清晰的方式,实现了Modula-2的数据抽象特征。语言有严格的作用域控制。模块的作用域,可以被当作是不可逾越的墙:除了标准标识符之外,来自外部的对象在模块内是不可见的,除非显式的导入它;内部的模块对象在外部是不可见的,除非显式的导出它。

Modula-2程序是由模块组成,其中“程序模块”包含一个Modula-2程序的主程序。所有Modula-2程序,必须有定义了执行开始之处的一个主程序。在一个单一的程序中,不能有链接在一起的两个程序模块。“局部模块”是在其他模块内声明的模块。程序模块和局部模块的起始关键字,就是单独的MODULE

定义模块与实现模块

[编辑]

除了程序模块之外的“全局模块”,都构成自两个部分:作为接口部分的“定义模块”,它只包含“导出”(对其他模块可见)的那部分子系统,和同名的“实现模块”,它包含模块内部的工作代码:

DEFINITION MODULE GM;
  ...
  
IMPLEMENTATION MODULE GM;
  ...

定义模块中可以包含不透明类型英语Opaque data type声明,它有如下形式:

TYPE name;

它对应的实际类型,对于这个模块的用户是不可见的。这个类型名字,可以用在定义模块内的其他声明之中。对于在定义模块中声明的任何不透明类型,在对应的实现模块中,必须包含它的完全类型声明。完全类型声明,必须定义一个指针类型。

导出

[编辑]

假定局部模块M1导出对象abcP,可将它们的标识符列举于显式EXPORT导出列表之中:

MODULE M1;
  EXPORT a, b, c, P;
  ...

如果加上了可选的关键字QUALIFIED,它们以一种有限制的方式给导出至外部,必须将导出的这个模块名字用作限定符,并跟随着对象的名字。这里的来自模块M1的对象abcP,在模块M1外部就叫做M1.aM1.bM1.cM1.P

PIM2在定义模块中要求显式的EXPORT子句;PIM3从定义模块中删除了EXPORT子句,因为发现了它是多余的。

导入

[编辑]

假定模块M2包含下列IMPORT声明:

MODULE M2;
  IMPORT M1;
  ...

然后这意味着模块M1导出至它所包围的程序的外部的对象,现在可以用在模块M2内部。它们以一种限定方式来引用,也就是M1.aM1.bM1.cM1.P。例如:

  ...
  M1.a := 0;
  M1.c := M1.P(M1.a + M1.b);
  ...

限定导出避免了名字冲突:例如,如果另一个模块M3也导出了一个对象叫做P,那么我们仍可以区分这两个对象,因为M1.P不同于M3.P。凭借限定导出,两个对象在它们的导出模块M1M3中都叫做P是不碍事的。

存在一种可作为替代的方式,它在Modula-2编程者中广泛采用。假定模块M3是公式化为如下:

MODULE M3;
  FROM M1 IMPORT a, b, c, P;

然后这意味着模块M1导出至外部的对象,可以用在模块M3内部,但可以用无限定方式来引用导出的标识符,也就是abcP。例如:

  ...
  a := 0;
  c := P(a + b);
  ...

这种无限定导入的方法,允许在其导出模块之外,以同在它们的导出模块之内一样简单的方式,来使用这些变量和其他对象。对于所有这些已经被显式允许的对象,包围所有模块的墙变得与它们无关了。当然无限定导入只在没有名字冲突时是可用的。

这些导出和导入规则,看起来可能是没有必要的限制和冗余的。但是它们不只是守卫对象免于不希望的访问,而且还有一个让人愉悦的副作用,提供了在程序中定义的所有标识符的自动交叉引用:如果标识符被一个模块名字所限定,那么它的定义位于那个模块。否则如果它是无限定的出现的,简单的回溯查找,将会要么遇到这个标识符的声明,要么遇到它出现在一个IMPORT语句中,指出了它所来自的模块的名字。这个性质在尝试理解包含很多模块的大型程序时是非常有用的。

参见

[编辑]

引用

[编辑]
  1. ^ Wirth, Niklaus. Pascal and its Successors. Broy, Manfred; Denert, Ernst (编). Software Pioneers: Contributions to Software Engineering. Berlin, Heidelberg: Springer-Verlag. 2002: 108–120. ISBN 978-3-642-59412-0. doi:10.1007/978-3-642-59412-0. 
  2. ^ Wirth, Niklaus. History and Goals of Modula-2. Dr. Dobb's Journal (Informa PLC). 18 February 2005 [2021-06-15]. (原始内容存档于2021-04-10). 
  3. ^ Wirth, Niklaus. A Single-pass Modula-2 Compiler for Lilith (PDF). CFB Software. 1 May 1984 [28 January 2019]. (原始内容 (PDF)存档于2021-01-24). 
  4. ^ Wirth, Niklaus. Programming in Modula-2 4th. Berlin, Heidelberg: Springer. 1988. ISBN 978-3-642-83565-0. doi:10.1007/978-3-642-83565-0.  Page 4.

图书

[编辑]

外部链接

[编辑]

本条目部分或全部内容出自以GFDL授权发布的《自由在线电脑词典》(FOLDOC)。