Re: [cs-lisp] Viki sizlere omur olmus yine
Vehbi Sinan Tunalioglu yazm#305;#351;: Bulent Murtezaoglu [EMAIL PROTECTED] writes: Ulasimi olan bir elleyebilir mi acaba? Guruba link veriyordum bir yerde, oyle farkettim. Hay Allah yaa! Sunucu yeniden baslatildiginda bizim lisp oturumu tekrar baslatilmiyor otomatik olarak. Bir cozum bulayim. Hos, aslinda yeni bir wiki gerekir mi acaba? Gerekir gibi gözüküyor bence. FM'de dönen Madem Lisp bu kadar süper, neden FM'nin kendisi Php ile yaz#305;lm#305;#351;? tarz#305; muhabbetlere FM ba#287;lam#305;nda mant#305;kl#305; aç#305;klamalar yap#305;lm#305;#351;t#305;. Ama Lisp Çal#305;#351;ma Grubu Vikisi ba#351;l#305;kl#305; bir site için ayn#305; #351;eyi savunmak çok mant#305;kl#305; gelmiyor. Ne dersiniz? Oneriniz var mi? Lisp ile yazilmis birsey mi olsun yine? Yoksa baska seyler? Benim gönlümden Squeak-Seaside geçiyor. Bu platformda çal#305;#351;an haz#305;r bir wiki sistemi olan Pier olsun ya da ba#351;tan yazal#305;m derim. Ama ne alaka dersenizde anlay#305;#351;la kar#351;#305;lar#305;m ;) Sayg#305;lar. ___ cs-lisp mailing list cs-lisp@cs.bilgi.edu.tr http://church.cs.bilgi.edu.tr/lcg http://cs.bilgi.edu.tr/mailman/listinfo/cs-lisp
[cs-lisp] Komut satirinda CLISP ve random sorunu
Selamlar, CL + CGI uygulamaları için ısınma turlarını, yazdığım küçük bir sayısal loto yapmak istedim. Fakat bir sorunla karşılaştım. Başta cgi ve apache gibi unsurlardan kaynaklandığını sandığım sorunun konuyu inceleyince CLISP ile ilgili olduğunu gördüm. Şöyleki, aşağıdaki kodu repl'dan, sbcl ve clisp yorumlayıcıdan çalıştırdığımda sorun yok. Her defasında, beklediğim gibi, farklı random değerleri geliyor. Fakat ; $clisp sloto.lisp şeklinde çalıştırdığımda her zaman aynı değerler geliyor, random funksiyonu her defasında sanki bir stackten okur gibi aynı değerleri veriyor. (defun sloto (nofcol) (setf rndnum nil) (dotimes (j nofcol) (setf kolon nil) (dotimes (i 6) (setf rndnum (random 50)) ;; debug print (print rndnum) (if (zerop rndnum) (if (zerop i) () (setf i (- i 1))) (if (member rndnum kolon) (setf i (- i 1)) (setf kolon (cons rndnum kolon) (setf kolon (sort kolon #')) (print kolon) )) (sloto 2) Belki benim bilmediğim kolay bir yolu ya da yaptığım bariz bir hatam vardır, yardımcı olursanız sevinirim. Necati Keseci ___ cs-lisp mailing list cs-lisp@cs.bilgi.edu.tr http://church.cs.bilgi.edu.tr/lcg http://cs.bilgi.edu.tr/mailman/listinfo/cs-lisp
Re: [cs-lisp] Re: Komut satirinda CLISP ve random sorunu
Evet, bununla sorun ortadan kalktı, cgi olarak da güzel çalışıyor. Teşekkür ederim. Necati Keseci Bulent Murtezaoglu wrote: Necati Keseci [EMAIL PROTECTED] writes: [...] Belki benim bilmediğim kolay bir yolu ya da yaptığım bariz bir hatam vardır, yardımcı olursanız sevinirim. Clisp büyük ihtimalle hem aynı random-state ile çalışmaya başladığı için böyle oluyor. Kodun başına (setf *random-state* (make-random-state t)) gibi birşey koyarak deneyebilir misiniz? (Bu hata değil, spec sistemleri bu konuda serbest bırakıyor). BM ___ cs-lisp mailing list cs-lisp@cs.bilgi.edu.tr http://church.cs.bilgi.edu.tr/lcg http://cs.bilgi.edu.tr/mailman/listinfo/cs-lisp ___ cs-lisp mailing list cs-lisp@cs.bilgi.edu.tr http://church.cs.bilgi.edu.tr/lcg http://cs.bilgi.edu.tr/mailman/listinfo/cs-lisp
