Another script for interpreter testing.
The build was successful. Details

This commit is contained in:
Rafal Kupiec 2019-04-10 19:12:44 +02:00
parent 08307c5ad6
commit ab4705518c
Signed by: belliash
GPG Key ID: 4E829243E0CFE6B4
2 changed files with 29 additions and 0 deletions

28
tests/center_text.aer Normal file
View File

@ -0,0 +1,28 @@
class Program {
private string center_text(string $word){
int $tot_width = 30;
char $symbol = '-';
int $middle = (int) round($tot_width/2);
int $length_word = strlen($word);
int $middle_word = (int) round($length_word / 2);
int $last_position = $middle + $middle_word;
int $number_of_spaces = $middle - $middle_word;
string $result = sprintf("%'{$symbol}{$last_position}s", $word);
for(int $i = 0; $i < $number_of_spaces; $i++) {
$result += "$symbol";
}
return $result;
}
void main() {
string $str = 'Example text';
print($this->center_text($str));
}
}
/* Should output
---------------This is some text------------
*/

1
tests/center_text.exp Normal file
View File

@ -0,0 +1 @@
---------Example text---------