Телеграмм чат группы scheme

Size: a a a

Сообщество Scheme

2020 January 26

Racket Cade Game Engine

The r-cade package is a very simple game engine for the Racket programming language

https://github.com/massung/r-cade

источник

18:14пожаловаться #1

2020 February 01

b⛅

bouncepaw ⛅ in Сообщество Scheme

Дано: функция, которая может рекурсировать.

В зависимости от контекста, мне нужно, чтобы она рекурнула ни разу, либо рекурила, пока хочет. Знаю, что надо копать в сторону комбинаторов. В сторону какого?

источник

19:14пожаловаться #2

b⛅

bouncepaw ⛅ in Сообщество Scheme

а, ну можно это сделать прямолинейно. Просто передать аргумент: рекурить единожды или много раз... Скучно-то как

источник

19:17пожаловаться #3

2020 February 05

b⛅

bouncepaw ⛅ in Сообщество Scheme

Есть список (list 1 2 3). Как получить dotted-list изящно?

источник

15:53пожаловаться #4

b⛅

bouncepaw ⛅ in Сообщество Scheme

(1 2 . 3)

источник

15:53пожаловаться #5

Aragaer in Сообщество Scheme

в смысле без последнего nil?

источник

15:55пожаловаться #6

b⛅

bouncepaw ⛅ in Сообщество Scheme

Aragaer

в смысле без последнего nil?

да

источник

15:59пожаловаться #7

Aragaer in Сообщество Scheme

ну .. наверно надо сначала добраться до конца. После чего глядя на (2 . (3 . nil)) сделать из него (2 . 3)

источник

16:00пожаловаться #8

b⛅

bouncepaw ⛅ in Сообщество Scheme

Aragaer

ну .. наверно надо сначала добраться до конца. После чего глядя на (2 . (3 . nil)) сделать из него (2 . 3)

это же неизящно

источник

16:00пожаловаться #9

Aragaer in Сообщество Scheme

то есть надо найти ту cons-пару, в которую вложена та, в которой nil. То есть cddr равен nil. Тогда надо выставить cdr равным cdar

источник

16:01пожаловаться #10

b⛅

bouncepaw ⛅ in Сообщество Scheme

Aragaer

спс, так и сделаю

источник

16:01пожаловаться #11

b⛅

bouncepaw ⛅ in Сообщество Scheme

хотя я всё ещё в поиске изящного желания!

источник

16:01пожаловаться #12

b⛅

bouncepaw ⛅ in Сообщество Scheme

изящное — такое, которое вызовет экстаз

источник

16:01пожаловаться #13

Aragaer in Сообщество Scheme

http://clhs.lisp.se/Body/f_last.htm - ну вот (last my_list 2) это как раз вернет нужную ячейку

источник

16:03пожаловаться #14

Aragaer in Сообщество Scheme

а, стоп, я разные лиспы путаю

источник

16:03пожаловаться #15

b⛅

bouncepaw ⛅ in Сообщество Scheme

(define (proper->dotted lst)
  (cond
    [(eq? '() (cddr lst))
     (cons (car lst) (cadr lst))]
    [else
      (cons (car lst) (proper->dotted (cdr lst)))]))

источник

16:05пожаловаться #16

b⛅

bouncepaw ⛅ in Сообщество Scheme

Aragaer

портировал это

источник

16:05пожаловаться #17

b⛅

bouncepaw ⛅ in Сообщество Scheme

не покрывает случай списков длиной 1 :)

источник