2martens/uni
1
0
Fork 0
mirror of https://github.com/2martens/uni.git synced 2026-05-06 11:26:25 +02:00
Code Releases Activity

Beide buchstabiere Funktionen funktionieren nun auch mit kleinen Buchstaben.

Browse Source
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
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)]) (let ([xs (string->list text)])
(if [empty? xs] (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)]) (let ([xs (string->list text)])
(if [empty? xs] (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))))
) )
)) ))