rs: Switch to #lang racket, but keep the types where they work.

This commit is contained in:
Sergiu Ivanov 2020-03-01 20:25:01 +01:00
parent f16747d157
commit 02d5384674
2 changed files with 6 additions and 5 deletions

View file

@ -1,8 +1,8 @@
#lang typed/racket
#lang racket
;;; Tests for dds/rs.
(require typed/rackunit "rs.rkt")
(require rackunit "rs.rkt")
(test-case "Basic definitions"
(let* ([r1 (reaction (set 'x) (set 'y) (set 'z))]

7
rs.rkt
View file

@ -1,11 +1,12 @@
#lang typed/racket
#lang racket
(require typed/racket)
;;; dds/rs
;;; Definitions for working with reaction systems.
(require/typed "utils.rkt"
[string->any (String -> Any)])
(require "utils.rkt")
(provide
;; Structures