DO-CTYPES bugfix.