2martens
/
uni
mirror of https://github.com/2martens/uni.git
1
0
Fork 0
Code Releases Activity

Beide buchstabiere Funktionen funktionieren nun auch mit kleinen Buchstaben.

This commit is contained in:
Jim Martens 2013-11-17 15:50:14 +01:00
parent 9f32168252
commit 39e6a1de52
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
se3/G08_B03_Jim-2martens_Britta-2noack_Jan-Simon-0giesel.rkt
View File

@ -81,7 +81,7 @@ Abgebende: Jim 2martens, Britta 2noack, Jan-Simon 0giesel
(let ([xs (string->list text)])
(if [empty? xs]
'()
(cons (char->schlüssel (car xs)) (buchstabiere (list->string (cdr xs))))
(cons (char->schlüssel (char_to_upperCase(car xs))) (buchstabiere (list->string (cdr xs))))
)
))
@ -138,6 +138,6 @@ Abgebende: Jim 2martens, Britta 2noack, Jan-Simon 0giesel
(let ([xs (string->list text)])
(if [empty? xs]
'()
(cons (char->flagge (car xs)) (buchstabiereFlagge (list->string (cdr xs))))
(cons (char->flagge (char_to_upperCase(car xs))) (buchstabiereFlagge (list->string (cdr xs))))
)
))