Never been to DZone Snippets before?

Snippets is a public source code repository. Easily build up your personal collection of code snippets, categorize them with tags / keywords, and share them with the world

same-day-next-month function (See related posts)

same-day-next-month: func [date /local d] [
    d: date
    d/month: d/month + 1
    if d/day < date/day [d: d - d/day]
    d
]
to date REBOL same-day-next-month by gregg.irwin on Tue Jan 10 00:40:47 -0500 2006

You need to create an account or log in to post comments to this site.


Click here to browse all 5146 code snippets

Related Posts