Changeset 692
- Timestamp:
- 2015-06-08T17:33:52-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/infix-printer.lisp
r690 r692 149 149 &aux (fstr (make-array '(0) :element-type 'base-char 150 150 :fill-pointer 0 :adjustable t))) 151 "Print an expression EXPR in infix notation to a string. If OP is 152 not nil, the expression is parenthesized if its operator has lower 153 precedence than OP. Returns the string containing the printed 154 expression." 151 155 (with-output-to-string (s fstr) 152 156 (infix-print-to-stream expr s op print-level))
Note:
See TracChangeset
for help on using the changeset viewer.