Exceptions: Difference between revisions

Content deleted Content added
Added Smalltalk
Line 1,554:
 
=={{header|Smalltalk}}==
Throwing an Exception
 
<lang smalltalk>"exec" "gst" "-f" "$0" "$0" "$*"
"exit"
 
Transcript show: 'Throwing yawp'; cr.
self error: 'Yawp!'.</lang>
 
<lang shell>$ ./yawp.st
Throwing yawp
Object: nil error: Yawp!
Error(Exception)>>signal (AnsiExcept.st:216)
Error(Exception)>>signal: (AnsiExcept.st:226)
UndefinedObject(Object)>>error: (AnsiExcept.st:1565)
UndefinedObject>>executeStatements (yawp.st:5)</lang>
 
Handling an Exception
 
<lang smalltalk>"exec" "gst" "-f" "$0" "$0" "$*"
"exit"
 
[
Transcript show: 'Throwing yawp.'; cr.
self error: 'Yawp!'.
] on: Error do: [ :e |
Transcript show: 'Caught yawp.'; cr.
].</lang>
 
<lang shell>$ ./yawp.st
Throwing yawp.
Caught yawp.</lang>
 
=={{header|Standard ML}}==