Update headers for the new license.
Remains to be done: remove all headers in testsuite/tests.master
parent
6e794aee72
commit
5401ce8473
|
@ -1,3 +1,18 @@
|
||||||
|
#**************************************************************************
|
||||||
|
#* *
|
||||||
|
#* OCaml *
|
||||||
|
#* *
|
||||||
|
#* Damien Doligez, projet Gallium, INRIA *
|
||||||
|
#* *
|
||||||
|
#* Copyright 2015 Institut National de Recherche en Informatique et *
|
||||||
|
#* en Automatique. *
|
||||||
|
#* *
|
||||||
|
#* All rights reserved. This file is distributed under the terms of *
|
||||||
|
#* the GNU Lesser General Public License version 2.1, with the *
|
||||||
|
#* special exception on linking described in the file LICENSE. *
|
||||||
|
#* *
|
||||||
|
#**************************************************************************
|
||||||
|
|
||||||
# Default behaviour, for if core.autocrlf isn't set
|
# Default behaviour, for if core.autocrlf isn't set
|
||||||
* text=auto
|
* text=auto
|
||||||
|
|
||||||
|
@ -14,8 +29,6 @@ boot/ocamldep binary
|
||||||
README* ocaml-typo=missing-header
|
README* ocaml-typo=missing-header
|
||||||
*.adoc ocaml-typo=missing-header,long-line,unused-prop
|
*.adoc ocaml-typo=missing-header,long-line,unused-prop
|
||||||
|
|
||||||
/.gitattributes ocaml-typo=missing-header
|
|
||||||
/.gitignore ocaml-typo=missing-header
|
|
||||||
/.merlin ocaml-typo=missing-header
|
/.merlin ocaml-typo=missing-header
|
||||||
/Changes ocaml-typo=non-ascii,missing-header
|
/Changes ocaml-typo=non-ascii,missing-header
|
||||||
/INSTALL ocaml-typo=missing-header
|
/INSTALL ocaml-typo=missing-header
|
||||||
|
@ -52,10 +65,11 @@ otherlibs/win32unix/symlink.c ocaml-typo=long-line
|
||||||
|
|
||||||
stdlib/sharpbang ocaml-typo=white-at-eol,missing-lf
|
stdlib/sharpbang ocaml-typo=white-at-eol,missing-lf
|
||||||
|
|
||||||
# FIXME remove headers in testsuite and remove unused-prop in next line:
|
# FIXME remove headers in testsuite/tests and remove unused-prop in next line:
|
||||||
testsuite/** ocaml-typo=missing-header,unused-prop
|
testsuite/tests/** ocaml-typo=missing-header,unused-prop
|
||||||
testsuite/tests/lib-bigarray-2/bigarrf.f ocaml-typo=missing-header,tab
|
testsuite/tests/lib-bigarray-2/bigarrf.f ocaml-typo=missing-header,tab
|
||||||
testsuite/tests/misc-unsafe/almabench.ml ocaml-typo=missing-header,long-line
|
testsuite/tests/misc-unsafe/almabench.ml ocaml-typo=missing-header,long-line
|
||||||
|
testsuite/typing ocaml-typo=missing-header
|
||||||
|
|
||||||
tools/magic ocaml-typo=missing-header
|
tools/magic ocaml-typo=missing-header
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,18 @@
|
||||||
|
#**************************************************************************
|
||||||
|
#* *
|
||||||
|
#* OCaml *
|
||||||
|
#* *
|
||||||
|
#* Damien Doligez, projet Gallium, INRIA *
|
||||||
|
#* *
|
||||||
|
#* Copyright 2015 Institut National de Recherche en Informatique et *
|
||||||
|
#* en Automatique. *
|
||||||
|
#* *
|
||||||
|
#* All rights reserved. This file is distributed under the terms of *
|
||||||
|
#* the GNU Lesser General Public License version 2.1, with the *
|
||||||
|
#* special exception on linking described in the file LICENSE. *
|
||||||
|
#* *
|
||||||
|
#**************************************************************************
|
||||||
|
|
||||||
# general patterns
|
# general patterns
|
||||||
|
|
||||||
*.o
|
*.o
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
#########################################################################
|
#**************************************************************************
|
||||||
# #
|
#* *
|
||||||
# OCaml #
|
#* OCaml *
|
||||||
# #
|
#* *
|
||||||
# Anil Madhavapeddy, OCaml Labs #
|
#* Anil Madhavapeddy, OCaml Labs *
|
||||||
# #
|
#* *
|
||||||
# Copyright 2014 Institut National de Recherche en Informatique et #
|
#* Copyright 2014 Institut National de Recherche en Informatique et *
|
||||||
# en Automatique. All rights reserved. This file is distributed #
|
#* en Automatique. *
|
||||||
# under the terms of the Q Public License version 1.0. #
|
#* *
|
||||||
# #
|
#* All rights reserved. This file is distributed under the terms of *
|
||||||
#########################################################################
|
#* the GNU Lesser General Public License version 2.1, with the *
|
||||||
|
#* special exception on linking described in the file LICENSE. *
|
||||||
|
#* *
|
||||||
|
#**************************************************************************
|
||||||
|
|
||||||
PREFIX=~/local
|
PREFIX=~/local
|
||||||
|
|
||||||
|
|
25
.travis.yml
25
.travis.yml
|
@ -1,14 +1,17 @@
|
||||||
#########################################################################
|
#**************************************************************************
|
||||||
# #
|
#* *
|
||||||
# OCaml #
|
#* OCaml *
|
||||||
# #
|
#* *
|
||||||
# Anil Madhavapeddy, OCaml Labs #
|
#* Anil Madhavapeddy, OCaml Labs *
|
||||||
# #
|
#* *
|
||||||
# Copyright 2014 Institut National de Recherche en Informatique et #
|
#* Copyright 2014 Institut National de Recherche en Informatique et *
|
||||||
# en Automatique. All rights reserved. This file is distributed #
|
#* en Automatique. *
|
||||||
# under the terms of the Q Public License version 1.0. #
|
#* *
|
||||||
# #
|
#* All rights reserved. This file is distributed under the terms of *
|
||||||
#########################################################################
|
#* the GNU Lesser General Public License version 2.1, with the *
|
||||||
|
#* special exception on linking described in the file LICENSE. *
|
||||||
|
#* *
|
||||||
|
#**************************************************************************
|
||||||
|
|
||||||
sudo: false
|
sudo: false
|
||||||
language: c
|
language: c
|
||||||
|
|
25
Makefile
25
Makefile
|
@ -1,14 +1,17 @@
|
||||||
#########################################################################
|
#**************************************************************************
|
||||||
# #
|
#* *
|
||||||
# OCaml #
|
#* OCaml *
|
||||||
# #
|
#* *
|
||||||
# Xavier Leroy, projet Cristal, INRIA Rocquencourt #
|
#* Xavier Leroy, projet Cristal, INRIA Rocquencourt *
|
||||||
# #
|
#* *
|
||||||
# Copyright 1999 Institut National de Recherche en Informatique et #
|
#* Copyright 1999 Institut National de Recherche en Informatique et *
|
||||||
# en Automatique. All rights reserved. This file is distributed #
|
#* en Automatique. *
|
||||||
# under the terms of the Q Public License version 1.0. #
|
#* *
|
||||||
# #
|
#* All rights reserved. This file is distributed under the terms of *
|
||||||
#########################################################################
|
#* the GNU Lesser General Public License version 2.1, with the *
|
||||||
|
#* special exception on linking described in the file LICENSE. *
|
||||||
|
#* *
|
||||||
|
#**************************************************************************
|
||||||
|
|
||||||
# The main Makefile
|
# The main Makefile
|
||||||
|
|
||||||
|
|
25
Makefile.nt
25
Makefile.nt
|
@ -1,14 +1,17 @@
|
||||||
#########################################################################
|
#**************************************************************************
|
||||||
# #
|
#* *
|
||||||
# OCaml #
|
#* OCaml *
|
||||||
# #
|
#* *
|
||||||
# Xavier Leroy, projet Cristal, INRIA Rocquencourt #
|
#* Xavier Leroy, projet Cristal, INRIA Rocquencourt *
|
||||||
# #
|
#* *
|
||||||
# Copyright 1999 Institut National de Recherche en Informatique et #
|
#* Copyright 1999 Institut National de Recherche en Informatique et *
|
||||||
# en Automatique. All rights reserved. This file is distributed #
|
#* en Automatique. *
|
||||||
# under the terms of the Q Public License version 1.0. #
|
#* *
|
||||||
# #
|
#* All rights reserved. This file is distributed under the terms of *
|
||||||
#########################################################################
|
#* the GNU Lesser General Public License version 2.1, with the *
|
||||||
|
#* special exception on linking described in the file LICENSE. *
|
||||||
|
#* *
|
||||||
|
#**************************************************************************
|
||||||
|
|
||||||
# The main Makefile
|
# The main Makefile
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
#########################################################################
|
#**************************************************************************
|
||||||
# #
|
#* *
|
||||||
# OCaml #
|
#* OCaml *
|
||||||
# #
|
#* *
|
||||||
# Xavier Leroy, projet Cristal, INRIA Rocquencourt #
|
#* Xavier Leroy, projet Cristal, INRIA Rocquencourt *
|
||||||
# #
|
#* *
|
||||||
# Copyright 1999 Institut National de Recherche en Informatique et #
|
#* Copyright 1999 Institut National de Recherche en Informatique et *
|
||||||
# en Automatique. All rights reserved. This file is distributed #
|
#* en Automatique. *
|
||||||
# under the terms of the Q Public License version 1.0. #
|
#* *
|
||||||
# #
|
#* All rights reserved. This file is distributed under the terms of *
|
||||||
#########################################################################
|
#* the GNU Lesser General Public License version 2.1, with the *
|
||||||
|
#* special exception on linking described in the file LICENSE. *
|
||||||
|
#* *
|
||||||
|
#**************************************************************************
|
||||||
|
|
||||||
# The main Makefile, fragments shared between Makefile and Makefile.nt
|
# The main Makefile, fragments shared between Makefile and Makefile.nt
|
||||||
|
|
||||||
|
@ -213,6 +216,8 @@ PERVASIVES=$(STDLIB_MODULES) outcometree topdirs toploop
|
||||||
|
|
||||||
compilerlibs/ocamlmiddleend.cma: $(MIDDLE_END)
|
compilerlibs/ocamlmiddleend.cma: $(MIDDLE_END)
|
||||||
$(CAMLC) -a -o $@ $(MIDDLE_END)
|
$(CAMLC) -a -o $@ $(MIDDLE_END)
|
||||||
|
partialclean::
|
||||||
|
rm -f compilerlibs/ocamlmiddleend.cma
|
||||||
|
|
||||||
|
|
||||||
# Tools
|
# Tools
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Common subexpression elimination by value numbering over extended
|
(* Common subexpression elimination by value numbering over extended
|
||||||
basic blocks. *)
|
basic blocks. *)
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Common subexpression elimination by value numbering over extended
|
(* Common subexpression elimination by value numbering over extended
|
||||||
basic blocks. *)
|
basic blocks. *)
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* CSE for the AMD64 *)
|
(* CSE for the AMD64 *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2000 Institut National de Recherche en Informatique et *)
|
(* Copyright 2000 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Machine-specific command-line options *)
|
(* Machine-specific command-line options *)
|
||||||
|
|
||||||
|
|
|
@ -1,15 +1,18 @@
|
||||||
# 2 "asmcomp/amd64/emit.mlp"
|
# 2 "asmcomp/amd64/emit.mlp"
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Emission of Intel x86_64 assembly code *)
|
(* Emission of Intel x86_64 assembly code *)
|
||||||
|
|
||||||
|
|
|
@ -1,15 +1,18 @@
|
||||||
# 2 "asmcomp/amd64/proc.ml"
|
# 2 "asmcomp/amd64/proc.ml"
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2000 Institut National de Recherche en Informatique et *)
|
(* Copyright 2000 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Description of the AMD64 processor *)
|
(* Description of the AMD64 processor *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2000 Institut National de Recherche en Informatique et *)
|
(* Copyright 2000 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
open Cmm
|
open Cmm
|
||||||
open Reg
|
open Reg
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2000 Institut National de Recherche en Informatique et *)
|
(* Copyright 2000 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
let _ = let module M = Schedgen in () (* to create a dependency *)
|
let _ = let module M = Schedgen in () (* to create a dependency *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2000 Institut National de Recherche en Informatique et *)
|
(* Copyright 2000 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Instruction selection for the AMD64 *)
|
(* Instruction selection for the AMD64 *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* CSE for ARM *)
|
(* CSE for ARM *)
|
||||||
|
|
||||||
|
|
|
@ -1,15 +1,18 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Benedikt Meurer, University of Siegen *)
|
(* Benedikt Meurer, University of Siegen *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1998 Institut National de Recherche en Informatique *)
|
(* Copyright 1998 Institut National de Recherche en Informatique et *)
|
||||||
(* et en Automatique. Copyright 2012 Benedikt Meurer. All rights *)
|
(* en Automatique. *)
|
||||||
(* reserved. This file is distributed under the terms of the Q *)
|
(* Copyright 2012 Benedikt Meurer. *)
|
||||||
(* Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Specific operations for the ARM processor *)
|
(* Specific operations for the ARM processor *)
|
||||||
|
|
||||||
|
|
|
@ -1,15 +1,18 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Benedikt Meurer, University of Siegen *)
|
(* Benedikt Meurer, University of Siegen *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1998 Institut National de Recherche en Informatique *)
|
(* Copyright 1998 Institut National de Recherche en Informatique et *)
|
||||||
(* et en Automatique. Copyright 2012 Benedikt Meurer. All rights *)
|
(* en Automatique. *)
|
||||||
(* reserved. This file is distributed under the terms of the Q *)
|
(* Copyright 2012 Benedikt Meurer. *)
|
||||||
(* Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Emission of ARM assembly code *)
|
(* Emission of ARM assembly code *)
|
||||||
|
|
||||||
|
|
|
@ -1,15 +1,18 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Benedikt Meurer, University of Siegen *)
|
(* Benedikt Meurer, University of Siegen *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1998 Institut National de Recherche en Informatique *)
|
(* Copyright 1998 Institut National de Recherche en Informatique et *)
|
||||||
(* et en Automatique. Copyright 2012 Benedikt Meurer. All rights *)
|
(* en Automatique. *)
|
||||||
(* reserved. This file is distributed under the terms of the Q *)
|
(* Copyright 2012 Benedikt Meurer. *)
|
||||||
(* Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Description of the ARM processor *)
|
(* Description of the ARM processor *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1998 Institut National de Recherche en Informatique et *)
|
(* Copyright 1998 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Reloading for the ARM *)
|
(* Reloading for the ARM *)
|
||||||
|
|
||||||
|
|
|
@ -1,15 +1,18 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Benedikt Meurer, University of Siegen *)
|
(* Benedikt Meurer, University of Siegen *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1998 Institut National de Recherche en Informatique *)
|
(* Copyright 1998 Institut National de Recherche en Informatique et *)
|
||||||
(* et en Automatique. Copyright 2012 Benedikt Meurer. All rights *)
|
(* en Automatique. *)
|
||||||
(* reserved. This file is distributed under the terms of the Q *)
|
(* Copyright 2012 Benedikt Meurer. *)
|
||||||
(* Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
open Arch
|
open Arch
|
||||||
open Mach
|
open Mach
|
||||||
|
|
|
@ -1,15 +1,18 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Benedikt Meurer, University of Siegen *)
|
(* Benedikt Meurer, University of Siegen *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1998 Institut National de Recherche en Informatique *)
|
(* Copyright 1998 Institut National de Recherche en Informatique et *)
|
||||||
(* et en Automatique. Copyright 2012 Benedikt Meurer. All rights *)
|
(* en Automatique. *)
|
||||||
(* reserved. This file is distributed under the terms of the Q *)
|
(* Copyright 2012 Benedikt Meurer. *)
|
||||||
(* Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Instruction selection for the ARM processor *)
|
(* Instruction selection for the ARM processor *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* CSE for ARM64 *)
|
(* CSE for ARM64 *)
|
||||||
|
|
||||||
|
|
|
@ -1,16 +1,19 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* Benedikt Meurer, University of Siegen *)
|
(* Benedikt Meurer, University of Siegen *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2013 Institut National de Recherche en Informatique *)
|
(* Copyright 2013 Institut National de Recherche en Informatique et *)
|
||||||
(* et en Automatique. Copyright 2012 Benedikt Meurer. All rights *)
|
(* en Automatique. *)
|
||||||
(* reserved. This file is distributed under the terms of the Q *)
|
(* Copyright 2012 Benedikt Meurer. *)
|
||||||
(* Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
let command_line_options = []
|
let command_line_options = []
|
||||||
|
|
||||||
|
|
|
@ -1,16 +1,19 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* Benedikt Meurer, University of Siegen *)
|
(* Benedikt Meurer, University of Siegen *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2013 Institut National de Recherche en Informatique *)
|
(* Copyright 2013 Institut National de Recherche en Informatique et *)
|
||||||
(* et en Automatique. Copyright 2012 Benedikt Meurer. All rights *)
|
(* en Automatique. *)
|
||||||
(* reserved. This file is distributed under the terms of the Q *)
|
(* Copyright 2012 Benedikt Meurer. *)
|
||||||
(* Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Emission of ARM assembly code, 64-bit mode *)
|
(* Emission of ARM assembly code, 64-bit mode *)
|
||||||
|
|
||||||
|
|
|
@ -1,16 +1,19 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* Benedikt Meurer, University of Siegen *)
|
(* Benedikt Meurer, University of Siegen *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2013 Institut National de Recherche en Informatique *)
|
(* Copyright 2013 Institut National de Recherche en Informatique et *)
|
||||||
(* et en Automatique. Copyright 2012 Benedikt Meurer. All rights *)
|
(* en Automatique. *)
|
||||||
(* reserved. This file is distributed under the terms of the Q *)
|
(* Copyright 2012 Benedikt Meurer. *)
|
||||||
(* Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Description of the ARM processor in 64-bit mode *)
|
(* Description of the ARM processor in 64-bit mode *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2013 Institut National de Recherche en Informatique et *)
|
(* Copyright 2013 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Reloading for the ARM 64 bits *)
|
(* Reloading for the ARM 64 bits *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2013 Institut National de Recherche en Informatique et *)
|
(* Copyright 2013 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
let _ = let module M = Schedgen in () (* to create a dependency *)
|
let _ = let module M = Schedgen in () (* to create a dependency *)
|
||||||
|
|
||||||
|
|
|
@ -1,16 +1,19 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* Benedikt Meurer, University of Siegen *)
|
(* Benedikt Meurer, University of Siegen *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2013 Institut National de Recherche en Informatique *)
|
(* Copyright 2013 Institut National de Recherche en Informatique et *)
|
||||||
(* et en Automatique. Copyright 2012 Benedikt Meurer. All rights *)
|
(* en Automatique. *)
|
||||||
(* reserved. This file is distributed under the terms of the Q *)
|
(* Copyright 2012 Benedikt Meurer. *)
|
||||||
(* Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Instruction selection for the ARM processor *)
|
(* Instruction selection for the ARM processor *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* From lambda to assembly code *)
|
(* From lambda to assembly code *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* From lambda to assembly code *)
|
(* From lambda to assembly code *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Build libraries of .cmx files *)
|
(* Build libraries of .cmx files *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Build libraries of .cmx files *)
|
(* Build libraries of .cmx files *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Link a set of .cmx/.o files and produce an executable *)
|
(* Link a set of .cmx/.o files and produce an executable *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Link a set of .cmx/.o files and produce an executable or a plugin *)
|
(* Link a set of .cmx/.o files and produce an executable or a plugin *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2002 Institut National de Recherche en Informatique et *)
|
(* Copyright 2002 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* "Package" a set of .cmx/.o files into one .cmx/.o file having the
|
(* "Package" a set of .cmx/.o files into one .cmx/.o file having the
|
||||||
original compilation units as sub-modules. *)
|
original compilation units as sub-modules. *)
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2002 Institut National de Recherche en Informatique et *)
|
(* Copyright 2002 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* "Package" a set of .cmx/.o files into one .cmx/.o file having the
|
(* "Package" a set of .cmx/.o files into one .cmx/.o file having the
|
||||||
original compilation units as sub-modules. *)
|
original compilation units as sub-modules. *)
|
||||||
|
|
|
@ -1,15 +1,18 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* Mark Shinwell, Jane Street Europe *)
|
(* Mark Shinwell, Jane Street Europe *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
open Mach
|
open Mach
|
||||||
open Linearize
|
open Linearize
|
||||||
|
|
|
@ -1,15 +1,18 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* Mark Shinwell, Jane Street Europe *)
|
(* Mark Shinwell, Jane Street Europe *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2015 Institut National de Recherche en Informatique et *)
|
(* Copyright 2015 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Fix up conditional branches that exceed hardware-allowed ranges. *)
|
(* Fix up conditional branches that exceed hardware-allowed ranges. *)
|
||||||
|
|
||||||
|
|
|
@ -1,15 +1,18 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* Mark Shinwell, Jane Street Europe *)
|
(* Mark Shinwell, Jane Street Europe *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2015 Institut National de Recherche en Informatique et *)
|
(* Copyright 2015 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
module type S = sig
|
module type S = sig
|
||||||
(* The distance between two instructions, in arbitrary units (typically
|
(* The distance between two instructions, in arbitrary units (typically
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
||||||
|
@ -10,7 +10,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
||||||
|
@ -10,7 +10,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* A variant of the "lambda" code with direct / indirect calls explicit
|
(* A variant of the "lambda" code with direct / indirect calls explicit
|
||||||
and closures explicit too *)
|
and closures explicit too *)
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* A variant of the "lambda" code with direct / indirect calls explicit
|
(* A variant of the "lambda" code with direct / indirect calls explicit
|
||||||
and closures explicit too *)
|
and closures explicit too *)
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Introduction of closures, uncurrying, recognition of direct calls *)
|
(* Introduction of closures, uncurrying, recognition of direct calls *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Introduction of closures, uncurrying, recognition of direct calls *)
|
(* Introduction of closures, uncurrying, recognition of direct calls *)
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
||||||
|
@ -10,7 +10,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
||||||
|
@ -10,7 +10,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
type machtype_component =
|
type machtype_component =
|
||||||
| Val
|
| Val
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Second intermediate language (machine independent) *)
|
(* Second intermediate language (machine independent) *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Translation from closed lambda to C-- *)
|
(* Translation from closed lambda to C-- *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Translation from closed lambda to C-- *)
|
(* Translation from closed lambda to C-- *)
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
|
@ -13,7 +13,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Register allocation by coloring of the interference graph *)
|
(* Register allocation by coloring of the interference graph *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Register allocation by coloring of the interference graph *)
|
(* Register allocation by coloring of the interference graph *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1999 Institut National de Recherche en Informatique et *)
|
(* Copyright 1999 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Combine heap allocations occurring in the same basic block *)
|
(* Combine heap allocations occurring in the same basic block *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1999 Institut National de Recherche en Informatique et *)
|
(* Copyright 1999 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Combine heap allocations occurring in the same basic block *)
|
(* Combine heap allocations occurring in the same basic block *)
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
|
@ -13,7 +13,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
|
@ -13,7 +13,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Dead code elimination: remove pure instructions whose results are
|
(* Dead code elimination: remove pure instructions whose results are
|
||||||
not used. *)
|
not used. *)
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Dead code elimination: remove pure instructions whose results are
|
(* Dead code elimination: remove pure instructions whose results are
|
||||||
not used. *)
|
not used. *)
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Generation of assembly code *)
|
(* Generation of assembly code *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Common functions for emitting assembly code *)
|
(* Common functions for emitting assembly code *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Common functions for emitting assembly code *)
|
(* Common functions for emitting assembly code *)
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
||||||
|
@ -10,7 +10,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
||||||
|
@ -10,7 +10,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
||||||
|
@ -10,7 +10,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
||||||
|
@ -10,7 +10,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
||||||
|
@ -10,7 +10,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
||||||
|
@ -10,7 +10,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* CSE for the i386 *)
|
(* CSE for the i386 *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Machine-specific command-line options *)
|
(* Machine-specific command-line options *)
|
||||||
|
|
||||||
|
|
|
@ -1,15 +1,18 @@
|
||||||
#2 "asmcomp/i386/emit.mlp"
|
#2 "asmcomp/i386/emit.mlp"
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Emission of Intel 386 assembly code *)
|
(* Emission of Intel 386 assembly code *)
|
||||||
|
|
||||||
|
|
|
@ -1,15 +1,18 @@
|
||||||
# 2 "asmcomp/i386/proc.ml"
|
# 2 "asmcomp/i386/proc.ml"
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Description of the Intel 386 processor *)
|
(* Description of the Intel 386 processor *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
open Cmm
|
open Cmm
|
||||||
open Arch
|
open Arch
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
let () = let module M = Schedgen in () (* to create a dependency *)
|
let () = let module M = Schedgen in () (* to create a dependency *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1997 Institut National de Recherche en Informatique et *)
|
(* Copyright 1997 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Instruction selection for the Intel x86 *)
|
(* Instruction selection for the Intel x86 *)
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
||||||
|
@ -10,7 +10,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Pierre Chambart, OCamlPro *)
|
(* Pierre Chambart, OCamlPro *)
|
||||||
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
(* Mark Shinwell and Leo White, Jane Street Europe *)
|
||||||
|
@ -10,7 +10,7 @@
|
||||||
(* *)
|
(* *)
|
||||||
(* All rights reserved. This file is distributed under the terms of *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(* the GNU Lesser General Public License version 2.1, with the *)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
(* special exception on linking described in the file ../LICENSE. *)
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
(* *)
|
(* *)
|
||||||
(**************************************************************************)
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Construction of the interference graph.
|
(* Construction of the interference graph.
|
||||||
Annotate pseudoregs with interference lists and preference lists. *)
|
Annotate pseudoregs with interference lists and preference lists. *)
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Construction of the interference graph.
|
(* Construction of the interference graph.
|
||||||
Annotate pseudoregs with interference lists and preference lists. *)
|
Annotate pseudoregs with interference lists and preference lists. *)
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Transformation of Mach code into a list of pseudo-instructions. *)
|
(* Transformation of Mach code into a list of pseudo-instructions. *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Transformation of Mach code into a list of pseudo-instructions. *)
|
(* Transformation of Mach code into a list of pseudo-instructions. *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Liveness analysis.
|
(* Liveness analysis.
|
||||||
Annotate mach code with the set of regs live at each point. *)
|
Annotate mach code with the set of regs live at each point. *)
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Liveness analysis.
|
(* Liveness analysis.
|
||||||
Annotate mach code with the set of regs live at each point. *)
|
Annotate mach code with the set of regs live at each point. *)
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Representation of machine code by sequences of pseudoinstructions *)
|
(* Representation of machine code by sequences of pseudoinstructions *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Representation of machine code by sequences of pseudoinstructions *)
|
(* Representation of machine code by sequences of pseudoinstructions *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Gallium, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
(* Copyright 2014 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* CSE for the PowerPC *)
|
(* CSE for the PowerPC *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Specific operations for the PowerPC processor *)
|
(* Specific operations for the PowerPC processor *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Emission of PowerPC assembly code *)
|
(* Emission of PowerPC assembly code *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Description of the Power PC *)
|
(* Description of the Power PC *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Reloading for the PowerPC *)
|
(* Reloading for the PowerPC *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Instruction scheduling for the Power PC *)
|
(* Instruction scheduling for the Power PC *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1997 Institut National de Recherche en Informatique et *)
|
(* Copyright 1997 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Instruction selection for the Power PC processor *)
|
(* Instruction selection for the Power PC processor *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
|
|
||||||
open Format
|
open Format
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
open Clambda
|
open Clambda
|
||||||
open Format
|
open Format
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Pretty-printing of C-- code *)
|
(* Pretty-printing of C-- code *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Pretty-printing of C-- code *)
|
(* Pretty-printing of C-- code *)
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,17 @@
|
||||||
(***********************************************************************)
|
(**************************************************************************)
|
||||||
(* *)
|
(* *)
|
||||||
(* OCaml *)
|
(* OCaml *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *)
|
||||||
(* *)
|
(* *)
|
||||||
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
(* Copyright 1996 Institut National de Recherche en Informatique et *)
|
||||||
(* en Automatique. All rights reserved. This file is distributed *)
|
(* en Automatique. *)
|
||||||
(* under the terms of the Q Public License version 1.0. *)
|
(* *)
|
||||||
(* *)
|
(* All rights reserved. This file is distributed under the terms of *)
|
||||||
(***********************************************************************)
|
(* the GNU Lesser General Public License version 2.1, with the *)
|
||||||
|
(* special exception on linking described in the file LICENSE. *)
|
||||||
|
(* *)
|
||||||
|
(**************************************************************************)
|
||||||
|
|
||||||
(* Pretty-printing of linearized machine code *)
|
(* Pretty-printing of linearized machine code *)
|
||||||
|
|
||||||
|
|
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue