17 lines
369 B
Plaintext
17 lines
369 B
Plaintext
main :: () {
|
|
s := "1 2 3 ";
|
|
found := true;
|
|
right := s;
|
|
while found {
|
|
found, left:, right = split_from_left(right, #char " ");
|
|
while left.count == 0 && found {
|
|
found, left, right = split_from_left(right, #char " ");
|
|
}
|
|
print_vars(found, left, right);
|
|
}
|
|
}
|
|
|
|
#import "Basic";
|
|
#import "String";
|
|
#import "Print_Vars";
|