<commit_before>(load "fu-er-com.asd")
(ql:quickload :fu-er-com)

(defpackage :fu-er-com.start
  (:use :cl :hunchentoot :cl-who :parenscript))
(in-package :fu-er-com.start)

(defparameter *server* nil)

(defun stop-server ()
  (when *server*
    (stop *server*)
    (setq *server* nil)))

(defun start-server ()
  (stop-server)
  (start (make-instance 'easy-acceptor
                        :address "localhost"
                        :port 8080
                        :document-root #p"www/")))

(defun setup-cl-who ()
  (setf (html-mode) :html5)
  ; Allow cl-who and parenscript to work together
  (setf *js-string-delimiter* #\"))

(setup-cl-who)
(start-server)<commit_msg>Don't bind on localhost<commit_after>(load "fu-er-com.asd")
(ql:quickload :fu-er-com)

(defpackage :fu-er-com.start
  (:use :cl :hunchentoot :cl-who :parenscript))
(in-package :fu-er-com.start)

(defparameter *server* nil)

(defun stop-server ()
  (when *server*
    (stop *server*)
    (setq *server* nil)))

(defun start-server ()
  (stop-server)
  (start (make-instance 'easy-acceptor
                        :port 8080
                        :document-root #p"www/")))

(defun setup-cl-who ()
  (setf (html-mode) :html5)
  ; Allow cl-who and parenscript to work together
  (setf *js-string-delimiter* #\"))

(setup-cl-who)
(start-server)
{'fraction_non_alphanumeric': 0.16982562547384383, 'fraction_numerical': 0.0075815011372251705, 'mean_word_length': 2.75, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 3, 'https://': 0, 'lorem ipsum': 0, 'www.': 2, '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': '3649675', 'n_tokens_mistral': 509, 'n_tokens_neox': 490, 'n_words': 106}