@yosgspecさんが投稿したコード一覧 | ページ 5 | Codetter（こーどったー）

;https://yukicoder.me/problems/no/246
#runtime "hsp3cl"

numMin=1
numMax=1000000001

//https://yukicoder.me/submissions/292157 を移植
const rl=require("readline").createInterface(process.stdin,process.stdout);

const g=function*(){
	var numMin=1;

//https://yukicoder.me/submissions/292157 を移植
const rl=require("readline").createInterface(process.stdin,process.stdout);
const readline=()=>new Promise(r=>rl.once("line",s=>r(s)));

(async function(){

#runtime "hsp3cl"

#define ctype Person(%1,%2,%3,%4,%5) \
	%1_name.%2=%3 :\
	%1_age.%2=%4 :\

#runtime "hsp3cl"
#cmpopt varinit 1

#module CharaBase _name,_hp,_mp,_waza
	#modcfunc name

(println "def")
(def seed 256)
(dotimes[i 3]
	(def rnd seed)
	(time(loop[i 0](when(< i 10000000)

#!reader=srfi/49
(import (srfi 49))
import
	srfi 1

;CommonLisp
(format t
	"~{~A~^~%~}~%"
	(loop for i from 1 to 100 collect
		(let (

TestXS.clj
(require 'XorShift)

(let [
	r_def (XorShift/make-XorShift-defaultSeed)

(defstruct SPerson
	name
	age
)