close Warning: Can't synchronize with repository "(default)" (The repository directory has changed, you should resynchronize the repository with: trac-admin $ENV repository resync '(default)'). Look in the Trac log for more information.

Changeset 4006


Ignore:
Timestamp:
2016-05-31T10:42:26-07:00 (8 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/infix-printer.lisp

    r4005 r4006  
    8181   ;; Check if the operator of this expression has lower precedence
    8282   ;; than the surrounding operator, and parenthesize if necessary
    83    ((and op (operator-lessp (car expr) op))
     83   ((and op
     84         (operator-lessp (car expr) op))
    8485    (format stream "(")
    8586    (infix-print expr stream nil (1+ print-level))
Note: See TracChangeset for help on using the changeset viewer.