first pass at open/ and friends.

2011-02-12 14:14:12 +00:00
parent 3bdece404b
commit be79c3326e
12 changed files with 115 additions and 773 deletions
--- a/H/sshift.h
+++ b/H/sshift.h
@@ -661,6 +661,7 @@ PtoOpAdjust (yamop * ptr)
 {
  if (ptr)
    return (yamop *) (CharP (ptr) + HDiff);
+  return ptr;
 }

 inline EXTERN struct operator_entry *OpListAdjust (struct operator_entry *);