Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
|
|
@ -0,0 +1,4 @@
|
|||
"Conditionals in Slate are really messages sent to Boolean objects. Like Smalltalk. (But the compiler might optimize some cases)"
|
||||
balance > 0
|
||||
ifTrue: [inform: 'still sitting pretty!'.]
|
||||
ifFalse: [inform: 'No money till payday!'.].
|
||||
|
|
@ -0,0 +1,15 @@
|
|||
c@(Net URLPathEncoder traits) convert
|
||||
[ | byte1 byte2 byte3 digit1 digit2|
|
||||
[c in isAtEnd] whileFalse:
|
||||
[byte1: c in next.
|
||||
byte1 caseOf: {
|
||||
$+ -> [c out nextPut: $\s].
|
||||
$% -> [byte2: c in next.
|
||||
byte3: c in next.
|
||||
digit1: (byte2 toDigit: 16).
|
||||
digit2: (byte3 toDigit: 16).
|
||||
digit1 isNil \/ [digit2 isNil] ifTrue: [error: 'Error reading hex sequence after %'].
|
||||
c out nextPut: (digit1 * 16 + digit2 as: c out elementType)].
|
||||
} otherwise: [c out nextPut: byte1].
|
||||
].
|
||||
].
|
||||
|
|
@ -0,0 +1 @@
|
|||
[p isAtEnd] whileFalse: [p next evaluate]].
|
||||
Loading…
Add table
Add a link
Reference in a new issue