R
Болдженос устарел
Size: a a a
2021 February 02
R
Там не красиво
R
И софта прикольного нет
R
Но есть нескучные обои
R
Операционка чисто за счёт обоев вывозит
R
Маркетологи конечно гении
ʰ
Блять ты не можешь имя функции придумать?
да и что
пока поставил run
пока поставил run
ʰ
пацаны пацаны
ʰ
зацените
ʰ
(import 'lib/println.rf' 'lib/method.rf')
(def rectangle x y
(ret
x &x
y &y
perimeter (lambda
(* (+
(struct x &args)
(struct y &args)
) 2)
)
area (lambda
(* (struct x &args) (struct y &args))
)
)
)
(def square a
(rectangle &a &a &args)
)
(def describe
(set x (struct x &args))
(set y (struct y &args))
(println
(if (== &x &y)
(ret 'Квадрат со стороной' &x)
else
(ret 'Прямоугольник' &x на &y)
)
(str '(Площадь: ' (method area &args) ')')
(str '(Периметр: ' (method perimeter &args) ')')
)
)
(set p1 (rectangle 5 4))
(set p2 (square 8))
(describe &p1)
(describe &p2)
ʰ
waldemar@onelab:~/Desktop/rafael$ ./rafael main.rf
Прямоугольник 5 на 4 (Площадь: 20) (Периметр: 18)
Квадрат со стороной 8 (Площадь: 64) (Периметр: 32)
ʰ
(import 'lib/println.rf' 'lib/method.rf')
(def rectangle x y
(ret
x &x
y &y
perimeter (lambda
(* (+
(struct x &args)
(struct y &args)
) 2)
)
area (lambda
(* (struct x &args) (struct y &args))
)
)
)
(def square a
(rectangle &a &a &args)
)
(def describe
(set x (struct x &args))
(set y (struct y &args))
(println
(if (== &x &y)
(ret 'Квадрат со стороной' &x)
else
(ret 'Прямоугольник' &x на &y)
)
(str '(Площадь: ' (method area &args) ')')
(str '(Периметр: ' (method perimeter &args) ')')
)
)
(set p1 (rectangle 5 4))
(set p2 (square 8))
(describe &p1)
(describe &p2)
ток щас дошло что сделать метод с аргументами как у макроса все же можно
2021 February 03
S[
(import 'lib/println.rf' 'lib/method.rf')
(def rectangle x y
(ret
x &x
y &y
perimeter (lambda
(* (+
(struct x &args)
(struct y &args)
) 2)
)
area (lambda
(* (struct x &args) (struct y &args))
)
)
)
(def square a
(rectangle &a &a &args)
)
(def describe
(set x (struct x &args))
(set y (struct y &args))
(println
(if (== &x &y)
(ret 'Квадрат со стороной' &x)
else
(ret 'Прямоугольник' &x на &y)
)
(str '(Площадь: ' (method area &args) ')')
(str '(Периметр: ' (method perimeter &args) ')')
)
)
(set p1 (rectangle 5 4))
(set p2 (square 8))
(describe &p1)
(describe &p2)
всё, достаточно. теперь ебаш бутстрап компилятор
ʰ
всё, достаточно. теперь ебаш бутстрап компилятор
хм
звучит прикольно, но я вроде собирался рейтресинг на расте писать
звучит прикольно, но я вроде собирался рейтресинг на расте писать
ʰ
всё, достаточно. теперь ебаш бутстрап компилятор
кароче тут имплементирую еще пару функций, поправлю кое что, добавлю поддержку библиотеки, да напишу пару вещей для нее
ʰ
напишу ридми, краткие доки по билт ин функциям
ʰ
и забью хер, наверное
ʰ
ахахахах