Mentions légales du service

Skip to content
Snippets Groups Projects
Commit 84ccbc74 authored by POTTIER Francois's avatar POTTIER Francois
Browse files

A better [Print] API.

parent f0547a17
Branches
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
demos/system-F-type/Print.ml
+ 5
− 2
View file @ 84ccbc74
...@@ -95,5 +95,8 @@ and term3 t = ...@@ -95,5 +95,8 @@ and term3 t =
and term t = and term t =
term3 t term3 t
let term (oc : out_channel) (t : (string, string) term) : unit = let typ =
output oc (term t) adapt typ
let term =
adapt term
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment