Changeset main,89 for main/cdk.lisp

Timestamp:

08/08/2008 08:25:09 PM (18 years ago)

Author:

David Owen <dsowen@…>

branch-nick:

tui

revision id:

dsowen@fugue88.ws-20080808202509-1i22vbtxoghmjld1

Message:

Minor fixes

File:

• main/cdk.lisp (modified) (1 diff)

main/cdk.lisp

@@ -21 +21 @@
 (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.