2018-05-31 18:34:03 +03:00
|
|
|
;; (Debug.sanitize-addresses)
|
|
|
|
;; (Project.config "print-ast" true)
|
2018-03-26 17:02:17 +03:00
|
|
|
|
2018-05-31 13:05:55 +03:00
|
|
|
;; (doc f "This function will return 123.")
|
|
|
|
;; (sig f (Fn [] Int))
|
|
|
|
;; (defn f [] 123)
|
2018-03-26 17:02:17 +03:00
|
|
|
|
2018-05-31 13:05:55 +03:00
|
|
|
;; (defmodule Foo
|
|
|
|
;; (doc f "This is an evil function.")
|
|
|
|
;; (defn f [] 666)
|
|
|
|
;; (hidden h)
|
|
|
|
;; (defn h [] @"trash")
|
|
|
|
;; (defn g [] 10000))
|
2018-03-26 17:02:17 +03:00
|
|
|
|
2018-05-31 13:05:55 +03:00
|
|
|
;; (doc Foo.g "The 10000 dollar function, annotated from afar.")
|
2018-03-27 15:32:47 +03:00
|
|
|
|
2018-05-31 13:05:55 +03:00
|
|
|
;; (Project.config "docs-directory" "./out/")
|
|
|
|
;; (Project.config "title" "Temp")
|
2018-03-27 15:32:47 +03:00
|
|
|
|
2018-05-31 13:05:55 +03:00
|
|
|
;; (save-docs Foo)
|
|
|
|
|
2018-05-31 15:37:57 +03:00
|
|
|
|
|
|
|
;;; Hide docs for deps
|
|
|
|
;; (defmodule Abc
|
|
|
|
|
|
|
|
;; (defn a [] 123)
|
|
|
|
;; (hidden b)
|
|
|
|
;; (defn b [] 123.0)
|
|
|
|
;; (defn c [x] x)
|
|
|
|
;; (defn d []
|
|
|
|
;; (c 123))
|
|
|
|
;; (defn e []
|
|
|
|
;; (c @"hej"))
|
|
|
|
|
|
|
|
;; )
|
|
|
|
|
|
|
|
;; (Project.config "docs-directory" "./out/")
|
|
|
|
;; (Project.config "title" "ABC")
|
|
|
|
;; (save-docs Abc)
|
|
|
|
|
2018-05-31 18:34:03 +03:00
|
|
|
;; (sig foo String)
|
|
|
|
;; (def foo 123)
|
|
|
|
|
|
|
|
|
2018-06-01 10:42:02 +03:00
|
|
|
;; PRIVATE
|
|
|
|
;; (load "Macros.carp")
|
|
|
|
;; ;; (load "Int.carp")
|
|
|
|
;; ;; (load "Char.carp")
|
|
|
|
;; ;; (load "IO.carp")
|
|
|
|
|
|
|
|
;; (defmodule A
|
|
|
|
;; (private f)
|
|
|
|
;; (defn f [] 127)
|
|
|
|
;; ;;(defn g [] (f))
|
|
|
|
;; )
|
|
|
|
|
|
|
|
;; (defn amam []
|
|
|
|
;; (A.f))
|
|
|
|
|
|
|
|
;; (use A)
|
|
|
|
|
|
|
|
;; (defn main []
|
|
|
|
;; (f))
|