Initial commit.

This commit is contained in:
2016-02-18 14:53:30 +01:00
commit 8e93ca7a95
2215 changed files with 341269 additions and 0 deletions

View File

@@ -0,0 +1,5 @@
# -*- mode: snippet -*-
# name: assert
# key: as
# --
assert $0;;

View File

@@ -0,0 +1,5 @@
# -*- mode: snippet -*-
# name: docstring
# key: d
# --
(* $0 *)

View File

@@ -0,0 +1,7 @@
# -*- mode: snippet -*-
# name: for
# key: for
# --
for ${1:cond} do
$0
done

View File

@@ -0,0 +1,5 @@
# -*- mode: snippet -*-
# name: fun
# key: fun
# --
fun ${1:args} -> $0

View File

@@ -0,0 +1,5 @@
# -*- mode: snippet -*-
# name: guard
# key: |
# --
| ${1:match} -> $0

View File

@@ -0,0 +1,6 @@
# -*- mode: snippet -*-
# name: ifthen
# key: if
# --
if ${1:cond} then
$0

View File

@@ -0,0 +1,8 @@
# -*- mode: snippet -*-
# name: ifthenelse
# key: if
# --
if ${1:cond} then
$2
else
$0

View File

@@ -0,0 +1,5 @@
# -*- mode: snippet -*-
# name: let
# key: let
# --
let ${1:var} $0

View File

@@ -0,0 +1,5 @@
# -*- mode: snippet -*-
# name: list_comprehension
# key: l
# --
[? $1 | $0 ?]

View File

@@ -0,0 +1,6 @@
# -*- mode: snippet -*-
# name: main
# key: m
# --
let main =
$0

View File

@@ -0,0 +1,6 @@
# -*- mode: snippet -*-
# name: match
# key: match
# --
match ${1:to_match} with
| ${2:matching} -> $0

View File

@@ -0,0 +1,9 @@
# -*- mode: snippet -*-
# name: module
# key: mod
# --
module ${1:A} =
struct
${2:type t = { name : string; phone : string }}
$0
end;;

View File

@@ -0,0 +1,5 @@
# -*- mode: snippet -*-
# name: open
# key: op
# --
open ${1:Module}

View File

@@ -0,0 +1,5 @@
# -*- mode: snippet -*-
# name: printf
# key: pr
# --
Printf.printf "${1:string}" ${2:vals};;

View File

@@ -0,0 +1,6 @@
# -*- mode: snippet -*-
# name: rec
# key: rec
# --
let rec ${1:fun} ${2:args} =
$0

View File

@@ -0,0 +1,8 @@
# -*- mode: snippet -*-
# name: try
# key: try
# --
try
$0
with
$1

View File

@@ -0,0 +1,5 @@
# -*- mode: snippet -*-
# name: type_record
# key: type
# --
type ${1:name} = {${2:var}: ${3:int}$0}

View File

@@ -0,0 +1,6 @@
# -*- mode: snippet -*-
# name: type_type
# key: type
# --
type ${1:expr} =
| $0

View File

@@ -0,0 +1,5 @@
# -*- mode: snippet -*-
# name: val
# key: val
# --
val ${1:fun} : $0

View File

@@ -0,0 +1,7 @@
# -*- mode: snippet -*-
# name: while
# key: wh
# --
while ${1:cond} do
$0
done