[REBOL] help on padding
From: carlos:lorenz at: 26-Nov-2000 10:38
Using the function below I'd like to get a sequence of seven days
starting from a date entered by the user but don't understand why
it does not work. Could you help me?
; Joel Nelly's function
zpad: func[n [number!] w[integer!] /local s][
s: to-string n
if w > length? s [
insert/dup s "0" (w - length? s)
dt: to-date ask "Enter start day: "
repeat i 7 [
; does not work
print rejoin[zpad dt/year 4 zpad dt/month 2 zpad dt/month 2]
; this works fine
dt: dt + 1