Ekdohibs
/
ocaml
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Forgot to show attributes. 

git-svn-id: http://caml.inria.fr/svn/ocaml/branches/extension_points@13510 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Alain Frisch 2013-04-11 13:28:37 +00:00
parent feb3e48ffe
commit 8a9188eb3f
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
parsing/printast.ml
View File

@ -460,6 +460,7 @@ and class_description i ppf x =
and class_type_declaration i ppf x =
line i ppf "class_type_declaration %a\n" fmt_location x.pci_loc;
attributes i ppf x.pci_attributes;
let i = i+1 in
line i ppf "pci_virt = %a\n" fmt_virtual_flag x.pci_virt;
line i ppf "pci_params =\n";
@ -544,6 +545,7 @@ and class_field_kind i ppf = function
and class_declaration i ppf x =
line i ppf "class_declaration %a\n" fmt_location x.pci_loc;
attributes i ppf x.pci_attributes;
let i = i+1 in
line i ppf "pci_virt = %a\n" fmt_virtual_flag x.pci_virt;
line i ppf "pci_params =\n";