Replace pfff with flitter

This commit is contained in:
Joey Yakimowich-Payne 2018-06-04 13:03:46 +09:00
commit c8efc2a088
27 changed files with 295 additions and 293 deletions

View file

@ -8,11 +8,13 @@ generate_nim.cmx : ../../h_program-lang/parse_info.cmx \
../../lang_cpp/parsing/ast_cpp.cmx generate_nim.cmi
generate_nim.cmi : ../../commons/common.cmi
unit_generate_nim.cmo : ../../commons/oUnit.cmi generate_nim.cmi \
../../lang_cpp/parsing/flag_parsing_cpp.cmo ../../globals/config_pfff.cmo \
../../commons/common2.cmi ../../commons/common.cmi \
../../lang_cpp/parsing/ast_cpp.cmo unit_generate_nim.cmi
../../lang_cpp/parsing/flag_parsing_cpp.cmo \
../../globals/config_flitter.cmo ../../commons/common2.cmi \
../../commons/common.cmi ../../lang_cpp/parsing/ast_cpp.cmo \
unit_generate_nim.cmi
unit_generate_nim.cmx : ../../commons/oUnit.cmx generate_nim.cmx \
../../lang_cpp/parsing/flag_parsing_cpp.cmx ../../globals/config_pfff.cmx \
../../commons/common2.cmx ../../commons/common.cmx \
../../lang_cpp/parsing/ast_cpp.cmx unit_generate_nim.cmi
../../lang_cpp/parsing/flag_parsing_cpp.cmx \
../../globals/config_flitter.cmx ../../commons/common2.cmx \
../../commons/common.cmx ../../lang_cpp/parsing/ast_cpp.cmx \
unit_generate_nim.cmi
unit_generate_nim.cmi : ../../commons/oUnit.cmi

View file

@ -942,12 +942,12 @@ and process_fullType ((qualifier, typeC)) =
process_typeC typeC
and process_toplevel = function
| NotParsedCorrectly node -> ""
| NotParsedCorrectly node -> "# Error parsing: " ^ process_list ~delimiter:"" process_token node
| DeclElem node -> process_declaration node
| CppDirectiveDecl node -> process_cpp_directive node
| IfdefDecl node -> ""
| MacroTop ((v1, v2, v3)) -> ""
| MacroVarTop ((v1, v2)) -> ""
| MacroTop ((v1, v2, v3)) -> "# MacroTop"
| MacroVarTop ((v1, v2)) -> "# MacroVarTop"
let iter_ast ast =
List.map process_toplevel ast

View file

@ -21,13 +21,13 @@ let strip_string s =
let get_files glob =
try
let path = Filename.concat Config_pfff.path "/tests/generators/nim/" in
let path = Filename.concat Config_flitter.path "/tests/generators/nim/" in
sort (Common2.glob (spf "%s/%s" path glob))
with
Common2.CmdError (a, b) -> []
let basename fpath =
let fullpath = Filename.concat Config_pfff.path "/tests/generators/nim//" in
let fullpath = Filename.concat Config_flitter.path "/tests/generators/nim//" in
readable ~root:fullpath fpath
let get_code_pairs name =