Conlang/sample-code/link-the-docs.cl

10 lines
298 B
Common Lisp
Executable File

#!/usr/bin/env -S conlang -r false
fn link (link, text) -> &str
"\x1b]8;;" + link + "\x1b\\" + text + "\x1b]8;;\x1b\\";
fn main () {
println(link("https://conlang.foo/docs", "Here's a link to the docs!"));
println(link("https://conlang.foo/source", "Here's a link to the source!"))
}