1. evhan
  2. schematic

Commits

evhan  committed f2fa550

Skip negative indents to avoid errors on make-string for vals < 0

  • Participants
  • Parent commits 6734149
  • Branches master

Comments (0)

Files changed (1)

File src/schematic/format.scm

View file
  • Ignore whitespace
                                        (if (number? form)
                                            form
                                            (car form))))))
-               (unless (zero? indent)
+               (when (positive? indent)
                  (display (make-string indent #\space) output))
                (display line output)
                (newline output)