Changeset 8443


Ignore:
Timestamp:
02/01/05 14:22:30 (17 years ago)
Author:
piso
Message:

getCorrectIndentation(): added support for UNWIND-PROTECT.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/j/src/org/armedbear/j/LispMode.java

    r8394 r8443  
    33 *
    44 * Copyright (C) 1998-2005 Peter Graves
    5  * $Id: LispMode.java,v 1.84 2005-01-24 14:23:15 piso Exp $
     5 * $Id: LispMode.java,v 1.85 2005-02-01 14:22:30 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    212212    private final String[] elispSpecials = new String[] {
    213213        "while"
    214     };
    215 
    216     private final String[] hemlockSpecials = new String[] {
    217         "frob", "with-mark"
    218214    };
    219215
     
    285281                return buffer.getCol(pos) + indentSize;
    286282            }
    287             if (token.equals("handler-case")) {
     283            if (token.equals("handler-case") || token.equals("unwind-protect")) {
    288284                Position p1 = forwardSexp(posFirst);
    289285                if (p1 != null) {
     
    302298                Utilities.isOneOf(token, specials) ||
    303299                Utilities.isOneOf(token, elispSpecials) ||
    304                 Utilities.isOneOf(token, hemlockSpecials) ||
    305300                token.startsWith("with-"))
    306301                return buffer.getCol(pos) + indentSize;
Note: See TracChangeset for help on using the changeset viewer.