Changeset 5967


Ignore:
Timestamp:
02/25/04 17:26:00 (17 years ago)
Author:
piso
Message:

AREF, arrayRowMajorIndex(): adjusted wording of error messages.

File:
1 edited

Legend:

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

    r5931 r5967  
    33 *
    44 * Copyright (C) 2002-2004 Peter Graves
    5  * $Id: Primitives.java,v 1.581 2004-02-24 15:05:02 piso Exp $
     5 * $Id: Primitives.java,v 1.582 2004-02-25 17:26:00 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    17841784            if (array.getRank() == 0)
    17851785                return array.getRowMajor(0);
    1786             StringBuffer sb = new StringBuffer("AREF: ");
    1787             sb.append("wrong number of subscripts (0) for array of rank ");
     1786            StringBuffer sb =
     1787                new StringBuffer("Wrong number of subscripts (0) for array of rank ");
    17881788            sb.append(array.getRank());
     1789            sb.append('.');
    17891790            signal(new ProgramError(sb.toString()));
    17901791            return NIL;
     
    18141815        final int rank = array.getRank();
    18151816        if (rank != subscripts.length) {
    1816             StringBuffer sb = new StringBuffer("%ARRAY-ROW-MAJOR-INDEX: ");
    1817             sb.append("wrong number of subscripts (");
     1817            StringBuffer sb = new StringBuffer("Wrong number of subscripts (");
    18181818            sb.append(subscripts.length);
    18191819            sb.append(") for array of rank ");
    18201820            sb.append(rank);
     1821            sb.append('.');
    18211822            signal(new ProgramError(sb.toString()));
    18221823        }
Note: See TracChangeset for help on using the changeset viewer.