- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
- 34
- 35
- 36
- 37
- 38
- 39
- 40
- 41
- 42
- 43
- 44
- 45
- 46
- 47
- 48
- 49
- 50
- 51
- 52
- 53
- 54
- 55
- 56
- 57
- 58
- 59
#include <stdio.h>
#include <stdlib.h>
#define value_i int
#define gen_program main()
#define begin {
#define end }
#define sep ;
#define back_val return
#define vis(a) printf ("%d", a)
#define ln printf ("\n")
#define ln3 printf ("\n\n\n")
#define cycle_count for
#define rand rand()
#define gen_rand srand((unsigned)time(NULL))
#define value_c char
#define vis_c(a) printf("%c", a)
#define eq =
#define uneq !=
#define check ==
#define inc(a) a++
#define res %
#define add +
#define sub -
#define blank void
#define small <
#define big >
blank line(blank) sep
value_i gen_program
begin
value_i x, i sep
gen_rand sep
value_c c eq ' ' sep
cycle_count(i eq 1 sep i small 10 sep inc(i))
begin
x eq rand res 10 add 1 sep
if (x uneq 10)
begin
vis(x) sep
vis_c(c) sep
end
end
ln3 sep
line() sep
ln sep
back_val 0 sep
end
blank line(blank)
begin
value_i i sep
cycle_count (i eq 0 sep i small 10 sep inc(i) )
begin
printf("-/*\\") sep
end
printf("-") sep
end
Follow us!
gcc -E, и можно рефакторить :)
Ну less же...
begin/end вместо скобок можно принять, чтобы не разгневать паскалеверующих, да и смирился я с ними, а вот sep вместо точки с запятой - очень странное решение.
Только потом я увидел, что тут весь код такой.
два долбоёба, загнавших CS в глубокую задницу
Делали на основе BPCL и PL/1. В сравнении с PL/1 язык получился весьма простым и годным.
И в 60-х, 70-х ничего другого и не требовалось.
только надо понимать что нехуй пейсать на нём руками
>> нехуй пейсать на нём руками
И что шланг:? Так, Тарас, шланг с виндой не очень дружит, бгг.
Задача кстати упрощается: запилить новый низкоуровневый язык на основе llvm, в котором не будет противоречивых фич и всё с радостью начнут портировать/писать код под него.
Мне llvm тоже нравится. Может найдется группа энтузиастов, которые с его помощью сломят крестобляству хребет.
а чё, функции "подключить функцию с таким-то именем и такой-то сигнатурой из такой-т библиотеки" в нём нету?