Added aput-close macro.