Skip to content
Snippets Groups Projects
Commit 31f7e1bd authored by Loïc Correnson's avatar Loïc Correnson Committed by David Bühler
Browse files

[ivette/api] fix signal generation

parent eb05e7ac
No related branches found
No related tags found
No related merge requests found
......@@ -349,8 +349,9 @@ let makeDeclaration fmt names d =
Format.fprintf fmt " name: '%s',@\n" (Pkg.name_of_ident d.d_ident) ;
Format.fprintf fmt " input: %a,@\n" makeParam input ;
Format.fprintf fmt " output: %a,@\n" makeParam output ;
Format.fprintf fmt " signals: [%a],@\n"
(Pretty_utils.pp_list ~pre:"@[<hov 2>[ " ~sep:",@ " ~suf:"@ ]@]"
Format.fprintf fmt " signals: %a,@\n"
(Pretty_utils.pp_list
~empty:"[]" ~pre:"@[<hov 2>[ " ~sep:",@ " ~suf:"@ ]@]"
(fun fmt s -> Format.fprintf fmt "{ name: '%s' }" s))
rq.rq_signals;
Format.fprintf fmt "};@\n" ;
......
......@@ -478,7 +478,7 @@ const getInformations_internal: Server.GetRequest<
title: Json.jFail(Json.jString,'String expected'),
descr: jTextSafe,
})),
signals: [[ { name: 'kernel.ast.getInformationsUpdate' } ]],
signals: [ { name: 'kernel.ast.getInformationsUpdate' } ],
};
/** Get available informations about markers. When no marker is given, returns all kinds of informations (with empty `descr` field). */
export const getInformations: Server.GetRequest<
......
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