sync'ing files for RCS->CVS migration

[moira.git] / db / class.qc

diff --git a/db/class.qc b/db/class.qc
deleted file mode 100644 (file)
index 450e7f8..0000000
--- a/db/class.qc
+++ /dev/null
@@ -1,35 +0,0 @@
-/* $Header$
- *
- *  Counts how many member of each class exist in the database.
- *
- *  (c) Copyright 1988 by the Massachusetts Institute of Technology.
- *  For copying and distribution information, please see the file
- *  <mit-copyright.h>.
- */
-
-#include <mit-copyright.h>
-#include <moira.h>
-
-
-main()
-{
-##  char class[9], *c;
-##  int n;
-    struct save_queue *sq, *sq_create();
-
-    sq = sq_create();
-
-##  ingres sms
-
-##  range of u is users
-##  retrieve unique (class = trim(u.mit_year)) {
-       sq_save_data(sq, strsave(class));
-##  }
-
-    while (sq_get_data(sq, &c)) {
-##     repeat retrieve (n = count(u.login where u.mit_year = @c))
-       printf("%8s: %4d\n", c, n);
-    }
-
-##  exit
-}