diff options
| author | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-11-03 17:15:27 +0100 |
|---|---|---|
| committer | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-11-03 17:15:27 +0100 |
| commit | 8b24bf0f0fe164e39a2f5ca81e7c0214723b2be3 (patch) | |
| tree | 71556419aef42cc15ee7637628247db86dc577a7 /powerpc/AsmToJSON.ml | |
| parent | 0c999140e3eb696580282375e06fc13d64f6103a (diff) | |
| download | compcert-kvx-8b24bf0f0fe164e39a2f5ca81e7c0214723b2be3.tar.gz compcert-kvx-8b24bf0f0fe164e39a2f5ca81e7c0214723b2be3.zip | |
Removed unused p_char_list function. Bug 17544.
Diffstat (limited to 'powerpc/AsmToJSON.ml')
| -rw-r--r-- | powerpc/AsmToJSON.ml | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/powerpc/AsmToJSON.ml b/powerpc/AsmToJSON.ml index 9735966c..80fce39e 100644 --- a/powerpc/AsmToJSON.ml +++ b/powerpc/AsmToJSON.ml @@ -130,8 +130,6 @@ let p_crbit oc c = let p_label oc l = fprintf oc "{\"Label\":%ld}" (P.to_int32 l) -let p_char_list oc l = fprintf oc "{\"String\":\"%a\"}" (fun oc -> List.iter (output_char oc)) l - let p_list elem oc l = match l with | [] -> fprintf oc "[]" |