home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / Samples / CSAPE32.ARJ / SOURCE / CSSRC / SDGOHOME.C < prev    next >
Encoding:
C/C++ Source or Header  |  1990-03-28  |  877 b   |  43 lines
  1. /*
  2.     sdgohome.c
  3.  
  4.     % sed_GoHome, sed_GoEnd
  5.  
  6.     C-scape 3.2
  7.     Copyright (c) 1988, by Oakland Group, Inc.
  8.     ALL RIGHTS RESERVED.
  9.  
  10.     Revision History:
  11.     -----------------
  12.     11/28/88 jmd    made into functions
  13.  
  14.      3/24/89 jmd    added sed_ macros
  15.      3/28/90 jmd    ansi-fied
  16. */
  17.  
  18. #include "sed.h"
  19.  
  20. void sed_GoHome(sed_type sed)
  21. /*
  22.     Move the cursor to the first record position in the
  23.     current field.
  24. */
  25. {
  26.     if (sed_GetRecordPos(sed) != NO_WRITEABLES) {
  27.         sed_GotoChar(sed, menu_GetFirstFieldPos(sed_GetMenu(sed), sed_GetFieldNo(sed)));
  28.     }
  29. }
  30.  
  31. void sed_GoEnd(sed_type sed)
  32. /*
  33.     Move the cursor to the last record position in the
  34.     current field.
  35. */
  36. {
  37.      if (sed_GetRecordPos(sed) != NO_WRITEABLES) {
  38.         sed_GotoChar(sed, 
  39.             int_min(menu_GetLastFieldPos(sed_GetMenu(sed), sed_GetFieldNo(sed)),
  40.                 menu_GetRecordLen(sed_GetMenu(sed), sed_GetFieldNo(sed)) - 1));
  41.     }
  42. }
  43.