comp/lucas-standen-NEA/code2/examples/guestbook.zpy


1
2
3
4
5
6
7
8
9

(defun main int)
	(let names:char** (alloc (sizeof char**)))
	(for i:int 1 (< i 256) 1)
		(set names[i] (readstr))
		(printstr "name_count:")
		(printint i)
		(printchar '\n')
	(endfor)
(endfun)