diff options
| -rw-r--r-- | chickadee/graphics/seagull.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/chickadee/graphics/seagull.scm b/chickadee/graphics/seagull.scm index 44a9bd9..58fe04b 100644 --- a/chickadee/graphics/seagull.scm +++ b/chickadee/graphics/seagull.scm @@ -2397,7 +2397,8 @@ (define (emit:float n stage version port level) (define temp (unique-identifier)) (indent level port) - (format port "float ~a = ~a;\n" temp n) + (format port "float ~a = ~a;\n" temp + (if (inf? n) "1.0 / 0.0" n)) (list temp)) (define (emit:boolean b stage version port level) |