--- a/ParseWarning.st	Fri Jan 27 23:58:31 2017 +0100
+++ b/ParseWarning.st	Sat Jan 28 18:08:03 2017 +0100
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libcomp' }"
 
+"{ NameSpace: Smalltalk }"
+
 Notification subclass:#ParseWarning
 	instanceVariableNames:'errorMessage startPosition endPosition lineNumber'
 	classVariableNames:''
@@ -68,13 +70,20 @@
     startPosition := something.
 ! !
 
+!ParseWarning methodsFor:'default action'!
+
+defaultResumeValue
+    Logger warning:('Parser Warning: ',(self errorMessage ? self description)).
+    ^ super defaultResumeValue
+! !
+
 !ParseWarning class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ParseWarning.st,v 1.2 2013-04-03 17:21:41 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/ParseWarning.st,v 1.2 2013-04-03 17:21:41 cg Exp $'
+    ^ '$Header$'
 ! !