Another update from ingydotnet^djgoku

This commit is contained in:
Ingy döt Net 2015-11-18 06:14:39 +00:00
parent 91df62d461
commit 948b86eafa
7604 changed files with 108452 additions and 22726 deletions

View file

@ -0,0 +1,7 @@
DATA: s1 TYPE string,
s2 TYPE string.
s1 = 'Hello'.
CONCATENATE s1 ' literal' INTO s2 RESPECTING BLANKS.
WRITE: / s1.
WRITE: / s2.

View file

@ -0,0 +1,3 @@
$ string1 = "hello"
$ string2 = string1 + " world"
$ show symbol string*

View file

@ -0,0 +1,11 @@
#import system.
#import extensions.
#symbol program =
[
#var s := "Hello".
#var s2 := s + " literal".
console writeLine:s.
console writeLine:s2.
].

View file

@ -0,0 +1,2 @@
(defun glue (str1 str2)
(concat str1 str2) )

View file

@ -0,0 +1,2 @@
(defun glue (str1 str2)
(format "%s%s" str1 str2) )

View file

@ -0,0 +1,3 @@
(setq str1 "Hello, ")
(setq str2 "World!")
(insert (glue str1 str2) )

View file

@ -1,7 +1,5 @@
// rust 0.13
fn main() {
let s = "hello".to_string();
let s = "hello".to_owned();
println!("{}", s);
let s1 = s + " world";

View file

@ -0,0 +1,2 @@
"HELLO"→Str0
Str0+" WORLD!"→Str0