8 files changed, 136 insertions, 0 deletions
diff --git a/src/expressions/collect_sources.ml b/src/expressions/collect_sources.ml
index d898b86..32b40be 100755
--- a/src/expressions/collect_sources.ml
+++ b/src/expressions/collect_sources.ml
@@ -1,3 +1,20 @@
+(*
+This file is part of licht.
+
+licht is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+licht is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with licht.  If not, see <http://www.gnu.org/licenses/>.
+*)
+
 module T = struct
 
   type 'a t = unit
diff --git a/src/expressions/eval_ref.ml b/src/expressions/eval_ref.ml
index d367d2d..8463f6c 100755
--- a/src/expressions/eval_ref.ml
+++ b/src/expressions/eval_ref.ml
@@ -1,3 +1,20 @@
+(*
+This file is part of licht.
+
+licht is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+licht is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with licht.  If not, see <http://www.gnu.org/licenses/>.
+*)
+
 type 'a range =
   | Single of 'a
   | Array1 of 'a list
diff --git a/src/expressions/evaluate.ml b/src/expressions/evaluate.ml
index e910c19..ff44097 100755
--- a/src/expressions/evaluate.ml
+++ b/src/expressions/evaluate.ml
@@ -1,3 +1,20 @@
+(*
+This file is part of licht.
+
+licht is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+licht is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with licht.  If not, see <http://www.gnu.org/licenses/>.
+*)
+
 (** Internal representation for each type *)
 type 'a value =
     | Bool:   DataType.Bool.t                       -> DataType.Bool.t value
diff --git a/src/expressions/show_expr.ml b/src/expressions/show_expr.ml
index 3a54929..c283162 100755
--- a/src/expressions/show_expr.ml
+++ b/src/expressions/show_expr.ml
@@ -1,3 +1,20 @@
+(*
+This file is part of licht.
+
+licht is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+licht is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with licht.  If not, see <http://www.gnu.org/licenses/>.
+*)
+
 let u = UTF8.from_utf8string
 
 module Show_Expr
diff --git a/src/expressions/show_type.ml b/src/expressions/show_type.ml
index c459dca..3451cde 100755
--- a/src/expressions/show_type.ml
+++ b/src/expressions/show_type.ml
@@ -1,3 +1,20 @@
+(*
+This file is part of licht.
+
+licht is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+licht is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with licht.  If not, see <http://www.gnu.org/licenses/>.
+*)
+
 type 'a t = UTF8.Buffer.buffer -> unit
 type 'a obs = UTF8.Buffer.buffer -> unit
 
diff --git a/src/expressions/sym_expr.ml b/src/expressions/sym_expr.ml
index 5ff828e..4f5d6a6 100755
--- a/src/expressions/sym_expr.ml
+++ b/src/expressions/sym_expr.ml
@@ -1,3 +1,20 @@
+(*
+This file is part of licht.
+
+licht is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+licht is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with licht.  If not, see <http://www.gnu.org/licenses/>.
+*)
+
 module type SYM_EXPR = sig
 
   module T:Sym_type.SYM_TYPE
diff --git a/src/expressions/sym_ref.ml b/src/expressions/sym_ref.ml
index aba8053..ef9168e 100755
--- a/src/expressions/sym_ref.ml
+++ b/src/expressions/sym_ref.ml
@@ -1,3 +1,20 @@
+(*
+This file is part of licht.
+
+licht is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+licht is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with licht.  If not, see <http://www.gnu.org/licenses/>.
+*)
+
 module type SYM_REF = sig
 
   type 'a t
diff --git a/src/expressions/sym_type.ml b/src/expressions/sym_type.ml
index 31c9534..8670f4d 100755
--- a/src/expressions/sym_type.ml
+++ b/src/expressions/sym_type.ml
@@ -1,3 +1,20 @@
+(*
+This file is part of licht.
+
+licht is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+licht is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with licht.  If not, see <http://www.gnu.org/licenses/>.
+*)
+
 module type SYM_TYPE = sig
 
   type 'a t