Changeset 5011


Ignore:
Timestamp:
12/08/03 02:51:37 (18 years ago)
Author:
piso
Message:

SYS::%FORMAT

File:
1 edited

Legend:

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

    r5010 r5011  
    33 *
    44 * Copyright (C) 2002-2003 Peter Graves
    5  * $Id: Primitives.java,v 1.516 2003-12-07 19:13:27 piso Exp $
     5 * $Id: Primitives.java,v 1.517 2003-12-08 02:51:37 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    11181118
    11191119    // ### format
    1120     private static final Primitive FORMAT = new Primitive("format") {
     1120    private static final Primitive FORMAT = new Primitive("format")
     1121    {
     1122        public LispObject execute(LispObject[] args) throws ConditionThrowable
     1123        {
     1124            return _FORMAT.execute(args);
     1125        }
     1126    };
     1127
     1128    private static final Primitive _FORMAT = new Primitive("%format", PACKAGE_SYS, false)
     1129    {
    11211130        public LispObject execute(LispObject[] args) throws ConditionThrowable
    11221131        {
Note: See TracChangeset for help on using the changeset viewer.