# HG changeset patch
# User jwe
# Date 874964788 0
# Node ID 5cbbecce1fd9a45c13fa8b4ff4011f4b09662361
# Parent  e6d14959bea9df37ed13240575e63893d86ffecb
[project @ 1997-09-22 21:46:28 by jwe]

diff --git a/src/ChangeLog b/src/ChangeLog
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+Mon Sep 22 16:44:27 1997  John W. Eaton  <jwe@bevo.che.wisc.edu>
+
+	* DLD-FUNCTIONS/rand.cc (do_rand): Print error if first of two
+	args is a string but doesn't match "seed".
+
 Mon Aug 25 10:42:07 1997  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
 	* input.cc (get_user_input): Return an empty string if the user
diff --git a/src/DLD-FUNCTIONS/rand.cc b/src/DLD-FUNCTIONS/rand.cc
--- a/src/DLD-FUNCTIONS/rand.cc
+++ b/src/DLD-FUNCTIONS/rand.cc
@@ -258,6 +258,8 @@
 	      if (! error_state)
 		set_rand_seed (d);
 	    }
+	  else
+	    error ("rand: unrecognized string argument");
 	}
       else
 	{