Re: DECC$features question
"Craig A. Berry" <[email protected]> Tue, 03 Nov 2015 15:56:23 +0000 (GMT)
| Newsgroups | gmane.comp.lang.perl.ports.vms |
|---|---|
| Message-ID | <[email protected]> |
--Boundary_(ID_a5Ru14XNPcUeWFAbiantxA) Content-type: text/plain; CHARSET=US-ASCII; format=flowed Content-transfer-encoding: 7BIT --Boundary_(ID_a5Ru14XNPcUeWFAbiantxA) Content-type: multipart/related; boundary="Boundary_(ID_kPOc+p9kFqDO70Avqh1UJA)"; type="text/html" --Boundary_(ID_kPOc+p9kFqDO70Avqh1UJA) Content-type: text/html; CHARSET=US-ASCII Content-transfer-encoding: quoted-printable <html><body><div><br></div><div><br>On Nov 03, 2015, at 08:01 AM, "Brian Schenkenberge= r, VAXman-" <[email protected]> wrote:<br><br><div><blockquote type=3D= "cite"><div class=3D"msg-quote"><div class=3D"_stretch"><span class=3D"bod= y-text-content">I have created a callable Perl routine. I need to have the= DECC$feature<br>DECC$FILENAME_UNIX_REPORT enabled for Excel::Writer::XLSX= to for proper<br>functioning.<br><br>Why does calling DECC$FEATURE_SET to= establish DECC$FILENAME_UNIX_REPORT<br>not cause Perl to use/see this fea= ture setting but the definition of the <br>DECC$FILENAME_UNIX_REPORT logic= al does?<br></span></div></div></blockquote></div><div><span><br data-mce-= bogus=3D"1"></span></div><div><span>I understand why it doesn't work but I= 'm not sure what to do about it. At start-up time, via a LIB$INITIAL= IZE psect, we capture feature settings from the environment and/or set som= e defaults. For certain features, we save the setting in a global va= riable. Here's where the setting of DECC$FILENAME_UNIX_REPORT is sto= red:<br></span></div><div><span><br data-mce-bogus=3D"1"></span></div><a h= ref=3D"http://perl5.git.perl.org/perl.git/blob/HEAD:/vms/vms.c#l14044">htt= p://perl5.git.perl.org/perl.git/blob/HEAD:/vms/vms.c#l14044</a><br></div><= div><br data-mce-bogus=3D"1"></div><div>I think part of the reason for thi= s was <span> so we don't have to call decc$feature_get all over the place = to check the setting, but I also think at one time we supported some featu= res in Perl that older CRTLs didn't (yet) have. John Malmberg design= ed all this and at one time planned to have a VMS::Feature Perl module tha= t would allow you to get and set these features, but he never implemented = it.</span><br data-mce-bogus=3D"1"></div><div><span><br data-mce-bogus=3D"= 1"></span></div><div><span>So I think the only choice right now is to get = the setting in the environment before Perl starts up.<br data-mce-bogus=3D= "1"></span></div></body></html>= --Boundary_(ID_kPOc+p9kFqDO70Avqh1UJA)-- --Boundary_(ID_a5Ru14XNPcUeWFAbiantxA)--