Calendar - for "REAL" programmers: Difference between revisions
Content added Content deleted
m (→{{header|Ada}}) |
m (→{{header|Ada}}) |
||
Line 22: | Line 22: | ||
=={{header|Ada}}== |
=={{header|Ada}}== |
||
In Ada, the task is really easy, because Ada is case insensitive. I.e., one could simply replicate the code from [http://rosettacode.org/wiki/Calendar#Ada Ada solution of the calendar task] and convert every lowercase character to uppercase. Instead of doing that, the implementation below reuses the package "PRINTABLE_CALENDAR" (same as "Printable_Calendar" or "printable_calendar") from [http://rosettacode.org/wiki/Calendar#Ada the calendar task]: |
|||
In Ada, the task is really easy for "real" programmers, because Ada is case insensitive. |
|||
I am reusing the package "Printable_Calendar" from the [http://rosettacode.org/wiki/Calendar#Ada Ada solution of the calendar task]: |
|||
<lang Ada>WITH PRINTABLE_CALENDAR; |
<lang Ada>WITH PRINTABLE_CALENDAR; |
||
Line 30: | Line 28: | ||
PROCEDURE REAL_CAL IS |
PROCEDURE REAL_CAL IS |
||
C: PRINTABLE_CALENDAR.CALENDAR := PRINTABLE_CALENDAR. |
C: PRINTABLE_CALENDAR.CALENDAR := PRINTABLE_CALENDAR.INIT_132 |
||
(( |
((WEEKDAY_REP => |
||
"MO TU WE TH FR SA SO", |
"MO TU WE TH FR SA SO", |
||
MONTH_REP => |
MONTH_REP => |