steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

calendar: removing unused (month-name) word.

db4
John Benediktsson 2011-10-19 10:34:50 -07:00
parent fb2aab3545
commit 469f4314df
1 changed files with 0 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
basis/calendar/calendar.factor
View File

@ -64,12 +64,6 @@ CONSTANT: month-names
"July" "August" "September" "October" "November" "December" "July" "August" "September" "October" "November" "December"
} }
<PRIVATE
: (month-name) ( n -- string ) 1 - month-names nth ;
PRIVATE>
GENERIC: month-name ( obj -- string ) GENERIC: month-name ( obj -- string )
M: integer month-name check-month 1 - month-names nth ; M: integer month-name check-month 1 - month-names nth ;