Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!ames!lll-winken!uunet!tektronix!percival!qiclab!m2xenix!dawggon!p101.f19.n490.z2.fidonet.org!Pat.Terry
From: Pat.Terry@p101.f19.n490.z2.fidonet.org (Pat Terry)
Newsgroups: comp.lang.modula2
Subject: Silly feature quiz
Message-ID: <1243.24592360@dawggon.fidonet.org>
Date: 29 Apr 89 05:06:34 GMT
Sender: ufgate@dawggon.fidonet.org (newsout1.26)
Organization: FidoNet node 2:490/19.101 - Settler City Fido, Grahamstown RSA
Lines: 20

Guess which highly rated Modula Compiler allows code like

    PROCEDURE a (VAR I : CHAR);
    (* sic : I passed as VAR parameter *)
    BEGIN END a;

    VAR  x : CARDINAL;

    BEGIN
      a(CHR(x));
      a(CHAR(x));
      (* but not CHAR(x) := 'a' *)

Perhaps there is more than one solution to my quiz?
  


--  
uucp: {mcvax!uunet,tektronix,sun!nosun}!oresoft!dawggon!2!490!19.101!Pat.Terry
Internet: Pat.Terry@p101.f19.n490.z2.fidonet.org