From 3026f1c8e3f91979ba659f92dfa69e4cdb635684 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Wed, 7 Jan 2009 16:05:48 -0600
Subject: [PATCH] add another test for group-name

---
 basis/unix/groups/groups-tests.factor | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/basis/unix/groups/groups-tests.factor b/basis/unix/groups/groups-tests.factor
index a1b5e6973f..75f5d64b5f 100644
--- a/basis/unix/groups/groups-tests.factor
+++ b/basis/unix/groups/groups-tests.factor
@@ -25,3 +25,5 @@ IN: unix.groups.tests
 [ ] [ [ ] with-group-cache ] unit-test
 
 [ ] [ real-group-id group-name drop ] unit-test
+
+[ "888888888888888" ] [ 888888888888888 group-name ] unit-test