<commit_before>#!/usr/bin/tclsh8.5

load ../libyajltcl1.5.so
source ../yajl.tcl

package require json
package require huddle

set failed 0

proc dotest {json} {
	set json_obj [yajl create #auto -beautify 0]
	set yajlstr [$json_obj parse $json]
	$json_obj delete
	puts -nonewline "YAJL:\t\t"
	puts $yajlstr

	puts -nonewline "HUDDLE:\t\t"
	set huddle [::yajl::json2huddle $json]
	puts $huddle 
	puts "correct huddle: [huddle isHuddle $huddle]"<commit_msg>use normal package require, since the tests are invoked with an altered search path.<commit_after>#!/usr/bin/tclsh8.5

package require yajltcl
package require json
package require huddle

set failed 0

proc dotest {json} {
	set json_obj [yajl create #auto -beautify 0]
	set yajlstr [$json_obj parse $json]
	$json_obj delete
	puts -nonewline "YAJL:\t\t"
	puts $yajlstr

	puts -nonewline "HUDDLE:\t\t"
	set huddle [::yajl::json2huddle $json]
	puts $huddle 
	puts "correct huddle: [huddle isHuddle $huddle]"
{'fraction_non_alphanumeric': 0.11169102296450939, 'fraction_numerical': 0.012526096033402923, 'mean_word_length': 4.448863636363637, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 3, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '6671425', 'n_tokens_mistral': 425, 'n_tokens_neox': 390, 'n_words': 113}