32 lines
617 B
Markdown
32 lines
617 B
Markdown
```c / zig + lisp like
|
|
(fn main (argc :i32 argv :[str]) (v :i32) (
|
|
(set message (concat "hello " (get argv 1) " !\n" ))
|
|
(write :std message)
|
|
(set v 0)))
|
|
```
|
|
|
|
```c + zig like
|
|
i32 main(i32 argc, str[] argv) {
|
|
str message = concat("hello ", argv[1], " !\n");
|
|
write(:std, message);
|
|
return 0;
|
|
}
|
|
```
|
|
|
|
```lisp like
|
|
(set message (concat "Hello " (get argv 1) " !\n"))
|
|
(write 0 message)
|
|
|
|
```
|
|
|
|
```forth + lisp / var'aq like
|
|
"Hello " argv shatter strtie " !\n" strtie disp
|
|
```
|
|
|
|
```fortran c / zig + fortran like
|
|
program main {
|
|
str message = concat("hello ", argv[1], "! \n")
|
|
write(0, "%s", message)
|
|
}
|
|
```
|