Skip to content
Snippets Groups Projects
Commit ad8e3e65 authored by Thibault Martin's avatar Thibault Martin
Browse files

[kernel] Add plugin field in extension types

parent ec4810bc
No related branches found
No related tags found
No related merge requests found
...@@ -59,11 +59,13 @@ type extension_single = { ...@@ -59,11 +59,13 @@ type extension_single = {
preprocessor: extension_preprocessor ; preprocessor: extension_preprocessor ;
typer: extension_typer ; typer: extension_typer ;
status: bool ; status: bool ;
plugin: string ;
} }
type extension_block = { type extension_block = {
preprocessor: extension_preprocessor_block ; preprocessor: extension_preprocessor_block ;
typer: extension_typer_block ; typer: extension_typer_block ;
status: bool ; status: bool ;
plugin: string ;
} }
type extension_common = { type extension_common = {
category: ext_category ; category: ext_category ;
...@@ -110,7 +112,7 @@ let make ...@@ -110,7 +112,7 @@ let make
?(short_printer=default_short_printer name) ?(short_printer=default_short_printer name)
?(is_same_ext=default_is_same_ext) ?(is_same_ext=default_is_same_ext)
status : extension_single*extension_common = status : extension_single*extension_common =
{ preprocessor; typer; status}, { preprocessor; typer; status; plugin},
{ category; visitor; printer; short_printer; plugin; is_same_ext } { category; visitor; printer; short_printer; plugin; is_same_ext }
let make_block let make_block
...@@ -123,7 +125,7 @@ let make_block ...@@ -123,7 +125,7 @@ let make_block
?(short_printer=default_short_printer name) ?(short_printer=default_short_printer name)
?(is_same_ext=default_is_same_ext) ?(is_same_ext=default_is_same_ext)
status : extension_block*extension_common = status : extension_block*extension_common =
{ preprocessor; typer; status}, { preprocessor; typer; status; plugin},
{ category; visitor; printer; short_printer; plugin; is_same_ext } { category; visitor; printer; short_printer; plugin; is_same_ext }
module Extensions = struct module Extensions = struct
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment