DLS takeover

[unix-history] / usr / src / local / ditroff / ditroff.old.okeeffe / gremlin.aed / gremlin / long1.c

diff --git a/usr/src/local/ditroff/ditroff.old.okeeffe/gremlin.aed/gremlin/long1.c b/usr/src/local/ditroff/ditroff.old.okeeffe/gremlin.aed/gremlin/long1.c
index 5390dab..1c938f5 100644 (file)
--- a/usr/src/local/ditroff/ditroff.old.okeeffe/gremlin.aed/gremlin/long1.c
+++ b/usr/src/local/ditroff/ditroff.old.okeeffe/gremlin.aed/gremlin/long1.c
@@ -1,5 +1,4 @@
-\f
-/* long1.c -
+/* @(#)long1.c 1.2     %G%

  *
  * Copyright -C- 1982 Barry S. Roitblat
  *
  *
  * Copyright -C- 1982 Barry S. Roitblat
  *


@@ -93,7 +92,7 @@ extern int lnum[], fnum[];
 
 int bang;
 
 
 int bang;
 

-\f
+

 /*      The following are defined to allow creation of the command
  * lookup table.
  */
 /*      The following are defined to allow creation of the command
  * lookup table.
  */


@@ -174,7 +173,7 @@ static (*(lrtns[]))() = {
     LGWrite,                   /* write file */
     LGPoint};                  /* create point from cursor */
   
     LGWrite,                   /* write file */
     LGPoint};                  /* create point from cursor */
   

-\f
+

 int
 LGLookup(str, table, next)
 char str[];                    /* Pointer to a string to be looked up */
 int
 LGLookup(str, table, next)
 char str[];                    /* Pointer to a string to be looked up */


@@ -259,7 +258,7 @@ int *next;
     }
 }
 
     }
 }
 

-\f
+

 LGCommand(command)
 char *command;
 
 LGCommand(command)
 char *command;
 


@@ -293,7 +292,7 @@ char *command;
        if (index == -2) error("not a command.");
     }
 }
        if (index == -2) error("not a command.");
     }
 }

-\f
+

 static char badarg[10] = "bad args";
 static char noset[15] = "no current set";
 
 static char badarg[10] = "bad args";
 static char noset[15] = "no current set";
 


@@ -327,7 +326,7 @@ int *index;
        return(result);
 }  /* end GetNumParm */
 
        return(result);
 }  /* end GetNumParm */
 

-\f
+

 LGOpoint(line)
 char *line;
 /*
 LGOpoint(line)
 char *line;
 /*


@@ -361,7 +360,7 @@ char *line;
        LGPoint(line);
 }  /* end LGOpoint */
 
        LGPoint(line);
 }  /* end LGOpoint */
 

-\f
+

 LGPoint(line)
 char *line;
 /*
 LGPoint(line)
 char *line;
 /*


@@ -423,7 +422,7 @@ CP()
        GRBlankPoints();
 }  /* end CP */
 
        GRBlankPoints();
 }  /* end CP */
 

-\f
+

 LGClearPoints(line)
 char *line;
 /*
 LGClearPoints(line)
 char *line;
 /*


@@ -480,7 +479,7 @@ char *line;
        Consume = FALSE;
 }  /* end DeletePoint */
 
        Consume = FALSE;
 }  /* end DeletePoint */
 

-\f
+

 LGShowPoints(line)
 char *line;
 /*
 LGShowPoints(line)
 char *line;
 /*


@@ -514,7 +513,7 @@ char *line;
        Consume = FALSE;
 } /* end ShowPoints */
 
        Consume = FALSE;
 } /* end ShowPoints */
 

-\f
+

 LGText(line)
 char *line;
 /*      This routine implements the text commands.  It first looks
 LGText(line)
 char *line;
 /*      This routine implements the text commands.  It first looks


@@ -564,7 +563,7 @@ char *line;
 }  /* end LGText */
 
 
 }  /* end LGText */
 
 

-\f
+

 LGBrush(line)
 char *line;
 /*
 LGBrush(line)
 char *line;
 /*


@@ -598,7 +597,7 @@ char *line;
 }  /* end LGBrush */
 
 
 }  /* end LGBrush */
 
 

-\f
+

 LGMBrush(line)
 char *line;
 /*
 LGMBrush(line)
 char *line;
 /*


@@ -642,7 +641,7 @@ char *line;
        CHANGED = TRUE;
 } /* end MBrush */
 
        CHANGED = TRUE;
 } /* end MBrush */
 

-\f
+

 LGMFont(line)
 char *line;
 /*
 LGMFont(line)
 char *line;
 /*


@@ -687,7 +686,7 @@ char *line;
        CHANGED = TRUE;
 } /* end MFont */
 
        CHANGED = TRUE;
 } /* end MFont */
 

-\f
+

 LGMSize(line)
 char *line;
 /*
 LGMSize(line)
 char *line;
 /*


@@ -741,7 +740,7 @@ char *line;
        CHANGED = TRUE;
 } /* end MSize */
 
        CHANGED = TRUE;
 } /* end MSize */
 

-\f
+

 LGMText(line)
 char *line;
 /*      This routine allows modification of text by replacing 
 LGMText(line)
 char *line;
 /*      This routine allows modification of text by replacing 


@@ -782,7 +781,7 @@ char *line;
     }  /* end while */
     CHANGED = TRUE;
 }  /* end LGMText */
     }  /* end while */
     CHANGED = TRUE;
 }  /* end LGMText */

-\f
+

 LGMPoint(line)
 char *line;
 /*
 LGMPoint(line)
 char *line;
 /*


@@ -839,7 +838,7 @@ char *line;
        }  /* end if !DBNullelt */
 }  /* end MPOINT */
 
        }  /* end if !DBNullelt */
 }  /* end MPOINT */
 

-\f
+

 LGGripe(line)
 char *line;
 /*
 LGGripe(line)
 char *line;
 /*


@@ -868,7 +867,7 @@ char *line;
        Consume = FALSE;
 }  /* end Little Point */
 
        Consume = FALSE;
 }  /* end Little Point */
 

-\f
+

 SetOrient(orient)
 int orient;
 /*
 SetOrient(orient)
 int orient;
 /*


@@ -915,7 +914,7 @@ char *line;
     SHUpdate();
 }  /* end Orient */
 
     SHUpdate();
 }  /* end Orient */
 

-\f
+

 LGSave(line)
 char *line;
 /*
 LGSave(line)
 char *line;
 /*