Calendar - for "REAL" programmers: Difference between revisions
m
→{{header|Phix}}: use pygments
imported>Fth No edit summary |
m (→{{header|Phix}}: use pygments) |
||
Line 2,819:
Although, if we are abusing the backticks and other innocent programs, why not just: <syntaxhighlight lang="perl">$_=$ARGV[0]//1969;`\143\141\154 $_ >&2`</syntaxhighlight>
=={{header|Phix}}==
I'm not going to take this too seriously and instead treat it as a good opportunity to showcase how trivial it is to make some rather fundamental changes to the compiler. So, the first task is to take a copy of [[Calendar#Phix|Calendar]] and make it output uppercase. Change the line in routine centre:
--return repeat(' ',left)&s&repeat(' ',right)
return repeat(' ',left)&upper(s)&repeat(' ',right)
▲<!--<syntaxhighlight lang="phix">(phixonline)-->
(That's that done.) Now, Phix is case-sensitive, and many of the keywords and builtins are in lower case, which presents a bit of a challenge - but we can cope. It is too tedious and not particularly helpful to present a completed solution, instead I shall outline the (relatively simple) steps this would require. I have limited my tests to INCLUDE and INTEGER. In psym.e you can find the line▼
▲<!--</syntaxhighlight>-->
initialSymEntry("integer", S_Type,"TI",opInt, E_none) -- #01 / 0b0001 integer
▲<!--<syntaxhighlight lang="phix">(phixonline)-->
▲<!--</syntaxhighlight>-->
▲It is too tedious and not particularly helpful to present a completed solution, instead I shall outline the (relatively simple) steps this would require. I have limited my tests to INCLUDE and INTEGER.
<!--<syntaxhighlight lang="phix">(phixonline)-->▼
<!--</syntaxhighlight>-->▼
Immediately after that (it should now be there commented out) add:
Alias("INTEGER",symlimit)
Add similar lines for length, floor, repeat, upper, day_of_week, sequence, string, sprintf, append, printf, join, at the appropriate places. Keywords are handled slightly differently: In pttree.e we need a new alias routine (you should find this one commented out, from when I was testing all this):▼
procedure tt_stringA(sequence text, integer alias)
tt_string(text,-2)
▲Keywords are handled slightly differently: In pttree.e we need a new alias routine (you should find this one commented out, from when I was testing all this):
tt[pcurr] = alias
end procedure
<!--</syntaxhighlight>-->▼
and you can find the line
global constant T_include = 596 tt_stringF("include",T_include)
Sometime after that, in fact after the very last use of tt_stringF, add (likewise you should find this one commented out):
tt_stringA("INCLUDE",T_include)
Add similar lines for function, end, iff, for, to, do, if, or, then, else, return, procedure, but this time all some ways away from the originals. Quickly run "p p" and make sure you get a normal prompt, without any "T_include should be 624(not 596)" or suchlike (which would happen <i>alot</i> if you put the aliases anywhere other than last).
Line 2,863 ⟶ 2,852:
Currently ptok.e recognises <code>\n</code> but not <code>\N</code>. Search for all references to <code>escchar</code> (there should be one definition and two references) and make sure the character being
checked is mapped to lower case, ie change (twice)
--Ch = find(Ch,escchar)
Ch = find(lower(Ch),escchar)
Lastly, the calendar example includes builtins\timedate.e, which contains some lower-case definitions. So copy it to (say) TIMEDATEUPPER.E and change adjust_timedate, timedelta, days (the 2nd param to timedelta), and format_timedate to their uppercase equivalents, and of course change that include to <code>INCLUDE BUILTINS\TIMEDATEUPPER.E</code>.
There are probably even simpler changes to ptok.e/pttree.e that would make everything case insensitive, but locating those is left as an exercise for the reader.
You don't actually have to repackage (p -c p) to test this, just run p p test.exw - technically slower by a second or so but only really noticeable long-term.
Finally, you can take that copy of [[Calendar#Phix|Calendar]] and make it all uppercase. In Edita (shipped with Phix) that is just <Ctrl A><Alt U>.
=={{header|PHP}}==
While PHP functions are case-sensitive (aside of <code>_()</code>), this isn't the case for language constructs.
| |||