Add a diag() method to t/lib/ipc_sysv.t (as we copied it from blead)
authorLeon Brocard <acme@astray.com>
Tue, 17 Feb 2009 11:17:23 +0000 (19:17 +0800)
committerLeon Brocard <acme@astray.com>
Tue, 17 Feb 2009 11:17:23 +0000 (19:17 +0800)
t/lib/ipc_sysv.t

index dd04cc8..4ed55ad 100755 (executable)
@@ -203,3 +203,8 @@ END {
     msgctl($msg,IPC_RMID,0)       if defined $msg;
     semctl($sem,0,IPC_RMID,undef) if defined $sem;
 }
+
+sub diag {
+    my $message = shift;
+    print "$message\n";
+}