#lang racket/base

(require "../main.rkt")

(provide generated-js)

(define generated-js
  (js
   (define answer 42)
   (define (square x)
     (return (* x x)))
   (define (sum-to n)
     (let loop ([i 0] [acc 0])
       (if (> i n)
           (return acc)
           (loop (+ i 1) (+ acc i)))))))

(module+ main
  (display generated-js))