diff options
| author | Gaspard Coulet <gaspard.coulet@mines-ales.org> | 2021-04-28 23:05:53 +0200 |
|---|---|---|
| committer | Gaspard Coulet <gaspard.coulet@mines-ales.org> | 2021-04-28 23:05:53 +0200 |
| commit | 9fe033ea88c2f705ec18c232873d056e0c229d72 (patch) | |
| tree | 0647dc8c51610c7336c88c04de2068ea14b21e17 /sem_6/HLIN603/ocaml/TP2/test.caml | |
Initial commit
Diffstat (limited to 'sem_6/HLIN603/ocaml/TP2/test.caml')
| -rw-r--r-- | sem_6/HLIN603/ocaml/TP2/test.caml | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/sem_6/HLIN603/ocaml/TP2/test.caml b/sem_6/HLIN603/ocaml/TP2/test.caml new file mode 100644 index 0000000..a454ab3 --- /dev/null +++ b/sem_6/HLIN603/ocaml/TP2/test.caml @@ -0,0 +1,21 @@ +class aa = +object + method print = print_endline("Je suis A") +end;; +class bb = +object + inherit aa + method print = print_endline("Je suis B") +end;; +class cc = +object + inherit bb as superb +end;; +class dd = +object (self) + inherit cc as super + method print = print_endline("Je suis D") + method m = super#print +end;; +let a = new dd;; +a#m;; |