Path: utzoo!utgpu!watserv1!watmath!att!occrsh!uokmax!apple!usc!zaphod.mps.ohio-state.edu!wuarchive!mit-eddie!uw-beaver!zephyr.ens.tek.com!tektronix!sequent!mntgfx!lisch
From: lisch@mentor.com (Ray Lischner)
Newsgroups: comp.lang.perl
Subject: wishlist: const
Message-ID: <1990Sep5.163210.5416@mentor.com>
Date: 5 Sep 90 16:32:10 GMT
Organization: engr
Lines: 16

Below is a feature that I would like to see added to Perl; it mostly
helps error checking, but if the optimizer can use the information,
then so much the better.

const(LIST)
const LIST
    marks as constant the variables named in the LIST.  A constant
    variable can be initialized, but not changed after it is
    initialized.  For example:
         const($c) = 1;             # initialize $c
         $c = 2;                    # error!

         const($_IOREAD, $_IOWRT, $_IONBF, $_IOMYBUF,
               $_IOEOF, $_IOERR, $_IOSTRG) = (01, 02, 04, 010, 020, 040, 0400);
-- 
Ray Lischner        UUCP: {uunet,apollo,decwrl}!mntgfx!lisch