Skip to content

Instantly share code, notes, and snippets.

@jeffmurphy
jeffmurphy / Live.layout
Created September 15, 2018 18:41
MLton Stuff
val _ =
if 0 = !Control.Native.commented
then ()
else print (let open Layout
in toString
(seq [str "\t/* live: ",
Vector.layout Live.layout live,
str " */\n"])
end)
@jeffmurphy
jeffmurphy / basic-list-functions.sml
Created September 14, 2017 02:51 — forked from edalorzo/basic-list-functions.sml
Learning SML - Basic List Functions
(* Returns the head of a list. *)
fun head(xs) =
case xs of
[] => raise List.Empty
| (x::_) => x
(* Returns the tail of a list. *)
fun tail(xs) =
case xs of
[] => raise List.Empty

Keybase proof

I hereby claim:

  • I am jeffmurphy on github.
  • I am jeffmurphy (https://keybase.io/jeffmurphy) on keybase.
  • I have a public key whose fingerprint is 0722 17A4 47AB 2E66 A4B1 C94E AF1C 9DCB C2A4 C1C1

To claim this, I am signing this object: