Changeset 6ae4f5 in git for Singular/sing_dbm.cc

Timestamp:

Apr 9, 1997, 2:20:17 PM (27 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

feaddd38f9cf78a784df825347f9f83cbb667a40

Parents:

e2f1c7b90d7253794bed6c9fcd2adf63ddae5124

Message:

* hannes: - corrected scanner.l: parsing of strings in blocks:
            if (1) { write("","}"); }
          - corrected ipassign.cc: assignment of "dummy" types: DEF, NONE
          - corrected sleftv::Print(_), initialisation of _
          - added conversion int->def
          - added CopyD(DEF)
          - in insert(..): object should not be of type NONE (lists.cc:lInsert0)
          - added int*intvec, int*intmat to iparith.cc


git-svn-id: file:///usr/local/Singular/svn/trunk@145 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Singular/sing_dbm.cc (modified) (2 diffs)

Singular/sing_dbm.cc

@@ -5 +5 @@
 //**************************************************************************
 //
-// $Id: sing_dbm.cc,v 1.3 1997-04-08 16:45:32 Singular Exp $
+// $Id: sing_dbm.cc,v 1.4 1997-04-09 12:20:09 Singular Exp $
 //
 //**************************************************************************
@@ -175 +175 @@
   ||  (strcmp(request, "write") == 0))
   {
-    if (SI_LINK_R_OPEN_P(l)) return "ready";
-    else                     return "not ready";
+    if (SI_LINK_RW_OPEN_P(l)) return "ready";
+    else                      return "not ready";
   }
   else return "unknown status request";