Changeset 6661

Timestamp:

Jun 3, 2007, 2:55:20 AM (17 years ago)

Author:

Gary Byers

Message:

Lose some "DEFINDENT" stuff.

File:

• branches/ide-1.0/ccl/hemlock/src/lispmode.lisp (modified) (2 diffs)

branches/ide-1.0/ccl/hemlock/src/lispmode.lisp

@@ -961 +961 @@
 (defindent "di:frame-function-mismatch" 1)
 
-;;; Xlib forms.
-;;;
-(defindent "with-gcontext" 1)
-(defindent "xlib:with-gcontext" 1)
-(defindent "with-state" 1)
-(defindent "xlib:with-state" 1)
-(defindent "with-display" 1)
-(defindent "xlib:with-display" 1)
-(defindent "with-event-queue" 1)
-(defindent "xlib:with-event-queue" 1)
-(defindent "with-server-grabbed" 1)
-(defindent "xlib:with-server-grabbed" 1)
-(defindent "event-case" 1)
-(defindent "xlib:event-case" 1)
 
 ;;; CLOS forms.
@@ -987 +973 @@
 ;;; System forms.
 ;;;
-(defindent "alien-bind" 1)
-(defindent "def-c-record" 1)
-(defindent "defrecord" 1)
-(defindent "add-fd-handler" 2)
-(defindent "with-fd-handler" 1)
-
-;;; Wire forms.
-(defindent "remote" 1)
-(defindent "wire:remote" 1)
-(defindent "remote-value" 1)
-(defindent "wire:remote-value" 1)
-(defindent "remote-value-bind" 3)
-(defindent "wire:remote-value-bind" 3)
 
 ;;; Multiprocessing forms.
-(defindent "with-lock-held" 1)
+(defindent "with-lock-grabbed" 1)
 (defindent "process-wait" 1)
 
-;;; Alien forms.
-(defindent "with-alien" 1)