SC: The SC Language SystemJapanese / English SC言語ã¯ï¼ŒCommon Lispã§å®Ÿè£…ã•ã‚ŒãŸï¼ŒSå¼ã®ï¼ˆScheme風ã®ï¼‰æ§‹æ–‡ã‚’æŒã¤C言語ã§ã™ï¼ŽãŸã¨ãˆã°ï¼Œä»¥ä¸‹ã®ã‚ˆã†ãªCコード long sum(long *ar, int n){ long s=0; int i=0; do{ if (i >= n) break; s += ar[i++]; } while(1); return s; } を，SCã§ã¯ï¼Œ (def (sum ar n) (fn long (ptr long) int) (def s long 0) (def i int 0) (do-while 1 (if (>= i n) (break)) (+= s (aref ar (inc i))) ) (return s) ) ã¨æ›¸ãã“ã¨ãŒã§ãã¾ã™ï¼Ž ã¾ãŸï¼Œæ‹¡å¼µSC言語ã‹ã‚‰åˆ¥ã®SC言語ã¸ã®ã€Œå¤‰å½¢è¦å‰‡ã€
WisdomSoft
{{#tags}}- {{label}}
{{/tags}}