#!/usr/bin/newlisp # stringcat - benchmark newLISP v.8.3.0 or later required (set 'n (integer (main-args 2))) (set 'str "") (dotimes (i n) (write-buffer str "hello\n")) (println (length str)) (exit)