",
---
> "",
rerun: line 12: 25840 Terminated ./$1
rerun: line 12: 25835 Terminated ./$1
25848 started
535c535
< "",
---
> "",
25853 started
535c535
< "\n"
rerun: line 12: 25844 Terminated ./$1
rerun: line 12: 25848 Terminated ./$1
25859 started
16c16
< exit -1
---
> Error raise (self type, thisMessage argAt(0) code, " ==> ", actual, " not ", expected)
rerun: line 12: 25853 Terminated ./$1
25863 started
20c20
<
---
> assert (3,4)
Object: 3 ==> 3 not 4
Object: 3
Label Line Char Message
------------------------------------------------
iogame 16 395 raise(self type, thisMessage argAt(0) co)...
iogame 20 483 assert(3, 4)
rerun: line 5: kill: (25863) - No such process
25869 started
16c16
< Error raise (self type, thisMessage argAt(0) code, " ==> ", actual, " not ", expected)
---
> Error raise (self type, thisMessage argAt(0) code .. " ==> " .. actual .. " not " .. expected)
rerun: line 12: 25859 Terminated ./$1
rerun: line 12: 25863 Bus error ./$1
Object: 3 ==> 3 not 4
Object: 3 ==> 3 not 4
Label Line Char Message
------------------------------------------------
iogame 16 395 raise(self type, thisMessage argAt(0) co)...
iogame 20 491 assert(3, 4)
rerun: line 5: kill: (25869) - No such process
25875 started
20c20
< assert (3,4)
---
> assert (3,Nil)
rerun: line 12: 25869 Bus error ./$1
Object: 3 ==> 3 not Nil
Io.String.invalidArgument: argument 0 to method '..' must be a number or string, not a 'Nil'
Label Line Char Message
------------------------------------------------
iogame 16 468 ..(expected)
iogame 20 491 assert(3, Nil)
rerun: line 5: kill: (25875) - No such process
25881 started
16c16
< Error raise (self type, thisMessage argAt(0) code .. " ==> " .. actual .. " not " .. expected)
---
> Error raise ("assert", self type .. ": " .. thisMessage argAt(0) code)
rerun: line 12: 25875 Bus error ./$1
Object: 3 ==> 3 not Nil
assert: Object: 3
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("assert", self type ..(": ") ..(th)...
iogame 20 467 assert(3, Nil)
rerun: line 5: kill: (25881) - No such process
25886 started
16c16
< Error raise ("assert", self type .. ": " .. thisMessage argAt(0) code)
---
> Error raise ("assert failure", self type .. ": " .. thisMessage argAt(0) code)
rerun: line 12: 25881 Bus error ./$1
Object: 3 ==> 3 not Nil
assert failure: Object: 3
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("assert failure", self type ..(": )...
iogame 20 475 assert(3, Nil)
rerun: line 5: kill: (25886) - No such process
25891 started
16c16
< Error raise ("assert failure", self type .. ": " .. thisMessage argAt(0) code)
---
> Error raise ("Assert Failure", self type .. ": " .. thisMessage argAt(0) code)
rerun: line 12: 25886 Bus error ./$1
Object: 3 ==> 3 not Nil
Assert Failure: Object: 3
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("Assert Failure", self type ..(": )...
iogame 20 475 assert(3, Nil)
rerun: line 5: kill: (25891) - No such process
25900 started
20d19
< assert (3,Nil)
rerun: line 12: 25891 Bus error ./$1
25907 started
76a77
> assert (3,4)
rerun: line 12: 25900 Terminated ./$1
Buffer: 3 ==> 3 not 4
Buffer: 3 ==> 3 not 4
Buffer: 3 ==> 3 not 4
Buffer: 3 ==> 3 not 4
Buffer: 3 ==> 3 not 4
Buffer: 3 ==> 3 not 4
25912 started
77d76
< assert (3,4)
201a201,215
> )
> )
> )
> playFromHand := method (handDeck,
> ranking := list (Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil)
> handDeck foreach (i, v,
> ranking atPut (v rank, v)
> )
> for (i, 1, 7,
> if (ranking at (i) and ranking at (i+1) and ranking at (i+2),
> handDeck do (
> playCard (ranking at (i))
> playCard (ranking at (i+1))
> playCard (ranking at (i+2))
> )
25917 started
361a362,365
> playCard := method (card,
> discard (card id)
> )
>
rerun: line 12: 25907 Terminated ./$1
25925 started
211,215c211,213
< handDeck do (
< playCard (ranking at (i))
< playCard (ranking at (i+1))
< playCard (ranking at (i+2))
< )
---
> handDeck playCard (ranking at (i))
> handDeck playCard (ranking at (i+1))
> handDeck playCard (ranking at (i+2))
rerun: line 12: 25912 Terminated ./$1
rerun: line 12: 25917 Terminated ./$1
25976 started
181a182,194
> playFromHand := method (handDeck,
> playing := handDeck select (i, v, v suit == self suit)
> if (playing count < cards,
> Error raise (type, "Can't satisfy this goal")
> playing sortBy (block (a, b, a rank > b rank))
> while (playing count > cards,
> playing pop
> )
> playing foreach (i, v,
> handDeck playCard (v)
> )
> )
>
213a227
> return
215a230
> Error raise (type, "Can't satisfy this goal")
232a248,263
> )
> playFromHand := method (handDeck,
> ranking := list (Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil)
> handDeck foreach (i, v,
> ranking atPut (v rank, v)
> )
> for (i, 1, 7,
> if (ranking at (i) and ranking at (i+1) and ranking at (i+2) and ranking at (i+3),
> handDeck playCard (ranking at (i))
> handDeck playCard (ranking at (i+1))
> handDeck playCard (ranking at (i+2))
> handDeck playCard (ranking at (i+3))
> return
> )
> )
> Error raise (type, "Can't satisfy this goal")
Io.compiler: expected a message but instead found a open group character
Label Line Char Message
------------------------------------------------
[lexer] 519 13018 ;
rerun: line 5: kill: (25976) - No such process
25987 started
185a186
> )
rerun: line 12: 25976 Bus error ./$1
rerun: line 12: 25925 Terminated ./$1
25994 started
288c288
< return 1
---
> return i
290a291
> return Nil
291a293,308
> playFromHand := method (handDeck,
> rank := isPlayable (handDeck)
> if (rank isNil,
> Error raise (type, "Can't satisify this goal")
> )
> playing := handDeck select (i, v, v rank == rank)
> playing sortBy (block (a, b, a rank > b rank))
> while (playing count > cards,
> playing pop
> )
> playing foreach (i, v,
> handDeck playCard (v)
> )
> )
>
>
rerun: line 12: 25987 Terminated ./$1
26041 started
86a87,89
> setSlot ("==", method (aSuit,
> name == aSuit name or aSuit == self
> )
96a100
> assert (suits at (1) == suits at (1), 1)
Io.compiler: expected a message but instead found a open group character
Label Line Char Message
------------------------------------------------
[lexer] 541 13499 ;
rerun: line 5: kill: (26041) - No such process
26048 started
87,88c87,90
< setSlot ("==", method (aSuit,
< name == aSuit name or aSuit == self
---
> setSlot ("==",
> method (aSuit,
> name == aSuit name or aSuit == self
> )
rerun: line 12: 25994 Terminated ./$1
rerun: line 12: 26041 Bus error ./$1
Object: suits at(1) ==(suits at(1)) ==> yellow not 1
Assert Failure: Object: suits at(1) ==(suits at(1))
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("Assert Failure", self type ..(": )...
iogame 102 2958 assert(suits at(1) ==(suits at(1)), 1)
rerun: line 5: kill: (26048) - No such process
26054 started
102c102
< assert (suits at (1) == suits at (1), 1)
---
> assert (suits at (1), suits at (1))
rerun: line 12: 26048 Bus error ./$1
26059 started
102a103
> assert (suits at (1) == suits at (2), Nil)
rerun: line 5: kill: (26059) - No such process
26065 started
105c105,113
< WildSuit := Suit clone do (name = "wild"; color = "ddd")
---
> WildSuit := Suit clone do (
> name = "wild"
> color = "ddd"
> setSlot ("==",
> method (aSuit,
> name
> )
> )
> )
rerun: line 12: 26054 Terminated ./$1
rerun: line 12: 26059 Segmentation fault ./$1
rerun: line 5: kill: (26065) - No such process
26071 started
114a115,116
> assert (WildSuit == suit at (1), "red")
>
rerun: line 12: 26065 Segmentation fault ./$1
rerun: line 5: kill: (26071) - No such process
26078 started
115c115
< assert (WildSuit == suit at (1), "red")
---
> assert (WildSuit == suit at (1), "foo")
rerun: line 12: 26071 Segmentation fault ./$1
rerun: line 5: kill: (26078) - No such process
26084 started
115c115
< assert (WildSuit == suit at (1), "foo")
---
> //assert (WildSuit == suit at (1), "foo")
rerun: line 12: 26078 Segmentation fault ./$1
rerun: line 5: kill: (26084) - No such process
26089 started
108c108
< setSlot ("==",
---
> setSlot ("=-",
rerun: line 12: 26084 Segmentation fault ./$1
rerun: line 5: kill: (26089) - No such process
26094 started
108,112d107
< setSlot ("=-",
< method (aSuit,
< name
< )
< )
rerun: line 12: 26089 Segmentation fault ./$1
rerun: line 5: kill: (26094) - No such process
26100 started
rerun: line 12: 26094 Segmentation fault ./$1
rerun: line 5: kill: (26100) - No such process
26105 started
103a104
> assert (2,3)
rerun: line 12: 26100 Segmentation fault ./$1
rerun: line 5: kill: (26105) - No such process
26110 started
99a100
> assert (2,3)
104d104
< assert (2,3)
rerun: line 12: 26105 Segmentation fault ./$1
Object: 2 ==> 2 not 3
Assert Failure: Object: 2
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("Assert Failure", self type ..(": )...
iogame 100 2886 assert(2, 3)
rerun: line 5: kill: (26110) - No such process
26116 started
100d99
< assert (2,3)
102a102
> assert (2,3)
rerun: line 12: 26110 Bus error ./$1
Object: 2 ==> 2 not 3
Assert Failure: Object: 2
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("Assert Failure", self type ..(": )...
iogame 102 2958 assert(2, 3)
rerun: line 5: kill: (26116) - No such process
26121 started
102d101
< assert (2,3)
103a103
> assert (2,3)
rerun: line 12: 26116 Bus error ./$1
Object: 2 ==> 2 not 3
Assert Failure: Object: 2
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("Assert Failure", self type ..(": )...
iogame 103 2995 assert(2, 3)
rerun: line 5: kill: (26121) - No such process
26126 started
103d102
< assert (2,3)
104a104
> assert (2,3)
rerun: line 12: 26121 Bus error ./$1
rerun: line 5: kill: (26126) - No such process
26131 started
rerun: line 12: 26126 Segmentation fault ./$1
rerun: line 5: kill: (26131) - No such process
26137 started
87,89c87,88
< setSlot ("==",
< method (aSuit,
< name == aSuit name or aSuit == self
---
> eq := method (aSuit,
> (name == aSuit name) or (aSuit eq (self))
102,104c101,102
< assert (suits at (1), suits at (1))
< assert (suits at (1) == suits at (2), Nil)
< assert (2,3)
---
> assert (suits at (1) eq (suits at (1)), "foo")
> assert (suits at (1) eq (suits at (2)), Nil)
111c109,110
< //assert (WildSuit == suit at (1), "foo")
---
> assert (WildSuit eq (suit at (1)), "foo")
> assert (suit at (1) eq (WildSuit), "foo")
rerun: line 12: 26131 Segmentation fault ./$1
)
suits := list (
Suit clone
Io.compiler: Syntax error near this location
Label Line Char Message
------------------------------------------------
[lexer] 91 2662 ;
rerun: line 5: kill: (26137) - No such process
26143 started
88,89c88
< (name == aSuit name) or (aSuit eq (self))
< )
---
> (name == aSuit name) or (aSuit eq (self))
rerun: line 12: 26137 Bus error ./$1
Object: suits at(1) eq(suits at(1)) ==> yellow not foo
Assert Failure: Object: suits at(1) eq(suits at(1))
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("Assert Failure", self type ..(": )...
iogame 100 2947 assert(suits at(1) eq(suits at(1)), "foo)...
rerun: line 5: kill: (26143) - No such process
26148 started
100c100
< assert (suits at (1) eq (suits at (1)), "foo")
---
> assert (suits at (1) eq (suits at (1)), "yellow")
rerun: line 12: 26143 Bus error ./$1
rerun: line 5: kill: (26148) - No such process
26153 started
rerun: line 12: 26148 Segmentation fault ./$1
rerun: line 5: kill: (26153) - No such process
26161 started
108,109c108,109
< assert (WildSuit eq (suit at (1)), "foo")
< assert (suit at (1) eq (WildSuit), "foo")
---
> //assert (WildSuit eq (suit at (1)), "foo")
> //assert (suit at (1) eq (WildSuit), "foo")
rerun: line 12: 26153 Segmentation fault ./$1
26166 started
26170 started
rerun: line 12: 26161 Segmentation fault ./$1
rerun: line 12: 26166 Terminated ./$1
26174 started
26179 started
rerun: line 12: 26170 Terminated ./$1
26183 started
26187 started
rerun: line 12: 26174 Segmentation fault ./$1
rerun: line 12: 26179 Terminated ./$1
26191 started
rerun: line 12: 26183 Terminated ./$1
rerun: line 5: kill: (26191) - No such process
26197 started
87,89c87,89
< eq := method (aSuit,
< (name == aSuit name) or (aSuit eq (self))
< )
---
> // eq := method (aSuit,
> // (name == aSuit name) or (aSuit eq (self))
> // )
100,101c100,101
< assert (suits at (1) eq (suits at (1)), "yellow")
< assert (suits at (1) eq (suits at (2)), Nil)
---
> //assert (suits at (1) eq (suits at (1)), "yellow")
> //assert (suits at (1) eq (suits at (2)), Nil)
rerun: line 12: 26191 Segmentation fault ./$1
rerun: line 12: 26187 Terminated ./$1
26201 started
26377 started
87,89c87,92
< // eq := method (aSuit,
< // (name == aSuit name) or (aSuit eq (self))
< // )
---
> isWild := Nil
> setSlot ("==",
> method (aSuit,
> (name == aSuit name) or aSuit isWild
> )
> )
100c103
< //assert (suits at (1) eq (suits at (1)), "yellow")
---
> assert (suits at (1) == suits at (1), "yellow")
105a109
> setSlot ("==", method (aSuit, self))
rerun: line 12: 26201 Terminated ./$1
rerun: line 12: 26197 Terminated ./$1
26381 started
103c103
< assert (suits at (1) == suits at (1), "yellow")
---
> assert (suits at (1) == suits at (1), "xyellow")
rerun: line 12: 26377 Terminated ./$1
Object: suits at(1) ==(suits at(1)) ==> yellow not xyellow
Assert Failure: Object: suits at(1) ==(suits at(1))
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("Assert Failure", self type ..(": )...
iogame 103 2974 assert(suits at(1) ==(suits at(1)), "xye)...
rerun: line 5: kill: (26381) - No such process
26387 started
103,104c103,104
< assert (suits at (1) == suits at (1), "xyellow")
< //assert (suits at (1) eq (suits at (2)), Nil)
---
> assert (suits at (1) == suits at (1), "yellow")
> assert (suits at (1) == suits at (2), Nil)
rerun: line 12: 26381 Bus error ./$1
26391 started
112,113c112,113
< //assert (WildSuit eq (suit at (1)), "foo")
< //assert (suit at (1) eq (WildSuit), "foo")
---
> assert (WildSuit eq (suit at (1)), "foo")
> assert (suit at (1) eq (WildSuit), "foo")
rerun: line 12: 26387 Terminated ./$1
Io.Object.doesNotRespond: Object does not respond to message 'eq'
Label Line Char Message
------------------------------------------------
iogame 112 3178 eq(suit at(1))
iogame 112 3165 assert(WildSuit eq(suit at(1)), "foo")
rerun: line 5: kill: (26391) - No such process
26396 started
112,113c112,113
< assert (WildSuit eq (suit at (1)), "foo")
< assert (suit at (1) eq (WildSuit), "foo")
---
> assert (WildSuit == (suit at (1)), "foo")
> assert (suit at (1) == (WildSuit), "foo")
rerun: line 12: 26391 Bus error ./$1
Io.Object.doesNotRespond: Object does not respond to message 'suit'
Label Line Char Message
------------------------------------------------
iogame 112 3184 suit
iogame 112 3165 assert(WildSuit ==(suit at(1)), "foo")
iogame 112 3178 ==(suit at(1))
rerun: line 5: kill: (26396) - No such process
26402 started
113c113
< assert (suit at (1) == (WildSuit), "foo")
---
> //assert (suit at (1) == (WildSuit), "foo")
rerun: line 12: 26396 Bus error ./$1
Io.Object.doesNotRespond: Object does not respond to message 'suit'
Label Line Char Message
------------------------------------------------
iogame 112 3184 suit
iogame 112 3165 assert(WildSuit ==(suit at(1)), "foo")
iogame 112 3178 ==(suit at(1))
rerun: line 5: kill: (26402) - No such process
26407 started
112c112
< assert (WildSuit == (suit at (1)), "foo")
---
> //assert (WildSuit == (suit at (1)), "foo")
rerun: line 12: 26402 Bus error ./$1
26411 started
113c113
< //assert (suit at (1) == (WildSuit), "foo")
---
> assert (suit at (1) == (WildSuit), "foo")
rerun: line 12: 26407 Terminated ./$1
Io.Object.doesNotRespond: Object does not respond to message 'suit'
Label Line Char Message
------------------------------------------------
iogame 113 3215 suit
iogame 113 3209 assert(suit at(1) ==(WildSuit), "foo")
rerun: line 5: kill: (26411) - No such process
26416 started
112,113c112,113
< //assert (WildSuit == (suit at (1)), "foo")
< assert (suit at (1) == (WildSuit), "foo")
---
> //assert (WildSuit == (suits at (1)), "foo")
> assert (suits at (1) == (WildSuit), "foo")
rerun: line 12: 26411 Bus error ./$1
Object: suits at(1) ==(WildSuit) ==> Nil not foo
Assert Failure: Object: suits at(1) ==(WildSuit)
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("Assert Failure", self type ..(": )...
iogame 113 3210 assert(suits at(1) ==(WildSuit), "foo")
rerun: line 5: kill: (26416) - No such process
26422 started
112c112
< //assert (WildSuit == (suits at (1)), "foo")
---
> assert (WildSuit == (suits at (1)), "foo")
rerun: line 12: 26416 Bus error ./$1
Object: WildSuit ==(suits at(1)) ==> Object_0x59d180
(
proto = Object_0x594670
color = "ddd"
== = Block_0x594b50
name = "wild"
)
not foo
Assert Failure: Object: WildSuit ==(suits at(1))
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("Assert Failure", self type ..(": )...
iogame 112 3165 assert(WildSuit ==(suits at(1)), "foo")
rerun: line 5: kill: (26422) - No such process
26428 started
108a109
> isWild = self
112c113
< assert (WildSuit == (suits at (1)), "foo")
---
> assert (WildSuit == (suits at (1)), WildSuit)
rerun: line 12: 26422 Bus error ./$1
Io.Object.doesNotRespond: Object does not respond to message 'self'
Label Line Char Message
------------------------------------------------
iogame 109 3132 self
rerun: line 5: kill: (26428) - No such process
26434 started
109c109
< isWild = self
---
> isWild = 1
rerun: line 12: 26428 Bus error ./$1
Object: suits at(1) ==(WildSuit) ==> 1 not foo
Assert Failure: Object: suits at(1) ==(WildSuit)
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("Assert Failure", self type ..(": )...
iogame 114 3223 assert(suits at(1) ==(WildSuit), "foo")
rerun: line 5: kill: (26434) - No such process
26439 started
114c114
< assert (suits at (1) == (WildSuit), "foo")
---
> assert (suits at (1) == (WildSuit), 1)
rerun: line 12: 26434 Bus error ./$1
26444 started
113,114c113,114
< assert (WildSuit == (suits at (1)), WildSuit)
< assert (suits at (1) == (WildSuit), 1)
---
> assert ((WildSuit == suits at (1)) isNil, Nil)
> assert ((suits at (1) == WildSuit) isNil, Nil)
26449 started
103c103
< assert (suits at (1) == suits at (1), "yellow")
---
> assert ((suits at (1) == suits at (1)) isNil , Nil)
rerun: line 12: 26439 Terminated ./$1
26454 started
22,82d21
< Markup := Buffer clone do (
< html := method (string, self append (string))
< assert (html("foo"), "foo")
<
< row := method (block,
< html ("
\n")
< )
<
<
< section := method (label, body,
< html (" | | ")
< append (label)
< html (" | ")
< append (body)
< )
<
< bar := method (average,
< width := ((average * 100) floor)
< html ("
")
< )
<
< assert (bar (2.23456), "
")
<
< about := method (
< section (
< "about",
< """IoGame is a small multi-user computer game inspired by the
< card game Target. It's
< source is open under the BSD license. Explore the
< objects in this server."""
< )
< section (
< "Andy Daniel",
< """Silicon Valley chip designer Andy Daniel invented Target.
< Read about him here.
< Buy Target or other games by Andy from his company,
< Enginuity."""
< )
< section (
< "Ward Cunningham",
< """Oregon software developer Ward Cunningham created IoGame
< as his entry in the first Io game contest. Ward plays Target or other
< card games with his family at his local Brew Pub every weekend. Use this
< Google search
< to learn lots more about Ward."""
< )
< section (
< "Steve Dekorte",
< """Bay Area developer Steve Dekorte invented the Io language,
< launched the Io game contest and hosts the pages that IoGame mimics.
< Visit his web page or learn about his
< Io language."""
< )
< )
< )
<
<
< ////////////////////////////////////////////////////////////////////////////////
<
428a368,428
> )
>
>
> ////////////////////////////////////////////////////////////////////////////////
>
> Markup := Buffer clone do (
> html := method (string, self append (string))
> assert (html("foo"), "foo")
>
> row := method (block,
> html ("
\n")
> )
>
>
> section := method (label, body,
> html (" | | ")
> append (label)
> html (" | ")
> append (body)
> )
>
> bar := method (average,
> width := ((average * 100) floor)
> html ("
")
> )
>
> assert (bar (2.23456), "
")
>
> about := method (
> section (
> "about",
> """IoGame is a small multi-user computer game inspired by the
> card game Target. It's
> source is open under the BSD license. Explore the
> objects in this server."""
> )
> section (
> "Andy Daniel",
> """Silicon Valley chip designer Andy Daniel invented Target.
> Read about him here.
> Buy Target or other games by Andy from his company,
> Enginuity."""
> )
> section (
> "Ward Cunningham",
> """Oregon software developer Ward Cunningham created IoGame
> as his entry in the first Io game contest. Ward plays Target or other
> card games with his family at his local Brew Pub every weekend. Use this
> Google search
> to learn lots more about Ward."""
> )
> section (
> "Steve Dekorte",
> """Bay Area developer Steve Dekorte invented the Io language,
> launched the Io game contest and hosts the pages that IoGame mimics.
> Visit his web page or learn about his
> Io language."""
> )
> )
rerun: line 12: 26444 Terminated ./$1
rerun: line 12: 26449 Terminated ./$1
26459 started
525c525
< """Watch this space."""
---
> """contest rules"""
594a595,596
>
> ////////////////////////////////////////////////////////////////////////////////
rerun: line 12: 26454 Terminated ./$1
26464 started
524,525c524,526
< "docs",
< """contest rules"""
---
> "contest",
> """Announcement
> """
26469 started
526c526,531
< """
---
> Thread"""
> )
> markup section (
> "language",
> """Announcement
> Thread"""
rerun: line 12: 26459 Terminated ./$1
rerun: line 12: 26464 Terminated ./$1
26474 started
530,531c530,531
< """Announcement
< Thread"""
---
> """Programming Guide
> Reference Manual"""
26479 started
530,531c530,533
< """Programming Guide
< Reference Manual"""
---
> """Home Page
> Programming Guide
> Reference Manual
> """
rerun: line 12: 26469 Terminated ./$1
26484 started
534a535,541
>
> markup section (
> "game",
> """Rules
> Design Notes
> Source Code
> """
rerun: line 12: 26474 Terminated ./$1
Io.compiler: expected a message but instead found a open group character
Label Line Char Message
------------------------------------------------
[lexer] 611 15816 ;
rerun: line 5: kill: (26484) - No such process
26489 started
541a542
> )
rerun: line 12: 26479 Terminated ./$1
rerun: line 12: 26484 Bus error ./$1
26494 started
529,536d528
< "language",
< """Home Page
< Programming Guide
< Reference Manual
< """
< )
<
< markup section (
540a533,539
> """
> )
> markup section (
> "language",
> """Home Page
> Programming Guide
> Reference Manual
26499 started
34,39c34,41
< suits := list (
< Suit clone do (name = "red"; color = "fcc"),
< Suit clone do (name = "yellow"; color = "ff8"),
< Suit clone do (name = "green"; color = "cfa"),
< Suit clone do (name = "blue"; color = "bdf")
< )
---
> red := Suit clone do (name = "red"; color = "fcc")
> yellow := Suit clone do (name = "yellow"; color = "ff8")
> green := Suit clone do (name = "green"; color = "cfa")
> blue := Suit clone do (name = "blue"; color = "bdf")
>
> suits := list (red, yellow, green, blue)
>
>
42,43c44,45
< assert ((suits at (1) == suits at (1)) isNil , Nil)
< assert (suits at (1) == suits at (2), Nil)
---
> assert ((red == red) isNil , Nil)
> assert ((red == green), Nil)
52,53c54,55
< assert ((WildSuit == suits at (1)) isNil, Nil)
< assert ((suits at (1) == WildSuit) isNil, Nil)
---
> assert ((WildSuit == yellow) isNil, Nil)
> assert ((yellow == WildSuit) isNil, Nil)
rerun: line 12: 26489 Terminated ./$1
26504 started
19a20
>
41d41
<
56a57,59
>
> ////////////////////////////////////////////////////////////////////////////////
>
100d102
<
124a127,144
> playingDeck := Deck clone
>
> list (1,2,3,4,5,6,7,8,9) foreach (i, rank,
> suits foreach (j, suit,
> new := PlayingCard clone
> new suit := suit
> new rank := rank
> new id := playingDeck count
> playingDeck add (new)
> )
> )
>
> assert (playingDeck at(0) id, 0)
> assert (playingDeck at(1) id, 1)
> assert (playingDeck at(0) suit name, "red")
> assert (playingDeck at(4) suit name, "red")
>
>
279,296d298
<
<
< playingDeck := Deck clone
<
< list (1,2,3,4,5,6,7,8,9) foreach (i, rank,
< suits foreach (j, suit,
< new := PlayingCard clone
< new suit := suit
< new rank := rank
< new id := playingDeck count
< playingDeck add (new)
< )
< )
<
< assert (playingDeck at(0) id, 0)
< assert (playingDeck at(1) id, 1)
< assert (playingDeck at(0) suit name, "red")
< assert (playingDeck at(4) suit name, "red")
rerun: line 12: 26494 Terminated ./$1
26543 started
440a441
> turn := 0
652c653
< IoGame
---
> IoGame $turn
rerun: line 12: 26499 Terminated ./$1
26547 started
653c653
< IoGame $turn
---
> IoGame Turn $turn
rerun: line 12: 26504 Terminated ./$1
26552 started
653c653
< IoGame Turn $turn
---
> IoGame
rerun: line 12: 26543 Terminated ./$1
rerun: line 12: 26547 Terminated ./$1
26557 started
84c84
< faceHtml := method (goal .. "
" .. suit name)
---
> faceHtml := method ("a href=explain/" .. id .. ">" .. goal .. "
" .. suit name)
26561 started
84c84
< faceHtml := method ("a href=explain/" .. id .. ">" .. goal .. "
" .. suit name)
---
> faceHtml := method ("" .. goal .. "
" .. suit name)
rerun: line 12: 26552 Terminated ./$1
rerun: line 12: 26557 Terminated ./$1
26566 started
74d73
< // markup html (actionHtml)
510a510,521
> )
>
> explain := method (
> goal := ourGoals cardWithId (query asNumber)
> markup section (
> "goal",
> goal goal replace ("
", " ")
> )
> markup section (
> "code",
> goal getSlot ("isPlayable") code
> )
26571 started
306a307,309
> cardWithId := method (id,
> at (position (id))
> )
rerun: line 12: 26561 Terminated ./$1
26579 started
516c516,517
< goal := ourGoals cardWithId (query asNumber)
---
> id := query asNumber
> goal := ourGoals cardWithId (id)
rerun: line 12: 26566 Terminated ./$1
rerun: line 12: 26571 Terminated ./$1
26584 started
83c83
< faceHtml := method ("" .. goal .. "
" .. suit name)
---
> faceHtml := method ("" .. goal .. "
" .. suit name)
516,517c516
< id := query asNumber
< goal := ourGoals cardWithId (id)
---
> goal := ourGoals cardWithId (query asNumber)
26589 started
rerun: line 12: 26579 Terminated ./$1
26594 started
515c515
< explain := method (
---
> explainx := method (
rerun: line 12: 26584 Terminated ./$1
26598 started
515c515
< explainx := method (
---
> explain := method (
rerun: line 12: 26589 Terminated ./$1
rerun: line 12: 26594 Terminated ./$1
26603 started
523c523
< goal getSlot ("isPlayable") code
---
> "" .. goal getSlot ("isPlayable") code .. ""
26608 started
523c523
< "" .. goal getSlot ("isPlayable") code .. ""
---
> goal getSlot ("isPlayable") code replace ("\n", "
")
rerun: line 12: 26598 Terminated ./$1
26613 started
98a99,104
> Number do (
> red := method (PlayingCard clone do (suit := red; rank := target))
> )
> assert (3 red rank, 3)
> assert (3 red suit, red)
>
316a323
>
rerun: line 12: 26603 Terminated ./$1
rerun: line 12: 26608 Terminated ./$1
Io.Object.doesNotRespond: Object does not respond to message 'target'
Label Line Char Message
------------------------------------------------
iogame 100 2469 target
iogame 102 2480 assert(3 red rank, 3)
iogame 102 2487 red
rerun: line 5: kill: (26613) - No such process
26619 started
100c100
< red := method (PlayingCard clone do (suit := red; rank := target))
---
> red := method (new := PlayingCard clone; new suit := red; new rank := self; new)
rerun: line 12: 26613 Bus error ./$1
rerun: line 5: kill: (26619) - No such process
26625 started
101a102
> assert (3 red type, "PlayingCard")
rerun: line 12: 26619 Segmentation fault ./$1
rerun: line 5: kill: (26625) - No such process
26631 started
102,104c102,104
< assert (3 red type, "PlayingCard")
< assert (3 red rank, 3)
< assert (3 red suit, red)
---
> assert (1 green type, "PlayingCard")
> assert (3 yellow rank, 3)
> assert (5 red suit, red)
rerun: line 12: 26625 Segmentation fault ./$1
Object: 1 green type ==> Suit not PlayingCard
Assert Failure: Object: 1 green type
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("Assert Failure", self type ..(": )...
iogame 102 2494 assert(1 green type, "PlayingCard")
rerun: line 5: kill: (26631) - No such process
26637 started
102,104c102,104
< assert (1 green type, "PlayingCard")
< assert (3 yellow rank, 3)
< assert (5 red suit, red)
---
> assert ((1 green) type, "PlayingCard")
> assert ((3 yellow) rank, 3)
> assert ((5 red) suit, red)
rerun: line 12: 26631 Bus error ./$1
Object: (1 green) type ==> Suit not PlayingCard
Assert Failure: Object: (1 green) type
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("Assert Failure", self type ..(": )...
iogame 102 2494 assert((1 green) type, "PlayingCard")
rerun: line 5: kill: (26637) - No such process
26643 started
100a101,103
> yellow := method (new := PlayingCard clone; new suit := yellow; new rank := self; new)
> green := method (new := PlayingCard clone; new suit := green; new rank := self; new)
> blue := method (new := PlayingCard clone; new suit := blue; new rank := self; new)
rerun: line 12: 26637 Bus error ./$1
rerun: line 5: kill: (26643) - No such process
26649 started
89a90
> example := list (1 red, 3 yellow, 5 blue)
rerun: line 12: 26643 Segmentation fault ./$1
rerun: line 5: kill: (26649) - No such process
26655 started
90c90
< example := list (1 red, 3 yellow, 5 blue)
---
> examplex := list (1 red, 3 yellow, 5 blue)
rerun: line 12: 26649 Segmentation fault ./$1
rerun: line 5: kill: (26655) - No such process
26660 started
rerun: line 12: 26655 Segmentation fault ./$1
rerun: line 5: kill: (26660) - No such process
26666 started
77,92d76
< GoalCard := Card clone do (
< type := "GoalCard"
< points := 2
< cards := 3
< goal := "what
me
worry"
< discard := method (goalDeck discard (self))
< faceHtml := method ("" .. goal .. "
" .. suit name)
< isPlayable := method (handDeck,
< 1
< )
< playFromHand := method (handDek,
< Warning raise(self type, "Don't yet know how to play this card")
< )
< examplex := list (1 red, 3 yellow, 5 blue)
< )
<
108a93,108
>
> GoalCard := Card clone do (
> type := "GoalCard"
> points := 2
> cards := 3
> goal := "what
me
worry"
> discard := method (goalDeck discard (self))
> faceHtml := method ("" .. goal .. "
" .. suit name)
> isPlayable := method (handDeck,
> 1
> )
> playFromHand := method (handDek,
> Warning raise(self type, "Don't yet know how to play this card")
> )
> examplex := list (1 red, 3 yellow, 5 blue)
> )
rerun: line 12: 26660 Segmentation fault ./$1
26671 started
rerun: line 5: kill: (26671) - No such process
26677 started
91c91
< assert ((3 yellow) rank, 3)
---
> assert ((3 yellow) rank, 4)
rerun: line 12: 26671 Segmentation fault ./$1
rerun: line 12: 26666 Segmentation fault ./$1
rerun: line 5: kill: (26677) - No such process
26683 started
90,92c90,92
< assert ((1 green) type, "PlayingCard")
< assert ((3 yellow) rank, 4)
< assert ((5 red) suit, red)
---
> //assert ((1 green) type, "PlayingCard")
> //assert ((3 yellow) rank, 4)
> //assert ((5 red) suit, red)
718a719
> writeln ("started")
rerun: line 12: 26677 Segmentation fault ./$1
rerun: line 5: kill: (26683) - No such process
26688 started
715a716
> writeln ("starting")
rerun: line 12: 26683 Segmentation fault ./$1
rerun: line 5: kill: (26688) - No such process
26694 started
107c107
< examplex := list (1 red, 3 yellow, 5 blue)
---
> //examplex := list (1 red, 3 yellow, 5 blue)
rerun: line 12: 26688 Segmentation fault ./$1
starting
26698 started
rerun: line 12: 26694 Terminated ./$1
starting
26702 started
rerun: line 12: 26698 Terminated ./$1
starting
26707 started
716d715
< writeln ("starting")
718a718
> writeln ("visit", host, port)
720d719
< writeln ("started")
visit
Io.Object.doesNotRespond: Server does not respond to message 'host'
Label Line Char Message
------------------------------------------------
iogame 718 19130 host
rerun: line 5: kill: (26707) - No such process
26712 started
718c718
< writeln ("visit", host, port)
---
> writeln ("visit", port)
rerun: line 12: 26702 Terminated ./$1
rerun: line 12: 26707 Bus error ./$1
visit8080
26719 started
718c718
< writeln ("visit", port)
---
> writeln ("starting on port ", port)
starting on port 8080
26723 started
718c718
< writeln ("starting on port ", port)
---
> writeln ("starting")
rerun: line 12: 26712 Terminated ./$1
starting
26728 started
718c718
< writeln ("starting")
---
> writeln ("start")
rerun: line 12: 26719 Terminated ./$1
rerun: line 12: 26723 Terminated ./$1
start
26733 started
85,88c85,88
< red := method (new := PlayingCard clone; new suit := red; new rank := self; new)
< yellow := method (new := PlayingCard clone; new suit := yellow; new rank := self; new)
< green := method (new := PlayingCard clone; new suit := green; new rank := self; new)
< blue := method (new := PlayingCard clone; new suit := blue; new rank := self; new)
---
> red := method (new := PlayingCard clone; new suit := Lobby red; new rank := self; new)
> yellow := method (new := PlayingCard clone; new suit := Lobby yellow; new rank := self; new)
> green := method (new := PlayingCard clone; new suit := Lobby green; new rank := self; new)
> blue := method (new := PlayingCard clone; new suit := Lobby blue; new rank := self; new)
107c107
< //examplex := list (1 red, 3 yellow, 5 blue)
---
> example := list (1 red, 3 yellow, 5 blue)
start
26738 started
536c536,541
< )
---
> )
> markup section (
> "example",
> ""
> )
> goal example render (markup)
rerun: line 12: 26728 Terminated ./$1
start
26743 started
541c541,548
< goal example render (markup)
---
> example := goal example
> markup row (
> block (
> example for (i, 0, 2,
> example at (i) render (markup)
> )
> )
> )
rerun: line 12: 26733 Terminated ./$1
start
26748 started
541,548c541,543
< example := goal example
< markup row (
< block (
< example for (i, 0, 2,
< example at (i) render (markup)
< )
< )
< )
---
> example := Hand clone
> example addList (goal example)
> example render (markup)
rerun: line 12: 26738 Terminated ./$1
start
26753 started
542c542
< example addList (goal example)
---
> example empty addList (goal example)
rerun: line 12: 26743 Terminated ./$1
start
26758 started
541,543c541,545
< example := Hand clone
< example empty addList (goal example)
< example render (markup)
---
> html ("")
> goal example foreach (i, v,
> v render (markup)
> )
> html ("
\n")
rerun: line 12: 26748 Terminated ./$1
start
26763 started
541c541
< html ("")
---
> markup html ("\n")
---
> markup html ("
\n")
rerun: line 12: 26753 Terminated ./$1
start
26768 started
168a169,173
> example := method (
> hand := list (2 red, 3 red, 5 red, 7 red, 8 red)
> while (hand cound > cards, hand pop)
> hand
> )
rerun: line 12: 26758 Terminated ./$1
start
26772 started
171c171
< while (hand cound > cards, hand pop)
---
> while (hand count > cards, hand pop)
rerun: line 12: 26763 Terminated ./$1
start
26777 started
198a199,200
> example = list (5 red, 6 green, 7 yellow)
>
230a233,234
> example = list (5 red, 6 green, 7 yellow, 8 green)
>
rerun: line 12: 26768 Terminated ./$1
start
26782 started
276a277,281
> example := method (
> hand := list (6 red, 6 yellow, 6 blue, 6 green)
> while (hand count > cards, hand pop)
> hand
> )
rerun: line 12: 26772 Terminated ./$1
start
26787 started
170c170
< hand := list (2 red, 3 red, 5 red, 7 red, 8 red)
---
> hand := list (2 red, 4 red, 5 red, 7 red, 8 red)
171a172
> hand foreach (i, v, v suit = self suit)
rerun: line 12: 26777 Terminated ./$1
start
26792 started
100c100
< faceHtml := method ("" .. goal .. "
" .. suit name)
---
> faceHtml := method ("" .. goal html .. "
" .. suit name)
rerun: line 12: 26782 Terminated ./$1
start
26797 started
90,92c90,92
< //assert ((1 green) type, "PlayingCard")
< //assert ((3 yellow) rank, 4)
< //assert ((5 red) suit, red)
---
> assert ((1 green) type, "PlayingCard")
> assert ((3 yellow) rank, 4)
> assert ((5 red) suit, red)
rerun: line 12: 26787 Terminated ./$1
Object: (3 yellow) rank ==> 3 not 4
Assert Failure: Object: (3 yellow) rank
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("Assert Failure", self type ..(": )...
iogame 91 2425 assert((3 yellow) rank, 4)
rerun: line 5: kill: (26797) - No such process
26802 started
91c91
< assert ((3 yellow) rank, 4)
---
> assert ((3 yellow) rank, 3)
rerun: line 12: 26792 Terminated ./$1
rerun: line 12: 26797 Bus error ./$1
start
26807 started
93a94,98
> String html := method (
> self replace (" ", "
") replace ("_", " ")
> )
> assert ("four of_a kind" html, "four
of a
kindx")
>
rerun: line 12: 26802 Terminated ./$1
Object: "four of_a kind" html ==> four
of a
kind not four
of a
kindx
Assert Failure: Object: "four of_a kind" html
Label Line Char Message
------------------------------------------------
iogame 16 395 raise("Assert Failure", self type ..(": )...
iogame 97 2559 assert("four of_a kind" html, "four
o)...
rerun: line 5: kill: (26807) - No such process
26812 started
97c97
< assert ("four of_a kind" html, "four
of a
kindx")
---
> assert ("four of_a kind" html, "four
of a
kind")
rerun: line 12: 26807 Bus error ./$1
start
26817 started
197,198c197,198
< addCardForEachSuit (FlushGoal clone do (cards = 3; goal = "three
card
flush"))
< addCardForEachSuit (FlushGoal clone do (cards = 4; goal = "four
card
flush"))
---
> addCardForEachSuit (FlushGoal clone do (cards = 3; goal = "three card flush"))
> addCardForEachSuit (FlushGoal clone do (cards = 4; goal = "four card flush"))
204c204
< goal = "three
card
straight"
---
> goal = "three card straight"
238c238
< goal = "four
card
straight"
---
> goal = "four card straight"
319,327c319,327
< addcard (KindGoal clone do (cards = 2; goal = "
pair
"))
< addcard (KindGoal clone do (cards = 2; goal = "
pair
"))
< addcard (KindGoal clone do (cards = 2; goal = "
pair
"))
< addcard (KindGoal clone do (cards = 2; goal = "
pair
"))
< addcard (KindGoal clone do (cards = 3; goal = "three
of a
kind"))
< addcard (KindGoal clone do (cards = 3; goal = "three
of a
kind"))
< addcard (KindGoal clone do (cards = 3; goal = "three
of a
kind"))
< addcard (KindGoal clone do (cards = 4; goal = "four
of a
kind"))
< addcard (KindGoal clone do (cards = 4; goal = "four
of a
kind"))
---
> addcard (KindGoal clone do (cards = 2; goal = "_ pair _"))
> addcard (KindGoal clone do (cards = 2; goal = "_ pair _"))
> addcard (KindGoal clone do (cards = 2; goal = "_ pair _"))
> addcard (KindGoal clone do (cards = 2; goal = "_ pair _"))
> addcard (KindGoal clone do (cards = 3; goal = "three of_a kind"))
> addcard (KindGoal clone do (cards = 3; goal = "three of_a kind"))
> addcard (KindGoal clone do (cards = 3; goal = "three of_a kind"))
> addcard (KindGoal clone do (cards = 4; goal = "four of_a kind"))
> addcard (KindGoal clone do (cards = 4; goal = "four of_a kind"))
rerun: line 12: 26812 Terminated ./$1
start
26822 started
197c197
< addCardForEachSuit (FlushGoal clone do (cards = 3; goal = "three card flush"))
---
> addCardForEachSuit (FlushGoal clone do (cards = 3; goal = "three card flush"))
start
26827 started
555c555
< goal getSlot ("isPlayable") code replace ("\n", "
")
---
> goal getSlot ("isPlayable") code replace ("_", " ")
rerun: line 12: 26817 Terminated ./$1
rerun: line 12: 26822 Terminated ./$1
start
26832 started
551c551
< goal goal replace ("
", " ")
---
> goal goal replace ("_", " ")
555c555
< goal getSlot ("isPlayable") code replace ("_", " ")
---
> goal getSlot ("isPlayable") code replace ("\n", "
")
start
26837 started
rerun: line 12: 26827 Terminated ./$1
start
26842 started
48c48
< name = "wild"
---
> name = "any color"
rerun: line 12: 26832 Terminated ./$1
start
26847 started
48c48
< name = "any color"
---
> name = "wild"
56a57,64
> AnyOneSuit := WildSuit clone
> name := "any suit"
> )
>
> MixedSuit := WildSuit clone
> name := " "
> )
>
170c178
< FlushGoal := GoalCard clone do (
---
> FlushGoal := GoalCard clone do (
198a207,223
> )
>
> AnySuitFlushGoal := FlushGoal clone do (
> suit := AnyOneSuit
> isPlayable := method (handDeck,
> suits := handDeck bySuit
> suits foreach (i, v,
> if (v count >= cards,
> return v
> )
> Nil
> )
> )
>
> goalDeck do (
> add (AnySuitFlushGoal clone do (cards = 5; goal = "five card flush"))
> add (AnySuitFlushGoal clone do (cards = 4; goal = "four card flush"))
rerun: line 12: 26837 Terminated ./$1
)
MixedSuit := WildSuit clone
Io.compiler: Syntax error near this location
Label Line Char Message
------------------------------------------------
[lexer] 59 1362 ;
rerun: line 5: kill: (26847) - No such process
26853 started
57c57
< AnyOneSuit := WildSuit clone
---
> AnyOneSuit := WildSuit clone do (
61c61
< MixedSuit := WildSuit clone
---
> MixedSuit := WildSuit clone do (
rerun: line 12: 26847 Bus error ./$1
rerun: line 12: 26842 Terminated ./$1
Io.compiler: expected a message but instead found a open group character
Label Line Char Message
------------------------------------------------
[lexer] 696 17737 ;
rerun: line 5: kill: (26853) - No such process
26859 started
216a217
> )
rerun: line 12: 26853 Bus error ./$1
start
26864 started
411a412,417
> bySuit := method (
> result := List clone
> suits foreach (i, v,
> result add (self select (ii, vv, vv suit == v))
> )
> )
rerun: line 12: 26859 Terminated ./$1
start
26871 started
180c180,181
< handDeck select (i, v, v suit == self suit) count >= cards
---
> inSuit := handDeck select (i, v, v suit == self suit)
> if (inSuit count >= cards, inSuit, Nil)
189c190
< playing := handDeck select (i, v, v suit == self suit)
---
> playableCards := handDeck isPlayable
210a212,216
> example := method (
> hand := list (2 red, 4 red, 5 red, 7 red, 8 red)
> while (hand count > cards, hand pop)
> hand
> )
308c314
< suit = WildSuit
---
> suit = MixedSuit
start
26876 started
234c234
< suit = WildSuit
---
> suit = MixedSuit
268d267
< suit = WildSuit
422a422,429
> result
> )
> byRank := method (
> ranking := list (Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil)
> handDeck foreach (i, v,
> ranking atPut (v rank, v)
> )
> result
rerun: line 12: 26864 Terminated ./$1
start
26882 started
110a111
> suit := MixedSuit
rerun: line 12: 26871 Terminated ./$1
start
26887 started
191c191
< playableCards := handDeck isPlayable
---
> playableCards := isPlayable (handDeck)
rerun: line 12: 26876 Terminated ./$1
start
26892 started
191c191
< playableCards := isPlayable (handDeck)
---
> playing := isPlayable (handDeck)
rerun: line 12: 26887 Terminated ./$1
rerun: line 12: 26882 Terminated ./$1
start
26897 started
192c192
< if (playing count < cards,
---
> if (playing isNil,
241,244c241
< ranking := list (Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil)
< handDeck foreach (i, v,
< ranking atPut (v rank, v)
< )
---
> ranking := handDeck byRank
428c425,428
< ranking atPut (v rank, v)
---
> if (ranking at (v rank),
> ranking at (v rank) add (v)
> ranking atPut (v rank, list (v))
> )
start
26903 started
114a115
> example := list (1 red, 3 yellow, 5 blue)
118,119c119,130
< playFromHand := method (handDek,
< Warning raise(self type, "Don't yet know how to play this card")
---
> playFromHand := method (handDeck,
> playing := isPlayable (handDeck)
> if (playing isNil,
> Error raise (type, "Can't satisfy this goal")
> )
> playing sortBy (block (a, b, a rank > b rank))
> while (playing count > cards,
> playing pop
> )
> playing foreach (i, v,
> handDeck playCard (v)
> )
121d131
< example := list (1 red, 3 yellow, 5 blue)
189,203c199
< )
< playFromHand := method (handDeck,
< playing := isPlayable (handDeck)
< if (playing isNil,
< Error raise (type, "Can't satisfy this goal")
< )
< playing sortBy (block (a, b, a rank > b rank))
< while (playing count > cards,
< playing pop
< )
< playing foreach (i, v,
< handDeck playCard (v)
< )
< )
<
---
> )
244c240,244
< return 1
---
> list (
> pop (ranking at (i)),
> pop (ranking at (i+1)),
> pop (ranking at (i+2)),
> )
424c424
< handDeck foreach (i, v,
---
> foreach (i, v,
rerun: line 12: 26892 Terminated ./$1
)
)
)
)
playFromHand :=
Io.compiler: missing closing group character for argument list
Label Line Char Message
------------------------------------------------
[lexer] 230 5648 clone
rerun: line 5: kill: (26903) - No such process
26909 started
rerun: line 12: 26897 Terminated ./$1
rerun: line 12: 26903 Bus error ./$1
)
)
)
)
playFromHand :=
Io.compiler: missing closing group character for argument list
Label Line Char Message
------------------------------------------------
[lexer] 230 5648 clone
rerun: line 5: kill: (26909) - No such process
26915 started
132c132
< )
---
> ))
rerun: line 12: 26909 Bus error ./$1
)
//////////////////////////
Io.compiler: Syntax error near this location
Label Line Char Message
------------------------------------------------
[lexer] 132 3376 )
rerun: line 5: kill: (26915) - No such process
26921 started
132c132
< ))
---
> )
343,344d342
<
<
rerun: line 12: 26915 Bus error ./$1
)
)
)
)
playFromHand :=
Io.compiler: missing closing group character for argument list
Label Line Char Message
------------------------------------------------
[lexer] 230 5648 clone
rerun: line 5: kill: (26921) - No such process
26927 started
9a10
> writeln (thisMessage argAt(0) code)
rerun: line 12: 26921 Bus error ./$1
)
)
)
)
playFromHand :=
Io.compiler: missing closing group character for argument list
Label Line Char Message
------------------------------------------------
[lexer] 231 5685 clone
rerun: line 5: kill: (26927) - No such process
26934 started
244c244
< pop (ranking at (i+2)),
---
> pop (ranking at (i+2))
rerun: line 12: 26927 Bus error ./$1
suits at(3) color
suits at(1) name
(red ==(red)) isNil
(red ==(green))
(WildSuit ==(yellow)) isNil
(yellow ==(WildSuit)) isNil
(1 green) type
(3 yellow) rank
(5 red) suit
"four of_a kind" html
draw
add(Card clone do(updateSlot("id", 5)));
draw id
discard(Card clone do(updateSlot("id", 6)));
draw id
playingDeck at(0) id
playingDeck at(1) id
playingDeck at(0) suit name
playingDeck at(4) suit name
add(playingDeck at(3));
add(playingDeck at(6));
position(6)
ourGoals at(4) type
ourGoals detect(i, card, card id ==(ourGoals at(2) id)) id
ourGoals position(ourGoals at(2) id)
ourGoals at(3) type
ourGoals at(3) id type
html("foo")
bar(2.23456)
start
rerun: line 5: kill: (26934) - No such process
26940 started
120a121
> writeln("want to play")
124a126
> writeln("can play")
128a131
> writeln ("choosing cards")
131a135
> writeln ("playing")
rerun: line 12: 26934 Segmentation fault ./$1
suits at(3) color
suits at(1) name
(red ==(red)) isNil
(red ==(green))
(WildSuit ==(yellow)) isNil
(yellow ==(WildSuit)) isNil
(1 green) type
(3 yellow) rank
(5 red) suit
"four of_a kind" html
draw
add(Card clone do(updateSlot("id", 5)));
draw id
discard(Card clone do(updateSlot("id", 6)));
draw id
playingDeck at(0) id
playingDeck at(1) id
playingDeck at(0) suit name
playingDeck at(4) suit name
add(playingDeck at(3));
add(playingDeck at(6));
position(6)
ourGoals at(4) type
ourGoals detect(i, card, card id ==(ourGoals at(2) id)) id
ourGoals position(ourGoals at(2) id)
ourGoals at(3) type
ourGoals at(3) id type
html("foo")
bar(2.23456)
start
26976 started
427c427
< foreach (i, v,
---
> self foreach (i, v,
rerun: line 12: 26940 Terminated ./$1
suits at(3) color
suits at(1) name
(red ==(red)) isNil
(red ==(green))
(WildSuit ==(yellow)) isNil
(yellow ==(WildSuit)) isNil
(1 green) type
(3 yellow) rank
(5 red) suit
"four of_a kind" html
draw
add(Card clone do(updateSlot("id", 5)));
draw id
discard(Card clone do(updateSlot("id", 6)));
draw id
playingDeck at(0) id
playingDeck at(1) id
playingDeck at(0) suit name
playingDeck at(4) suit name
add(playingDeck at(3));
add(playingDeck at(6));
position(6)
ourGoals at(4) type
ourGoals detect(i, card, card id ==(ourGoals at(2) id)) id
ourGoals position(ourGoals at(2) id)
ourGoals at(3) type
ourGoals at(3) id type
html("foo")
bar(2.23456)
start
26981 started
433c433
< result
---
> ranking
suits at(3) color
suits at(1) name
(red ==(red)) isNil
(red ==(green))
(WildSuit ==(yellow)) isNil
(yellow ==(WildSuit)) isNil
(1 green) type
(3 yellow) rank
(5 red) suit
"four of_a kind" html
draw
add(Card clone do(updateSlot("id", 5)));
draw id
discard(Card clone do(updateSlot("id", 6)));
draw id
playingDeck at(0) id
playingDeck at(1) id
playingDeck at(0) suit name
playingDeck at(4) suit name
add(playingDeck at(3));
add(playingDeck at(6));
position(6)
ourGoals at(4) type
ourGoals detect(i, card, card id ==(ourGoals at(2) id)) id
ourGoals position(ourGoals at(2) id)
ourGoals at(3) type
ourGoals at(3) id type
html("foo")
bar(2.23456)
start
want to play
can play
choosing cards
playing
26986 started
490a491
> statistics of the cards or trace the
614a616,624
> )
>
> statistics := method (
> ourGoals foreach (i, v,
> markup section (
> v html,
> "stats here"
> )
> )
rerun: line 12: 26976 Terminated ./$1
suits at(3) color
suits at(1) name
(red ==(red)) isNil
(red ==(green))
(WildSuit ==(yellow)) isNil
(yellow ==(WildSuit)) isNil
(1 green) type
(3 yellow) rank
(5 red) suit
"four of_a kind" html
draw
add(Card clone do(updateSlot("id", 5)));
draw id
discard(Card clone do(updateSlot("id", 6)));
draw id
playingDeck at(0) id
playingDeck at(1) id
playingDeck at(0) suit name
playingDeck at(4) suit name
add(playingDeck at(3));
add(playingDeck at(6));
position(6)
ourGoals at(4) type
ourGoals detect(i, card, card id ==(ourGoals at(2) id)) id
ourGoals position(ourGoals at(2) id)
ourGoals at(3) type
ourGoals at(3) id type
html("foo")
bar(2.23456)
start
26991 started
621c621
< v html,
---
> v goal,
rerun: line 12: 26981 Terminated ./$1
suits at(3) color
suits at(1) name
(red ==(red)) isNil
(red ==(green))
(WildSuit ==(yellow)) isNil
(yellow ==(WildSuit)) isNil
(1 green) type
(3 yellow) rank
(5 red) suit
"four of_a kind" html
draw
add(Card clone do(updateSlot("id", 5)));
draw id
discard(Card clone do(updateSlot("id", 6)));
draw id
playingDeck at(0) id
playingDeck at(1) id
playingDeck at(0) suit name
playingDeck at(4) suit name
add(playingDeck at(3));
add(playingDeck at(6));
position(6)
ourGoals at(4) type
ourGoals detect(i, card, card id ==(ourGoals at(2) id)) id
ourGoals position(ourGoals at(2) id)
ourGoals at(3) type
ourGoals at(3) id type
html("foo")
bar(2.23456)
start
26996 started
83a84,89
>
> html := method (
> markup := Markup clone
> self render (markup)
> markup
> )
rerun: line 12: 26986 Terminated ./$1
suits at(3) color
suits at(1) name
(red ==(red)) isNil
(red ==(green))
(WildSuit ==(yellow)) isNil
(yellow ==(WildSuit)) isNil
(1 green) type
(3 yellow) rank
(5 red) suit
"four of_a kind" html
draw
add(Card clone do(updateSlot("id", 5)));
draw id
discard(Card clone do(updateSlot("id", 6)));
draw id
playingDeck at(0) id
playingDeck at(1) id
playingDeck at(0) suit name
playingDeck at(4) suit name
add(playingDeck at(3));
add(playingDeck at(6));
position(6)
ourGoals at(4) type
ourGoals detect(i, card, card id ==(ourGoals at(2) id)) id
ourGoals position(ourGoals at(2) id)
ourGoals at(3) type
ourGoals at(3) id type
html("foo")
bar(2.23456)
start
27001 started
10c10
< writeln (thisMessage argAt(0) code)
---
> //writeln (thisMessage argAt(0) code)
627c627
< v goal,
---
> v html,
rerun: line 12: 26991 Terminated ./$1
start
27006 started
625c625,635
< ourGoals foreach (i, v,
---
> ourGoals foreach (i, goalCard,
> n := 0
> 100 repeatTimes (
> for (pos, 0, 4,
> myHand at (pos) discard
> myHand atPut (pos, playingDeck draw)
> )
> if (goalCard isPlayable (myHand),
> n = n+1;
> )
> )
627,628c637,638
< v html,
< "stats here"
---
> goalCard html,
> n + " percent"
rerun: line 12: 26996 Terminated ./$1
rerun: line 12: 27001 Terminated ./$1
start
27010 started
638c638
< n + " percent"
---
> n .. " percent"
start
27015 started
627c627
< 100 repeatTimes (
---
> 1000 repeatTimes (
638c638
< n .. " percent"
---
> (n / 10) .. " percent"
rerun: line 12: 27010 Terminated ./$1
rerun: line 12: 27006 Terminated ./$1
start
rerun: line 5: kill: (27015) - No such process
27021 started
627c627
< 1000 repeatTimes (
---
> 100 repeatTimes (
rerun: line 12: 27015 Segmentation fault ./$1
start
27025 started
627c627
< 100 repeatTimes (
---
> 300 repeatTimes (
start
rerun: line 5: kill: (27025) - No such process
27031 started
621a622,633
> n := 0
> 100 repeatTimes (
> aHand := Hand clone
> if (goal isPlayable (aHand)
> n = n + 1
> )
> aHand discardAll
> )
> markup section (
> "stats",
> n .. "% of random hands can play this goal"
> )
627c639
< 300 repeatTimes (
---
> 100 repeatTimes (
638c650
< (n / 10) .. " percent"
---
> n .. " percent"
rerun: line 12: 27021 Terminated ./$1
rerun: line 12: 27025 Segmentation fault ./$1
start
27036 started
459a460,465
>
> throwIn := method (
> self foreach (i, v,
> v discard // without replacement
> )
> )
628c634
< aHand discardAll
---
> aHand throwIn
start
27041 started
631c631
< if (goal isPlayable (aHand)
---
> if (goal isPlayable (aHand),
638c638
< n .. "% of random hands can play this goal"
---
> n .. "% of random hands (sans held cards) can play this goal"
rerun: line 12: 27031 Terminated ./$1
start
27046 started
629c629
< 100 repeatTimes (
---
> 1000 repeatTimes (
638c638
< n .. "% of random hands (sans held cards) can play this goal"
---
> (n / 10) .. "% of random hands (sans held cards) can play this goal"
rerun: line 12: 27036 Terminated ./$1
start
rerun: line 5: kill: (27046) - No such process
27052 started
629c629
< 1000 repeatTimes (
---
> 100 repeatTimes (
rerun: line 12: 27041 Terminated ./$1
rerun: line 12: 27046 Segmentation fault ./$1
start
27056 started
629c629
< 100 repeatTimes (
---
> 200 repeatTimes (
638c638
< (n / 10) .. "% of random hands (sans held cards) can play this goal"
---
> (n / 2) .. "% of random hands (sans held cards) can play this goal"
start
rerun: line 5: kill: (27056) - No such process
27062 started
rerun: line 12: 27052 Terminated ./$1
rerun: line 12: 27056 Bus error ./$1
start
rerun: line 5: kill: (27062) - No such process
27068 started
rerun: line 12: 27062 Segmentation fault ./$1
start
rerun: line 5: kill: (27068) - No such process
27074 started
rerun: line 12: 27068 Bus error ./$1
start
27079 started
629c629
< 200 repeatTimes (
---
> 100 repeatTimes (
638c638
< (n / 2) .. "% of random hands (sans held cards) can play this goal"
---
> n .. " out of 100 random hands could play this goal"
start
want to play
can play
choosing cards
playing
rerun: line 5: kill: (27079) - No such process
27085 started
rerun: line 12: 27079 Bus error ./$1
rerun: line 12: 27074 Terminated ./$1
start
rerun: line 5: kill: (27085) - No such process
27091 started
638c638
< n .. " out of 100 random hands could play this goal"
---
> n .. " out of 100 random hands (sans held cards) could play this goal"
rerun: line 12: 27085 Bus error ./$1
start
want to play
can play
choosing cards
playing
27096 started
191c191,195
< goalDeck addcard := method (card, card id = goalDeck count; add (card))
---
> goalDeck addcard := method (card,
> card id = goalDeck count
> add (card)
> assert ((card isPlayable (card example)) isNil, Nil)
> )
Io.Object.doesNotRespond: List does not respond to message 'card'
Label Line Char Message
------------------------------------------------
iogame 194 4591 card
iogame 218 5265 addCardForEachSuit(FlushGoal clone do(up....
iogame 197 4691 addcard(cardProto clone do(updateSlot("s)...
iogame 194 4584 assert((card isPlayable(card example)) i)...
rerun: line 5: kill: (27096) - No such process
27102 started
194c194
< assert ((card isPlayable (card example)) isNil, Nil)
---
> card assert ((isPlayable (example)) isNil, Nil)
rerun: line 12: 27091 Terminated ./$1
rerun: line 12: 27096 Bus error ./$1
Io.Object.doesNotRespond: List does not respond to message 'byRank'
Label Line Char Message
------------------------------------------------
iogame 252 6087 byRank
iogame 315 7638 addcard(StraightGoal clone)
iogame 194 4589 assert((isPlayable(example)) isNil, Nil)
iogame 194 4602 isPlayable(example)
rerun: line 5: kill: (27102) - No such process
27108 started
418,427c418
< Hand := CardList clone do (
< type := "Hand"
< cardsViewed := 5
< init := method (
< add (playingDeck draw)
< add (playingDeck draw)
< add (playingDeck draw)
< add (playingDeck draw)
< add (playingDeck draw)
< )
---
> PlayingCardList := CardList clone do (
444a436,448
>
> )
>
> Hand := PlayingCardList clone do (
> type := "Hand"
> cardsViewed := 5
> init := method (
> add (playingDeck draw)
> add (playingDeck draw)
> add (playingDeck draw)
> add (playingDeck draw)
> add (playingDeck draw)
> )
467a472
> atPut (i, Nil)
rerun: line 12: 27102 Bus error ./$1
Io.Object.doesNotRespond: List does not respond to message 'byRank'
Label Line Char Message
------------------------------------------------
iogame 252 6087 byRank
iogame 315 7638 addcard(StraightGoal clone)
iogame 194 4589 assert((isPlayable(example)) isNil, Nil)
iogame 194 4602 isPlayable(example)
rerun: line 5: kill: (27108) - No such process
27114 started
122a123,126
> sampleHand := method (
> new := SampleHand clone
> new addList (self example)
> )
194c198
< card assert ((isPlayable (example)) isNil, Nil)
---
> card assert ((isPlayable (sampleHand)) isNil, Nil)
418c422
< PlayingCardList := CardList clone do (
---
> SampleHand := CardList clone do (
439c443
< Hand := PlayingCardList clone do (
---
> Hand := SampleHand clone do (
rerun: line 12: 27108 Bus error ./$1
Io.Object.doesNotRespond: Object does not respond to message 'SampleHand'
Label Line Char Message
------------------------------------------------
iogame 124 3195 SampleHand
iogame 222 5345 addCardForEachSuit(FlushGoal clone do(up....
iogame 201 4771 addcard(cardProto clone do(updateSlot("s)...
iogame 198 4671 assert((isPlayable(sampleHand)) isNil, N)...
iogame 198 4684 isPlayable(sampleHand)
iogame 198 4696 sampleHand
rerun: line 5: kill: (27114) - No such process
27120 started
123,126d122
< sampleHand := method (
< new := SampleHand clone
< new addList (self example)
< )
441a438,443
>
> GoalCard sampleHand := method (
> new := SampleHand clone
> new addList (self example)
> )
>
rerun: line 12: 27114 Bus error ./$1
Io.Object.doesNotRespond: Object does not respond to message 'sampleHand'
Label Line Char Message
------------------------------------------------
iogame 194 4614 sampleHand
iogame 218 5263 addCardForEachSuit(FlushGoal clone do(up....
iogame 197 4689 addcard(cardProto clone do(updateSlot("s)...
iogame 194 4589 assert((isPlayable(sampleHand)) isNil, N)...
iogame 194 4602 isPlayable(sampleHand)
rerun: line 5: kill: (27120) - No such process
27126 started
145a146,190
> CardList := List clone do (
> type := "CardList"
> position := method (id,
> indexOf (detect (i, v, v id == id))
> )
> cardWithId := method (id,
> at (position (id))
> )
> deal := method (number, source,
> number repeatTimes (add (source draw))
> )
> assert (add (playingDeck at(3)); add (playingDeck at(6)); position (6), 1)
> selectSuit := method (desiredSuit,
> select (i, v, v suit == desiredSuit)
> )
>
> )
>
> SampleHand := CardList clone do (
> bySuit := method (
> result := List clone
> suits foreach (i, v,
> result add (self select (ii, vv, vv suit == v))
> )
> result
> )
> byRank := method (
> ranking := list (Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil)
> self foreach (i, v,
> if (ranking at (v rank),
> ranking at (v rank) add (v)
> ranking atPut (v rank, list (v))
> )
> )
> ranking
> )
>
> )
>
> GoalCard sampleHand := method (
> new := SampleHand clone
> new addList (self example)
> )
>
>
375,391d419
< CardList := List clone do (
< type := "CardList"
< position := method (id,
< indexOf (detect (i, v, v id == id))
< )
< cardWithId := method (id,
< at (position (id))
< )
< deal := method (number, source,
< number repeatTimes (add (source draw))
< )
< assert (add (playingDeck at(3)); add (playingDeck at(6)); position (6), 1)
< selectSuit := method (desiredSuit,
< select (i, v, v suit == desiredSuit)
< )
<
< )
416,442d443
<
<
< SampleHand := CardList clone do (
< bySuit := method (
< result := List clone
< suits foreach (i, v,
< result add (self select (ii, vv, vv suit == v))
< )
< result
< )
< byRank := method (
< ranking := list (Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil)
< self foreach (i, v,
< if (ranking at (v rank),
< ranking at (v rank) add (v)
< ranking atPut (v rank, list (v))
< )
< )
< ranking
< )
<
< )
<
< GoalCard sampleHand := method (
< new := SampleHand clone
< new addList (self example)
< )
rerun: line 12: 27120 Bus error ./$1
Io.Object.doesNotRespond: List does not respond to message 'playingDeck'
Label Line Char Message
------------------------------------------------
iogame 157 3864 playingDeck
iogame 157 3846 assert(add(playingDeck at(3));)...
rerun: line 5: kill: (27126) - No such process
27132 started
rerun: line 12: 27126 Bus error ./$1
Io.Object.doesNotRespond: List does not respond to message 'playingDeck'
Label Line Char Message
------------------------------------------------
iogame 157 3864 playingDeck
iogame 157 3846 assert(add(playingDeck at(3));)...
rerun: line 5: kill: (27132) - No such process
27138 started
157d156
< assert (add (playingDeck at(3)); add (playingDeck at(6)); position (6), 1)
rerun: line 12: 27132 Bus error ./$1
GoalCard: (isPlayable(sampleHand)) isNil ==> Object_0x50ad10
(
distribution = "IoServer"
playingDeck = List_0x59c140
WildSuit = Object_0x594310
new = Object_0x5a0780
proto = Object_0x50acb0
AnySuitFlushGoal = Object_0x5a0f60
version = 20041201
rank = 9
Suit = Object_0x1106b80
suits = List_0x5944d0
j = 3
PlayingCard = Object_0x595470
CardList = List_0x59b900
Protos = Object_0x50acb0
yellow = Object_0x5940a0
blue = Object_0x594240
launchPath = "/Users/ward/Documents/Io"
FlushGoal = Object_0x5a0dc0
LongStraightGoal = Object_0x5ef940
assert = Block_0x110f510
Card = Object_0x595270
Deck = List_0x59be30
AnyOneSuit = Object_0x594bd0
MixedSuit = Object_0x595040
goalDeck = List_0x5a08a0
red = Object_0x593f40
StraightGoal = Object_0x5ef0e0
args = List_0x5939a0
GoalCard = Object_0x596060
green = Object_0x594170
SampleHand = List_0x59bc40
Lobby = Object_0x50ad10
i = 8
suit = Object_0x594240
)
not Nil
Assert Failure: GoalCard: (isPlayable(sampleHand)) isNil
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 359 8448 addcard(StraightGoal clone)
iogame 238 5396 assert((isPlayable(sampleHand)) isNil, N)...
rerun: line 5: kill: (27138) - No such process
27144 started
358c358
< goalDeck do (
---
> /* goalDeck do (
367a368
> */
rerun: line 12: 27138 Bus error ./$1
start
want to play
can play
choosing cards
playing
27149 started
358c358
< /* goalDeck do (
---
> goalDeck do (
360,366c360,366
< addcard (StraightGoal clone)
< addcard (LongStraightGoal)
< addcard (LongStraightGoal)
< addcard (StraightGoal clone do (suit = suits at (0)))
< addcard (StraightGoal clone do (suit = suits at (1)))
< addcard (StraightGoal clone do (suit = suits at (2)))
< addcard (StraightGoal clone do (suit = suits at (3)))
---
> // addcard (StraightGoal clone)
> // addcard (LongStraightGoal)
> // addcard (LongStraightGoal)
> // addcard (StraightGoal clone do (suit = suits at (0)))
> // addcard (StraightGoal clone do (suit = suits at (1)))
> // addcard (StraightGoal clone do (suit = suits at (2)))
> // addcard (StraightGoal clone do (suit = suits at (3)))
368c368
< */
---
>
GoalCard: (isPlayable(sampleHand)) isNil ==> Object_0x50ad10
(
proto = Object_0x50acb0
GoalCard = Object_0x596390
j = 3
new = Object_0x5a0cc0
assert = Block_0x110d6f0
rank = 9
Protos = Object_0x50acb0
StraightGoal = Object_0x5f03a0
FlushGoal = Object_0x5a1340
MixedSuit = Object_0x5951e0
PlayingCard = Object_0x595790
suit = Object_0x5941d0
version = 20041201
Deck = List_0x59c390
Suit = Object_0x1106b80
red = Object_0x593f80
launchPath = "/Users/ward/Documents/Io"
CardList = List_0x59bf00
suits = List_0x5944b0
playingDeck = List_0x59c680
LongStraightGoal = Object_0x5f0be0
blue = Object_0x5941d0
WildSuit = Object_0x5945e0
goalDeck = List_0x5a0de0
AnySuitFlushGoal = Object_0x5a14e0
args = List_0x5939a0
green = Object_0x594330
AnyOneSuit = Object_0x594e90
i = 8
yellow = Object_0x5940e0
Lobby = Object_0x50ad10
Card = Object_0x5954b0
SampleHand = List_0x59c1a0
distribution = "IoServer"
)
not Nil
Assert Failure: GoalCard: (isPlayable(sampleHand)) isNil
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 359 8448 addcard(StraightGoal clone)
iogame 238 5396 assert((isPlayable(sampleHand)) isNil, N)...
rerun: line 5: kill: (27149) - No such process
27154 started
359c359
< addcard (StraightGoal clone)
---
> // addcard (StraightGoal clone)
rerun: line 12: 27144 Terminated ./$1
rerun: line 12: 27149 Bus error ./$1
start
27158 started
362c362
< // addcard (LongStraightGoal)
---
> addcard (LongStraightGoal)
rerun: line 12: 27154 Terminated ./$1
start
27163 started
363c363
< // addcard (StraightGoal clone do (suit = suits at (0)))
---
> addcard (StraightGoal clone do (suit = suits at (0)))
GoalCard: (isPlayable(sampleHand)) isNil ==> Object_0x50ad10
(
Suit = Object_0x1106b80
Lobby = Object_0x50ad10
Card = Object_0x595270
proto = Object_0x50acb0
AnySuitFlushGoal = Object_0x5a11a0
i = 8
FlushGoal = Object_0x5a1000
assert = Block_0x110dca0
args = List_0x5939a0
distribution = "IoServer"
j = 3
green = Object_0x594170
launchPath = "/Users/ward/Documents/Io"
suit = Object_0x594240
SampleHand = List_0x59bd40
yellow = Object_0x5940a0
StraightGoal = Object_0x5ee9e0
version = 20041201
PlayingCard = Object_0x595410
playingDeck = List_0x59c340
new = Object_0x5a0990
AnyOneSuit = Object_0x594b50
LongStraightGoal = Object_0x5ef260
Deck = List_0x59c0b0
GoalCard = Object_0x596010
goalDeck = List_0x5a0ab0
WildSuit = Object_0x594490
red = Object_0x593f40
MixedSuit = Object_0x594f70
blue = Object_0x594240
CardList = List_0x59ba00
Protos = Object_0x50acb0
rank = 9
suits = List_0x594360
)
not Nil
Assert Failure: GoalCard: (isPlayable(sampleHand)) isNil
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 363 8570 addcard(StraightGoal clone do(updateSlot)...
iogame 238 5396 assert((isPlayable(sampleHand)) isNil, N)...
rerun: line 5: kill: (27163) - No such process
27169 started
361d360
< // addcard (LongStraightGoal)
363c362,363
< addcard (StraightGoal clone do (suit = suits at (0)))
---
> addcard (LongStraightGoal)
> // addcard (StraightGoal clone do (suit = suits at (0)))
rerun: line 12: 27158 Terminated ./$1
rerun: line 12: 27163 Bus error ./$1
start
27174 started
180a181
> assert (add (4 red); byRank at(4) count, 1)
183a185,186
>
>
306,320d308
< )
< playFromHand := method (handDeck,
< ranking := list (Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil)
< handDeck foreach (i, v,
< ranking atPut (v rank, v)
< )
< for (i, 1, 7,
< if (ranking at (i) and ranking at (i+1) and ranking at (i+2),
< handDeck playCard (ranking at (i))
< handDeck playCard (ranking at (i+1))
< handDeck playCard (ranking at (i+2))
< return
< )
< )
< Error raise (type, "Can't satisfy this goal")
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 181 4350 count
iogame 181 4317 assert(add(4 red);)...
rerun: line 5: kill: (27174) - No such process
27180 started
181c181
< assert (add (4 red); byRank at(4) count, 1)
---
> // assert (add (4 red); byRank at(4) count, 1)
rerun: line 12: 27174 Bus error ./$1
rerun: line 12: 27169 Terminated ./$1
start
want to play
can play
choosing cards
playing
want to play
can play
choosing cards
playing
27216 started
181,182c181
< // assert (add (4 red); byRank at(4) count, 1)
<
---
> assert (add (4 red); byRank at(4) count, 1)
rerun: line 12: 27180 Terminated ./$1
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 181 4350 count
iogame 181 4317 assert(add(4 red);)...
rerun: line 5: kill: (27216) - No such process
27222 started
180a181
> assert (add (4 red); bySuit at(0) count, 1)
rerun: line 12: 27216 Bus error ./$1
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 182 4395 count
iogame 182 4362 assert(add(4 red);)...
rerun: line 5: kill: (27222) - No such process
27228 started
182c182
< assert (add (4 red); byRank at(4) count, 1)
---
> assert (add (3 green); byRank at(3) count, 1)
rerun: line 12: 27222 Bus error ./$1
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 182 4397 count
iogame 182 4362 assert(add(3 green);)...
rerun: line 5: kill: (27228) - No such process
27234 started
174,176c174,177
< if (ranking at (v rank),
< ranking at (v rank) add (v)
< ranking atPut (v rank, list (v))
---
> rank := v rank
> if (ranking at (rank),
> ranking at (rank) add (v)
> ranking atPut (rank, list (v))
rerun: line 12: 27228 Bus error ./$1
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 183 4409 count
iogame 183 4374 assert(add(3 green);)...
rerun: line 5: kill: (27234) - No such process
27239 started
183c183
< assert (add (3 green); byRank at(3) count, 1)
---
> assert (add (3 green); byRank at(2) count, 1)
rerun: line 12: 27234 Bus error ./$1
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 183 4409 count
iogame 183 4374 assert(add(3 green);)...
rerun: line 5: kill: (27239) - No such process
27244 started
183c183
< assert (add (3 green); byRank at(2) count, 1)
---
> assert (add (3 green); byRank at(4) count, 1)
rerun: line 12: 27239 Bus error ./$1
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 183 4409 count
iogame 183 4374 assert(add(3 green);)...
rerun: line 5: kill: (27244) - No such process
27249 started
183a184
> byRank print
rerun: line 12: 27244 Bus error ./$1
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 183 4409 count
iogame 183 4374 assert(add(3 green);)...
rerun: line 5: kill: (27249) - No such process
27254 started
181a182
> byRank print
184d184
< byRank print
rerun: line 12: 27249 Bus error ./$1
Nil, Nil, Nil, Nil, Nil, Nil, Nil, Nil, Nil, Nil
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 184 4423 count
iogame 184 4388 assert(add(3 green);)...
rerun: line 5: kill: (27254) - No such process
27260 started
183c183
< assert (add (4 red); bySuit at(0) count, 1)
---
> assert (add (4 red); print; bySuit at(0) count, 1)
rerun: line 12: 27254 Bus error ./$1
Nil, Nil, Nil, Nil, Nil, Nil, Nil, Nil, Nil, NilObject_0x59c430
(
proto = Object_0x5953b0
rank = 4
suit = Object_0x593f20
)
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 184 4430 count
iogame 184 4395 assert(add(3 green);)...
rerun: line 5: kill: (27260) - No such process
27266 started
182d181
< byRank print
rerun: line 12: 27260 Bus error ./$1
Object_0x59c5f0
(
rank = 4
proto = Object_0x5955c0
suit = Object_0x593fc0
)
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 183 4416 count
iogame 183 4381 assert(add(3 green);)...
rerun: line 5: kill: (27266) - No such process
27272 started
182c182,183
< assert (add (4 red); print; bySuit at(0) count, 1)
---
> assert (add (4 red); add (6 green); count, 1)
> assert (add (4 red); bySuit at(0) count, 1)
rerun: line 12: 27266 Bus error ./$1
CardList: add(4 red);
add(6 green);
count ==> 2 not 1
Assert Failure: CardList: add(4 red);
add(6 green);
count
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 182 4329 assert(add(4 red);)...
rerun: line 5: kill: (27272) - No such process
27278 started
174a175
> writeln (i,v)
rerun: line 12: 27272 Bus error ./$1
CardList: add(4 red);
add(6 green);
count ==> 2 not 1
Assert Failure: CardList: add(4 red);
add(6 green);
count
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 183 4346 assert(add(4 red);)...
rerun: line 5: kill: (27278) - No such process
27284 started
175c175
< writeln (i,v)
---
> writeln ("xx",i,v)
rerun: line 12: 27278 Bus error ./$1
CardList: add(4 red);
add(6 green);
count ==> 2 not 1
Assert Failure: CardList: add(4 red);
add(6 green);
count
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 183 4351 assert(add(4 red);)...
rerun: line 5: kill: (27284) - No such process
27290 started
183c183
< assert (add (4 red); add (6 green); count, 1)
---
> assert (add (4 red); add (6 green); count, 2)
185c185
< assert (add (3 green); byRank at(4) count, 1)
---
> assert (add (3 green); print; byRank at(3) count, 1)
rerun: line 12: 27284 Bus error ./$1
Object_0x59d720
(
suit = Object_0x5941c0
proto = Object_0x595630
rank = 3
)
xx0Object_0x59d720
(
suit = Object_0x5941c0
proto = Object_0x595630
rank = 3
)
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 185 4485 count
iogame 185 4443 assert(add(3 green);)...
rerun: line 5: kill: (27290) - No such process
27357 started
rerun: line 12: 27290 Bus error ./$1
Object_0x59d720
(
suit = Object_0x5941c0
proto = Object_0x595630
rank = 3
)
xx0Object_0x59d720
(
suit = Object_0x5941c0
proto = Object_0x595630
rank = 3
)
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 185 4485 count
iogame 185 4443 assert(add(3 green);)...
rerun: line 5: kill: (27357) - No such process
27365 started
185c185
< assert (add (3 green); print; byRank at(3) count, 1)
---
> assert (add (3 green); byRank at(3) count, 1)
rerun: line 12: 27357 Bus error ./$1
xx0Object_0x59e530
(
proto = Object_0x595900
suit = Object_0x594130
rank = 3
)
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 185 4478 count
iogame 185 4443 assert(add(3 green);)...
rerun: line 5: kill: (27365) - No such process
27371 started
175c175
< writeln ("xx",i,v)
---
> writeln ("xx",rank)
rerun: line 12: 27365 Bus error ./$1
xx3
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 185 4479 count
iogame 185 4444 assert(add(3 green);)...
rerun: line 5: kill: (27371) - No such process
27377 started
174a175
> cardsOfRank := ranking at (rank)
176,177c177,178
< if (ranking at (rank),
< ranking at (rank) add (v)
---
> if (cardsOfRank,
> cardsOfRank add (v),
rerun: line 12: 27371 Bus error ./$1
xx3
start
27382 started
174,176c174,175
< rank := v rank
< cardsOfRank := ranking at (rank)
< writeln ("xx",rank)
---
> rankOfcard := v rank
> cardsOfRank := ranking at (rankOfcard)
179c178
< ranking atPut (rank, list (v))
---
> ranking atPut (rankOfcard, list (v))
start
27387 started
185a186
> assert (add (3 green); add (3 yellow) byRank at(3) count, 2)
rerun: line 12: 27377 Terminated ./$1
rerun: line 12: 27382 Terminated ./$1
start
27392 started
181d180
< ranking
rerun: line 12: 27387 Terminated ./$1
Io.Object.doesNotRespond: Nil does not respond to message 'count'
Label Line Char Message
------------------------------------------------
iogame 184 4489 count
iogame 184 4454 assert(add(3 green);)...
rerun: line 5: kill: (27392) - No such process
27397 started
180a181
> ranking
rerun: line 12: 27392 Bus error ./$1
start
27401 started
169c169
< result
---
> //result
start
27405 started
169c169
< //result
---
> result
rerun: line 12: 27397 Terminated ./$1
start
want to play
can play
choosing cards
playing
want to play
can play
choosing cards
playing
want to play
can play
choosing cards
playing
want to play
can play
choosing cards
playing
27410 started
127c127
< writeln("want to play")
---
> writeln("want to play ", goal)
rerun: line 12: 27401 Terminated ./$1
start
27415 started
352c352
< // addcard (StraightGoal clone)
---
> addcard (StraightGoal clone)
rerun: line 12: 27410 Terminated ./$1
rerun: line 12: 27405 Terminated ./$1
Io.Object.doesNotRespond: Object does not respond to message 'pop'
Label Line Char Message
------------------------------------------------
iogame 307 7262 pop(ranking at(i))
iogame 352 8317 addcard(StraightGoal clone)
iogame 245 5660 assert((isPlayable(sampleHand)) isNil, N)...
iogame 245 5673 isPlayable(sampleHand)
iogame 306 7251 list(pop(ranking at(i)), pop(ranking at()...
rerun: line 5: kill: (27415) - No such process
27421 started
307,309c307,309
< pop (ranking at (i)),
< pop (ranking at (i+1)),
< pop (ranking at (i+2))
---
> ranking at (i) pop,
> ranking at (i+1) pop,
> ranking at (i+2) pop
rerun: line 12: 27415 Bus error ./$1
GoalCard: (isPlayable(sampleHand)) isNil ==> Object_0x50ad10
(
Lobby = Object_0x50ad10
PlayingCard = Object_0x595750
launchPath = "/Users/ward/Documents/Io"
red = Object_0x593fb0
yellow = Object_0x594030
Card = Object_0x5953b0
Deck = List_0x59f2c0
Suit = Object_0x1105650
playingDeck = List_0x59f5d0
SampleHand = List_0x59c020
Protos = Object_0x50acb0
WildSuit = Object_0x594270
AnySuitFlushGoal = Object_0x58ba40
suits = List_0x5945f0
new = Object_0x58b1b0
rank = 9
GoalCard = Object_0x5963c0
StraightGoal = Object_0x5f30a0
proto = Object_0x50acb0
assert = Block_0x110c620
MixedSuit = Object_0x595250
AnyOneSuit = Object_0x594d60
version = 20041201
green = Object_0x594180
CardList = List_0x59bd20
args = List_0x5939a0
LongStraightGoal = Object_0x5f3380
i = 8
goalDeck = List_0x58b2d0
suit = Object_0x5943d0
distribution = "IoServer"
FlushGoal = Object_0x58b8c0
j = 3
blue = Object_0x5943d0
)
not Nil
Assert Failure: GoalCard: (isPlayable(sampleHand)) isNil
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 352 8311 addcard(StraightGoal clone)
iogame 245 5660 assert((isPlayable(sampleHand)) isNil, N)...
rerun: line 5: kill: (27421) - No such process
27427 started
306c306
< list (
---
> return list (
312a313
> 1
rerun: line 12: 27421 Bus error ./$1
start
27432 started
313c313
< 1
---
> Nil
start
27436 started
rerun: line 12: 27427 Terminated ./$1
rerun: line 12: 27432 Terminated ./$1
start
want to play three card straight
can play
choosing cards
playing
27441 started
302c302
< isPlayable := method (handDeck,
---
> isPlayablex := method (handDeck,
310a311,324
> )
> )
> Nil
> )
> isPlayable := method (handDeck,
> result := list ()
> handDeck byRank foreach (i, v,
> if (v,
> result add (v pop)
> if (result count == cards,
> return result
> ),
>
> result empty
rerun: line 12: 27436 Terminated ./$1
start
want to play four card flush
can play
choosing cards
playing
want to play five card flush
27446 started
248,251c248,251
< addcard (cardProto clone do (suit = suits at (0)))
< addcard (cardProto clone do (suit = suits at (1)))
< addcard (cardProto clone do (suit = suits at (2)))
< addcard (cardProto clone do (suit = suits at (3)))
---
> addcard (cardProto clone do (suit = red))
> addcard (cardProto clone do (suit = yellow))
> addcard (cardProto clone do (suit = green))
> addcard (cardProto clone do (suit = blue))
270a271,273
> assert (at (0) id, 0)
> assert (at (1) id, 1)
> assert (at (7) id, 7)
start
27451 started
235,238c235,240
< assert (playingDeck at(0) id, 0)
< assert (playingDeck at(1) id, 1)
< assert (playingDeck at(0) suit name, "red")
< assert (playingDeck at(4) suit name, "red")
---
> playingDeck do (
> assert (at(0) id, 0)
> assert (at(1) id, 1)
> assert (at(0) suit name, "red")
> assert (at(4) suit name, "red")
> )
rerun: line 12: 27441 Terminated ./$1
rerun: line 12: 27446 Terminated ./$1
start
27456 started
72c72
< id := 0
---
> id := Nil
start
27461 started
204a205,208
> add := method (item,
> item assert (id isNil, Nil)
> resend
> )
rerun: line 12: 27451 Terminated ./$1
GoalCard: id isNil ==> Object_0x50ad10
(
proto = Object_0x50acb0
Suit = Object_0x1107a10
i = 8
yellow = Object_0x5940a0
FlushGoal = Object_0x5ecbf0
Deck = List_0x59f0f0
MixedSuit = Object_0x5950e0
launchPath = "/Users/ward/Documents/Io"
green = Object_0x594170
version = 20041201
j = 3
assert = Block_0x110e960
suit = Object_0x5943c0
playingDeck = List_0x59f440
goalDeck = List_0x5ebc60
GoalCard = Object_0x5961f0
Protos = Object_0x50acb0
blue = Object_0x5943c0
CardList = List_0x59bc30
suits = List_0x5945e0
Lobby = Object_0x50ad10
AnyOneSuit = Object_0x594c50
Card = Object_0x595300
WildSuit = Object_0x594260
AnySuitFlushGoal = Object_0x5ecd90
args = List_0x5939a0
red = Object_0x593f40
SampleHand = List_0x59bef0
distribution = "IoServer"
new = Object_0x5eb9e0
PlayingCard = Object_0x595520
rank = 9
)
not Nil
Assert Failure: GoalCard: id isNil
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 301 6900 add(AnySuitFlushGoal clone do(updateSlot....
iogame 206 4901 assert(id isNil, Nil)
rerun: line 5: kill: (27461) - No such process
27467 started
301,302c301,302
< add (AnySuitFlushGoal clone do (cards = 5; goal = "five card flush"))
< add (AnySuitFlushGoal clone do (cards = 4; goal = "four card flush"))
---
> addcard (AnySuitFlushGoal clone do (cards = 5; goal = "five card flush"))
> addcard (AnySuitFlushGoal clone do (cards = 4; goal = "four card flush"))
rerun: line 12: 27456 Terminated ./$1
rerun: line 12: 27461 Bus error ./$1
start
rerun: line 5: kill: (27467) - No such process
27473 started
rerun: line 12: 27467 Bus error ./$1
start
27479 started
55,56c55,58
< assert ((WildSuit == yellow) isNil, Nil)
< assert ((yellow == WildSuit) isNil, Nil)
---
> wild := WildSuit clone
>
> assert ((wild == yellow) isNil, Nil)
> assert ((yellow == wild) isNil, Nil)
64a67,68
>
>
start
27484 started
107a108
> wild := method (new := PlayingCard clone; new suit := Lobby wild; new rank := self; new)
111a113
> assert ((5 wild) suit, wild)
rerun: line 12: 27473 Terminated ./$1
start
27489 started
317,329d316
< isPlayablex := method (handDeck,
< ranking := handDeck byRank
< for (i, 1, 7,
< if (ranking at (i) and ranking at (i+1) and ranking at (i+2),
< return list (
< ranking at (i) pop,
< ranking at (i+1) pop,
< ranking at (i+2) pop
< )
< )
< )
< Nil
< )
351,377d337
< isPlayable := method (handDeck,
< ranking := list (Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil)
< handDeck foreach (i, v,
< ranking atPut (v rank, v)
< )
< for (i, 1, 6,
< if (ranking at (i) and ranking at (i+1) and ranking at (i+2) and ranking at (i+3),
< return 1
< )
< )
< )
< playFromHand := method (handDeck,
< ranking := list (Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil,Nil)
< handDeck foreach (i, v,
< ranking atPut (v rank, v)
< )
< for (i, 1, 7,
< if (ranking at (i) and ranking at (i+1) and ranking at (i+2) and ranking at (i+3),
< handDeck playCard (ranking at (i))
< handDeck playCard (ranking at (i+1))
< handDeck playCard (ranking at (i+2))
< handDeck playCard (ranking at (i+3))
< return
< )
< )
< Error raise (type, "Can't satisfy this goal")
< )
rerun: line 12: 27479 Terminated ./$1
start
27494 started
254a255
> assert (indexOf (card), Nil)
341d341
< // addcard (StraightGoal clone)
343,348c343,346
< addcard (LongStraightGoal)
< addcard (LongStraightGoal)
< // addcard (StraightGoal clone do (suit = suits at (0)))
< // addcard (StraightGoal clone do (suit = suits at (1)))
< // addcard (StraightGoal clone do (suit = suits at (2)))
< // addcard (StraightGoal clone do (suit = suits at (3)))
---
> addcard (StraightGoal clone)
> addcard (LongStraightGoal clone)
> addcard (LongStraightGoal clone)
> // addCardForEachSuit (StraightGoal)
rerun: line 12: 27484 Terminated ./$1
Io.Object.doesNotRespond: List does not respond to message 'card'
Label Line Char Message
------------------------------------------------
iogame 255 5810 card
iogame 282 6512 addCardForEachSuit(FlushGoal clone do(up....
iogame 261 5968 addcard(cardProto clone do(updateSlot("s)...
iogame 255 5795 assert(indexOf(card), Nil)
rerun: line 5: kill: (27494) - No such process
27500 started
255c255
< assert (indexOf (card), Nil)
---
> Locals assert (indexOf (card), Nil)
rerun: line 12: 27489 Terminated ./$1
rerun: line 12: 27494 Bus error ./$1
start
27505 started
344,345c344,345
< addcard (LongStraightGoal clone)
< addcard (LongStraightGoal clone)
---
> addcard (LongStraightGoal)
> addcard (LongStraightGoal)
start
27510 started
255c255
< Locals assert (indexOf (card), Nil)
---
> Locals assert (self indexOf (card), Nil)
rerun: line 12: 27500 Terminated ./$1
start
27515 started
255c255
< Locals assert (self indexOf (card), Nil)
---
> card assert (id, Nil)
rerun: line 12: 27505 Terminated ./$1
GoalCard: id ==> 12 not Nil
Assert Failure: GoalCard: id
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 345 7809 addcard(LongStraightGoal)
iogame 255 5800 assert(id, Nil)
rerun: line 5: kill: (27515) - No such process
27521 started
344,345c344,345
< addcard (LongStraightGoal)
< addcard (LongStraightGoal)
---
> addcard (LongStraightGoal clone)
> addcard (LongStraightGoal clone)
rerun: line 12: 27510 Terminated ./$1
rerun: line 12: 27515 Bus error ./$1
start
27526 started
346c346
< // addCardForEachSuit (StraightGoal)
---
> addCardForEachSuit (StraightGoal clone do (goal = "3_card straight flush"))
start
want to play three card flush
can play
choosing cards
playing
want to play three card flush
can play
choosing cards
playing
27531 started
340a341,348
> StraightFlushGoal := StraightGoal clone do (
> goal := "3_card straight flush"
> )
>
> AnySuitStraigthFlushGoal := StraightFlushGoal clone do (
> suit := AnyOneSuit
> )
>
343,344d350
< addcard (StraightGoal clone)
< addcard (LongStraightGoal clone)
346c352,353
< addCardForEachSuit (StraightGoal clone do (goal = "3_card straight flush"))
---
> addCardForEachSuit (StraightFlushGoal)
> addcard (AnySuitStraightFlushGoal clone)
rerun: line 12: 27521 Terminated ./$1
Io.Object.doesNotRespond: List does not respond to message 'AnySuitStraightFlushGoal'
Label Line Char Message
------------------------------------------------
iogame 353 8012 AnySuitStraightFlushGoal
iogame 353 7986 addcard(AnySuitStraightFlushGoal clone)
rerun: line 5: kill: (27531) - No such process
27537 started
353c353
< addcard (AnySuitStraightFlushGoal clone)
---
> addcard (AnySuitStraigthFlushGoal clone)
rerun: line 12: 27526 Terminated ./$1
rerun: line 12: 27531 Bus error ./$1
start
27542 started
33a34,38
> changeAll := method (aList,
> aList foreach (i, v,
> v suit := self
> )
> )
52a58
> changeAll := method (aList, aList)
113a120
>
start
27547 started
119a120,123
> list (1 red, 2 green) do (
> assert (blue changeAll (self) at (1) suit, blue)
> assert (wild changeAll (self) at (1) suit, green)
> )
rerun: line 12: 27537 Terminated ./$1
Io.Object.doesNotRespond: List does not respond to message 'self'
Label Line Char Message
------------------------------------------------
iogame 121 3011 self
iogame 121 2989 assert(blue changeAll(self) at(1) suit, )...
iogame 121 3005 changeAll(self)
rerun: line 5: kill: (27547) - No such process
27553 started
119,123c119,120
< assert ((5 wild) suit, wild)
< list (1 red, 2 green) do (
< assert (blue changeAll (self) at (1) suit, blue)
< assert (wild changeAll (self) at (1) suit, green)
< )
---
> assert (blue changeAll (list (1 red, 2 green)) at (1) suit, blue)
> assert (wild changeAll (list (1 red, 2 green)) at (1) suit, green)
rerun: line 12: 27542 Terminated ./$1
rerun: line 12: 27547 Bus error ./$1
Io.Object.doesNotRespond: Object does not respond to message 'at'
Label Line Char Message
------------------------------------------------
iogame 119 2975 at(1)
iogame 119 2932 assert(blue changeAll(list(1 red, 2 gree)...
rerun: line 5: kill: (27553) - No such process
27559 started
37a38
> aList
rerun: line 12: 27553 Bus error ./$1
start
27564 started
351a352
> example := method (suit changeAll (resend))
start
27569 started
59d58
< changeAll := method (aList, aList)
68a68
> changeAll := method (aList, suit random changeAll (aList))
72a73,77
> changeAll := method (aList,
> aList foreach (i, v,
> v suit := suits at (i % suits count)
> )
> )
rerun: line 12: 27559 Terminated ./$1
Object: wild changeAll(list(1 red, 2 green)) at(1) suit ==> Object_0x594d70
(
proto = Object_0x594300
)
not Object_0x594210
(
color = "cfa"
name = "green"
proto = Object_0x1109390
)
Assert Failure: Object: wild changeAll(list(1 red, 2 green)) at(1) suit
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 126 3129 assert(wild changeAll(list(1 red, 2 gree)...
rerun: line 5: kill: (27569) - No such process
27575 started
61c61
< wild := WildSuit clone
---
> wild := WildSuit
rerun: line 12: 27564 Terminated ./$1
rerun: line 12: 27569 Bus error ./$1
Object: wild changeAll(list(1 red, 2 green)) at(1) suit ==> Object_0x594190
(
proto = Object_0x11092b0
name = "wild"
== = Block_0x5949d0
color = "ddd"
isWild = 1
)
not Object_0x5940a0
(
color = "cfa"
proto = Object_0x11092b0
name = "green"
)
Assert Failure: Object: wild changeAll(list(1 red, 2 green)) at(1) suit
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 126 3123 assert(wild changeAll(list(1 red, 2 gree)...
rerun: line 5: kill: (27575) - No such process
27581 started
126c126
< assert (wild changeAll (list (1 red, 2 green)) at (1) suit, green)
---
> assert (wild changeAll (list (1 red, 2 green)) at (1) suit, wild)
rerun: line 12: 27575 Bus error ./$1
Io.Object.doesNotRespond: Object does not respond to message 'random'
Label Line Char Message
------------------------------------------------
iogame 68 1541 random
iogame 368 8373 addcard(AnySuitStraigthFlushGoal clone)
iogame 272 6203 assert((isPlayable(sampleHand)) isNil, N)...
iogame 272 6216 isPlayable(sampleHand)
iogame 272 6228 sampleHand
iogame 213 5142 example
iogame 357 8153 changeAll(resend)
rerun: line 5: kill: (27581) - No such process
27589 started
68c68
< changeAll := method (aList, suit random changeAll (aList))
---
> changeAll := method (aList, suits random changeAll (aList))
rerun: line 12: 27581 Bus error ./$1
start
rerun: line 5: kill: (27589) - No such process
27600 started
81,82d80
<
<
357a356,374
>
> isPlayable := method (handDeck,
> result := list ()
> suitsInHand := handDeck bySuit
> cardsInSuit := suitsInHand at (suit id)
> if (cardsInSuit count < cards, return Nil)
> cardsInSuit byRank foreach (i, v,
> if (v,
> result add (v pop)
> if (result count == cards,
> return result
> ),
>
> result empty
> )
> )
> Nil
> )
>
rerun: line 12: 27589 Bus error ./$1
Io.Object.doesNotRespond: Object does not respond to message 'id'
Label Line Char Message
------------------------------------------------
iogame 360 8290 id
iogame 384 8680 addCardForEachSuit(StraightFlushGoal)
iogame 273 6302 addcard(cardProto clone do(updateSlot("s)...
iogame 270 6202 assert((isPlayable(sampleHand)) isNil, N)...
iogame 270 6215 isPlayable(sampleHand)
rerun: line 5: kill: (27600) - No such process
27605 started
384c384
< addCardForEachSuit (StraightFlushGoal)
---
> //addCardForEachSuit (StraightFlushGoal)
rerun: line 12: 27600 Bus error ./$1
Io.Object.doesNotRespond: Object does not respond to message 'id'
Label Line Char Message
------------------------------------------------
iogame 360 8290 id
iogame 385 8711 addcard(AnySuitStraigthFlushGoal clone)
iogame 270 6202 assert((isPlayable(sampleHand)) isNil, N)...
iogame 270 6215 isPlayable(sampleHand)
rerun: line 5: kill: (27605) - No such process
27610 started
385c385
< addcard (AnySuitStraigthFlushGoal clone)
---
> //addcard (AnySuitStraigthFlushGoal clone)
rerun: line 12: 27605 Bus error ./$1
start
want to play four card straight
can play
rerun: line 5: kill: (27610) - No such process
27648 started
665c665,668
< aHand := Hand clone
---
> aHand := Hand clone do (
> add (playingCard draw)
> add (playingCard draw)
> )
rerun: line 12: 27610 Bus error ./$1
start
27653 started
666,667c666,667
< add (playingCard draw)
< add (playingCard draw)
---
> add (playingDeck draw)
> add (playingDeck draw)
start
rerun: line 5: kill: (27653) - No such process
27659 started
676c676
< n .. " out of 100 random hands (sans held cards) could play this goal"
---
> n .. " out of 100 random seven card hands (sans held cards) could play this goal"
rerun: line 12: 27653 Bus error ./$1
rerun: line 12: 27648 Terminated ./$1
start
rerun: line 5: kill: (27659) - No such process
27665 started
676c676
< n .. " out of 100 random seven card hands (sans held cards) could play this goal"
---
> n .. " out of 100 random seven-card hands (sans held cards) could play this goal"
rerun: line 12: 27659 Segmentation fault ./$1
start
27670 started
206a207,210
> List asHand := method (
> new := SampleHand clone
> new addList (self)
> )
210,211c214
< new := SampleHand clone
< new addList (self example)
---
> example asHand
rerun: line 12: 27665 Terminated ./$1
start
27675 started
134,135c134,135
< points := 2
< cards := 3
---
> points := 0
> cards := 1
137c137
< goal := "what
me
worry"
---
> goal := "any old card"
140a141,143
> winner := method (
> thisContext argsEvaluatedIn (sender)
> )
142c145
< 1
---
> handDeck first
start
27680 started
141,143d140
< winner := method (
< thisContext argsEvaluatedIn (sender)
< )
443a441,451
>
>
> Goal do (
> winner := method (
> thisContext argsEvaluatedIn (sender)
> )
> winner (9 blue)
> )
>
>
>
rerun: line 12: 27670 Terminated ./$1
Io.Object.doesNotRespond: Object does not respond to message 'Goal'
Label Line Char Message
------------------------------------------------
iogame 443 10232 Goal
rerun: line 5: kill: (27680) - No such process
27686 started
445c445
< thisContext argsEvaluatedIn (sender)
---
> thisContext argsEvaluatedIn (Lobby)
rerun: line 12: 27675 Terminated ./$1
rerun: line 12: 27680 Bus error ./$1
Io.Object.doesNotRespond: Object does not respond to message 'Goal'
Label Line Char Message
------------------------------------------------
iogame 443 10232 Goal
rerun: line 5: kill: (27686) - No such process
27692 started
444,445c444,445
< winner := method (
< thisContext argsEvaluatedIn (Lobby)
---
> winner := method (arg,
> arg
rerun: line 12: 27686 Bus error ./$1
Io.Object.doesNotRespond: Object does not respond to message 'Goal'
Label Line Char Message
------------------------------------------------
iogame 443 10232 Goal
rerun: line 5: kill: (27692) - No such process
27697 started
443c443
< Goal do (
---
> GoalCard do (
rerun: line 12: 27692 Bus error ./$1
start
27702 started
444,445c444,445
< winner := method (arg,
< arg
---
> winner := method (
> thisContext argsEvaluatedIn (sender)
Io.Object.doesNotRespond: Object does not respond to message 'argsEvaluatedIn'
Label Line Char Message
------------------------------------------------
iogame 445 10291 argsEvaluatedIn(sender)
iogame 447 10311 winner(9 blue)
rerun: line 5: kill: (27702) - No such process
27708 started
445c445
< thisContext argsEvaluatedIn (sender)
---
> thisMessage argsEvaluatedIn (sender)
rerun: line 12: 27702 Bus error ./$1
rerun: line 12: 27697 Terminated ./$1
start
27713 started
445c445,446
< thisMessage argsEvaluatedIn (sender)
---
> example = thisMessage argsEvaluatedIn (sender) asHand
> assert (isPlayable (example) isNil, Nil)
rerun: line 12: 27708 Terminated ./$1
start
27718 started
448a449,453
> looser := method (
> badExample := thisMessage argsEvaluatedIn (sender) asHand
> assert (isPlayable (badExample), Nil)
> )
> winner (9 blue)
start
27722 started
453c453
< winner (9 blue)
---
> looser (9 blue)
rerun: line 12: 27713 Terminated ./$1
Io.Object.doesNotRespond: Object does not respond to message 'badExample'
Label Line Char Message
------------------------------------------------
iogame 451 10493 badExample
iogame 453 10511 looser(9 blue)
iogame 451 10469 assert(isPlayable(badExample), Nil)
iogame 451 10481 isPlayable(badExample)
rerun: line 5: kill: (27722) - No such process
27757 started
451c451
< assert (isPlayable (badExample), Nil)
---
> Locals assert (isPlayable (badExample), Nil)
rerun: line 12: 27718 Terminated ./$1
rerun: line 12: 27722 Bus error ./$1
start
27764 started
453c453
< looser (9 blue)
---
> looser (9 blue halt)
rerun: line 12: 27757 Terminated ./$1
Io.Object.doesNotRespond: Object does not respond to message 'halt'
Label Line Char Message
------------------------------------------------
iogame 453 10531 halt
iogame 453 10518 looser(9 blue halt)
rerun: line 5: kill: (27764) - No such process
27770 started
450a451
> badExample print
453c454
< looser (9 blue halt)
---
> looser (9 blue)
rerun: line 12: 27764 Bus error ./$1
Object_0x1115db0
(
proto = Object_0x5958e0
suit = Object_0x5941d0
rank = 9
)
start
27775 started
454c454
< looser (9 blue)
---
> looser (9 blue, 7 red)
Object_0x11162f0
(
rank = 9
proto = Object_0x595790
suit = Object_0x5942e0
)
, Object_0x1116440
(
rank = 7
proto = Object_0x595790
suit = Object_0x594040
)
start
27780 started
108a109
> print := method (write (rank, " ", suit name))
137a139
> print := method (goal print)
rerun: line 12: 27770 Terminated ./$1
rerun: line 12: 27775 Terminated ./$1
Object_0x1119730
(
suit = Object_0x5941b0
proto = Object_0x595800
rank = 9
)
, Object_0x1119880
(
suit = Object_0x593fe0
proto = Object_0x595800
rank = 7
)
start
27785 started
109d108
< print := method (write (rank, " ", suit name))
139d137
< print := method (goal print)
453c451
< badExample print
---
> badExample type print
rerun: line 12: 27780 Terminated ./$1
CardListstart
27790 started
451,452c451
< badExample type print
< Locals assert (isPlayable (badExample), Nil)
---
> Locals assert (isPlayable (badExample), 7)
rerun: line 12: 27785 Terminated ./$1
start
27794 started
456c456
<
---
> assert (7, 9)
Object: 7 ==> 7 not 9
Assert Failure: Object: 7
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 456 10542 assert(7, 9)
rerun: line 5: kill: (27794) - No such process
27800 started
453a454
> assert (7, 9)
456c457
< assert (7, 9)
---
>
rerun: line 12: 27794 Bus error ./$1
rerun: line 12: 27790 Terminated ./$1
GoalCard: 7 ==> 7 not 9
Assert Failure: GoalCard: 7
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 454 10540 assert(7, 9)
rerun: line 5: kill: (27800) - No such process
27805 started
451a452
> assert (7, 9)
454d454
< assert (7, 9)
rerun: line 12: 27800 Bus error ./$1
GoalCard: 7 ==> 7 not 9
Assert Failure: GoalCard: 7
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 454 10531 looser(9 blue, 7 red)
iogame 452 10513 assert(7, 9)
rerun: line 5: kill: (27805) - No such process
27811 started
452c452
< assert (7, 9)
---
> assert (7 isNil, 9)
rerun: line 12: 27805 Bus error ./$1
GoalCard: 7 isNil ==> Nil not 9
Assert Failure: GoalCard: 7 isNil
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 454 10537 looser(9 blue, 7 red)
iogame 452 10513 assert(7 isNil, 9)
rerun: line 5: kill: (27811) - No such process
27817 started
452c452
< assert (7 isNil, 9)
---
> Locals assert (7 isNil, 9)
rerun: line 12: 27811 Bus error ./$1
start
27821 started
451,452c451,452
< Locals assert (isPlayable (badExample), 7)
< Locals assert (7 isNil, 9)
---
> assert (isPlayable (badExample), 7)
> assert (7 isNil, 9)
Io.Object.doesNotRespond: Object does not respond to message 'badExample'
Label Line Char Message
------------------------------------------------
iogame 451 10493 badExample
iogame 454 10531 looser(9 blue, 7 red)
iogame 451 10469 assert(isPlayable(badExample), 7)
iogame 451 10481 isPlayable(badExample)
rerun: line 5: kill: (27821) - No such process
27827 started
443a444,449
> looser := method (
> example := thisMessage argsEvaluatedIn (sender) asHand
> assert (isPlayable (example), Nil)
> )
> looser (9 blue, 7 red)
>
449,454d454
< looser := method (
< badExample := thisMessage argsEvaluatedIn (sender) asHand
< assert (isPlayable (badExample), 7)
< assert (7 isNil, 9)
< )
< looser (9 blue, 7 red)
rerun: line 12: 27817 Terminated ./$1
rerun: line 12: 27821 Bus error ./$1
GoalCard: isPlayable(example) ==> Object_0x59cbf0
(
rank = 1
proto = Object_0x5958d0
suit = Object_0x594000
)
not Nil
Assert Failure: GoalCard: isPlayable(example)
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 448 10366 looser(9 blue, 7 red)
iogame 446 10327 assert(isPlayable(example), Nil)
rerun: line 5: kill: (27827) - No such process
27832 started
448c448
< looser (9 blue, 7 red)
---
> looser ()
rerun: line 12: 27827 Bus error ./$1
GoalCard: isPlayable(example) ==> Object_0x59cab0
(
suit = Object_0x593fe0
proto = Object_0x5957a0
rank = 1
)
not Nil
Assert Failure: GoalCard: isPlayable(example)
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 448 10366 looser
iogame 446 10327 assert(isPlayable(example), Nil)
rerun: line 5: kill: (27832) - No such process
27838 started
281c281
<
---
>
441,458d440
<
<
< GoalCard do (
< looser := method (
< example := thisMessage argsEvaluatedIn (sender) asHand
< assert (isPlayable (example), Nil)
< )
< looser ()
<
< winner := method (
< example = thisMessage argsEvaluatedIn (sender) asHand
< assert (isPlayable (example) isNil, Nil)
< )
< winner (9 blue)
< )
<
<
<
rerun: line 12: 27832 Bus error ./$1
start
want to play three card straight
can play
choosing cards
playing
want to play four card flush
can play
choosing cards
playing
want to play four card flush
can play
choosing cards
playing
want to play three card flush
can play
choosing cards
playing
want to play four card flush
can play
choosing cards
playing
27877 started
383a384,385
> goalDeck empty
>
387c389
< //addCardForEachSuit (StraightFlushGoal)
---
> addCardForEachSuit (StraightFlushGoal)
rerun: line 12: 27838 Terminated ./$1
Io.Object.doesNotRespond: Object does not respond to message 'id'
Label Line Char Message
------------------------------------------------
iogame 363 8329 id
iogame 389 8735 addCardForEachSuit(StraightFlushGoal)
iogame 276 6342 addcard(cardProto clone do(updateSlot("s)...
iogame 273 6242 assert((isPlayable(sampleHand)) isNil, N)...
iogame 273 6255 isPlayable(sampleHand)
rerun: line 5: kill: (27877) - No such process
27883 started
41a42,49
> IdList := List clone do (
> add := method (item,
> item assert (id isNil, Nil)
> item id = self count
> resend
> )
> )
>
220c228
< Deck := List clone do (
---
> Deck := IdList clone do (
225,228d232
< )
< add := method (item,
< item assert (id isNil, Nil)
< resend
rerun: line 12: 27877 Bus error ./$1
Io.Object.doesNotRespond: Object does not respond to message 'id'
Label Line Char Message
------------------------------------------------
iogame 367 8383 id
iogame 393 8789 addCardForEachSuit(StraightFlushGoal)
iogame 280 6396 addcard(cardProto clone do(updateSlot("s)...
iogame 277 6296 assert((isPlayable(sampleHand)) isNil, N)...
iogame 277 6309 isPlayable(sampleHand)
rerun: line 5: kill: (27883) - No such process
27889 started
26a27
> id := Nil
41a43,47
> red := Suit clone do (name = "red"; color = "fcc")
> yellow := Suit clone do (name = "yellow"; color = "ff8")
> green := Suit clone do (name = "green"; color = "cfa")
> blue := Suit clone do (name = "blue"; color = "bdf")
>
50,55c56,61
< red := Suit clone do (name = "red"; color = "fcc")
< yellow := Suit clone do (name = "yellow"; color = "ff8")
< green := Suit clone do (name = "green"; color = "cfa")
< blue := Suit clone do (name = "blue"; color = "bdf")
<
< suits := list (red, yellow, green, blue)
---
> suits := IdList clone do (
> add (red)
> add (yellow)
> add (green)
> add (blue)
> )
60a67
> assert (suits at (green id), green)
rerun: line 12: 27883 Bus error ./$1
Suit: id isNil ==> Object_0x50ad10
(
version = 20041201
blue = Object_0x5944c0
distribution = "IoServer"
Protos = Object_0x50acb0
yellow = Object_0x594120
proto = Object_0x50acb0
launchPath = "/Users/ward/Documents/Io"
green = Object_0x594270
assert = Block_0x110e630
args = List_0x5939a0
Lobby = Object_0x50ad10
IdList = List_0x594360
Suit = Object_0x110a7c0
red = Object_0x594080
)
not Nil
Assert Failure: Suit: id isNil
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 57 1223 add(red)
iogame 50 1137 assert(id isNil, Nil)
rerun: line 5: kill: (27889) - No such process
27895 started
50c50
< item assert (id isNil, Nil)
---
> item assert (id, Nil)
rerun: line 12: 27889 Bus error ./$1
Card: id ==> 5 not Nil
Assert Failure: Card: id
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 255 5791 assert(add(Card clone do(updateSlot("id"....
iogame 255 5796 add(Card clone do(updateSlot("id", 5)))
iogame 50 1137 assert(id, Nil)
rerun: line 5: kill: (27895) - No such process
27902 started
43,54c43,46
< red := Suit clone do (name = "red"; color = "fcc")
< yellow := Suit clone do (name = "yellow"; color = "ff8")
< green := Suit clone do (name = "green"; color = "cfa")
< blue := Suit clone do (name = "blue"; color = "bdf")
<
< IdList := List clone do (
< add := method (item,
< item assert (id, Nil)
< item id = self count
< resend
< )
< )
---
> red := Suit clone do (name = "red"; color = "fcc"; id = 0)
> yellow := Suit clone do (name = "yellow"; color = "ff8"; id = 1)
> green := Suit clone do (name = "green"; color = "cfa"; id = 2)
> blue := Suit clone do (name = "blue"; color = "bdf"; id = 3)
56,61c48
< suits := IdList clone do (
< add (red)
< add (yellow)
< add (green)
< add (blue)
< )
---
> suits := list (red, yellow, green, blue)
235c222
< Deck := IdList clone do (
---
> Deck := List clone do (
rerun: line 12: 27895 Bus error ./$1
Io.Object.doesNotRespond: List does not respond to message 'byRank'
Label Line Char Message
------------------------------------------------
iogame 363 8411 byRank
iogame 387 8750 addCardForEachSuit(StraightFlushGoal)
iogame 274 6357 addcard(cardProto clone do(updateSlot("s)...
iogame 271 6257 assert((isPlayable(sampleHand)) isNil, N)...
iogame 271 6270 isPlayable(sampleHand)
rerun: line 5: kill: (27902) - No such process
27908 started
363c363
< cardsInSuit byRank foreach (i, v,
---
> cardsInSuit asHand byRank foreach (i, v,
rerun: line 12: 27902 Bus error ./$1
start
27913 started
426a427
> /*
437a439
> */
start
rerun: line 5: kill: (27913) - No such process
27919 started
rerun: line 12: 27913 Segmentation fault ./$1
rerun: line 12: 27908 Terminated ./$1
start
want to play four card straight
can play
want to play three card straight
can play
choosing cards
playing
want to play four card straight
can play
27924 started
347c347
< LongStraightGoal := GoalCard clone do (
---
> LongStraightGoal := StraightGoal clone do (
start
rerun: line 5: kill: (27924) - No such process
27930 started
rerun: line 12: 27924 Bus error ./$1
rerun: line 12: 27919 Terminated ./$1
start
rerun: line 5: kill: (27930) - No such process
27935 started
rerun: line 12: 27930 Segmentation fault ./$1
start
27940 started
63a64,65
> wild id = 5
> suits add (wild)
Deck: at(4) suit name ==> wild not red
Assert Failure: Deck: at(4) suit name
Label Line Char Message
------------------------------------------------
iogame 17 434 raise("Assert Failure", self type ..(": )...
iogame 264 6125 assert(at(4) suit name, "red")
rerun: line 5: kill: (27940) - No such process
27946 started
264c264
< assert (at(4) suit name, "red")
---
> assert (at(5) suit name, "red")
rerun: line 12: 27935 Terminated ./$1
rerun: line 12: 27940 Bus error ./$1
start
want to play three card straight
can play
choosing cards
playing
want to play 3_card straight flush
can play
choosing cards
playing
rerun: line 5: kill: (27946) - No such process
27952 started
rerun: line 12: 27946 Segmentation fault ./$1
start
rerun: line 5: kill: (27952) - No such process
27958 started
rerun: line 12: 27952 Segmentation fault ./$1
start
rerun: line 5: kill: (27958) - No such process
27964 started
rerun: line 12: 27958 Segmentation fault ./$1
start
rerun: line 5: kill: (27964) - No such process
27970 started
rerun: line 12: 27964 Segmentation fault ./$1
start
27975 started
3a4,7
> // Copyright (c) 2005, Ward Cunningham
> // Distributed under BSD open source license
> // See http://c2.com/~ward/io/IoGame
>
rerun: line 12: 27970 Terminated ./$1
start
|
|
|
|