(current-second) returns unix time instead of TAI time

[yorickhardy]

R7RS states that (current-second) returns the current time on TAI scale, but does permit UTC up to a constant.
In most scheme implementations that I have looked at, an offset is included:

• Gauche +37 (for TAI) -8 (for offset in 1970)
• Chibi current-seconds
  Chibi TAI
  Chibi TAI calculation
  More or less the same as Gauche but using tables
• STklos same as Chibi
• Skint +37 (for TAI, but no offset in 1970)

Should cyclone perhaps follow Gauche's implementation, i.e. time(NULL)+37-8?