Carp/test/test-for-errors/private-bindings.carp
2020-11-28 13:11:43 +01:00

14 lines
239 B
Plaintext

(Project.config "file-path-print-length" "short")
(deftype Foo [bar Int])
(private Foo.bar)
(defmodule Foo
(defn get [foo]
(Foo.bar foo))
)
(defn boo [] @(Foo.bar &(Foo.init 1)))
(defn main [] (println* (Foo.bar &(Foo.init 1))))