#lang racket/base

(require "../demo/js-usecases.rkt"
         "jsmaker-test-framework.rkt")

(check-contains 'usecase-random "Math.floor" usecase-random-number)
(check-contains 'usecase-unique "new Set" usecase-unique-values)
(check-contains 'usecase-array-at "return xs[i];" usecase-array-at)
(check-contains 'usecase-named-let "while (true)" usecase-sum-to)
(check-contains 'usecase-dom "getElementById" usecase-set-html)

(module+ main
  (test-summary 'jsmaker-usecases))