Index: main/cdk.lisp
===================================================================
--- main/cdk.lisp	(revision main,29)
+++ main/cdk.lisp	(revision main,89)
@@ -21,8 +21,8 @@
 (defconstant +ok+ 0)
 
-(defcvar ("cdk_exit_early" +cdk-exit-early+) :int :read-only t)
-(defcvar ("cdk_exit_escape" +cdk-exit-escape+) :int :read-only t)
-(defcvar ("cdk_exit_normal" +cdk-exit-normal+) :int :read-only t)
-(defcvar ("cdk_exit_never" +cdk-exit-never+) :int :read-only t)
+(defcvar (("cdk_exit_early" +cdk-exit-early+) :read-only t) :int)
+(defcvar (("cdk_exit_escape" +cdk-exit-escape+) :read-only t) :int)
+(defcvar (("cdk_exit_normal" +cdk-exit-normal+) :read-only t) :int)
+(defcvar (("cdk_exit_never" +cdk-exit-never+) :read-only t) :int)
 
 ;;; Screen-wide, initialization, and finalization routines.