mirror of
				https://github.com/johnwhitington/cpdf-source.git
				synced 2025-06-05 22:09:39 +02:00 
			
		
		
		
	Remove old debug
This commit is contained in:
		| @@ -146,13 +146,9 @@ let process_specials pdf endpage filename bates batespad num page s = | ||||
|  | ||||
| let runs_of_utf8 s = | ||||
|   let identifier, fontpack = (res ()).current_fontpack in | ||||
|   (*Printf.printf "runs_of_utf8: %s\n" identifier;*) | ||||
|   let codepoints = Pdftext.codepoints_of_utf8 s in | ||||
|   (*Printf.printf "%i codepoints\n" (length codepoints);*) | ||||
|   let triples = option_map (Cpdfembed.get_char fontpack) codepoints in | ||||
|   (*Printf.printf "%i triples\n" (length triples);*) | ||||
|   let collated = Cpdfembed.collate_runs triples in | ||||
|     (*Printf.printf "Collated of length %i\n" (length collated);*) | ||||
|     flatten | ||||
|      (map | ||||
|        (fun l -> | ||||
|   | ||||
		Reference in New Issue
	
	Block a user