From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,2078dddcdcd8d83,start
X-Google-Attributes: gid103376,public
From: yggou@Scorpio.csie.nctu.edu.tw (Ivan Gou)
Subject: assign help!!
Date: 1997/05/05
Message-ID: <5kjvcv$evt@news.cis.nctu.edu.tw>#1/1
X-Deja-AN: 239424924
Organization: Dept. of Computer & Information Science, NCTU, Taiwan
Newsgroups: comp.lang.ada
Date: 1997-05-05T00:00:00+00:00
List-Id: <comp.lang.ada>


This is very important to me, is any master-hand can help me?
If you can help, please email me the above email address, thanks.
This is the wrire_page part of the program, I have done so far:

procedure write_page(page: in out page_type;
                      line: in out text_line;
                      next_line: in out text_line) is

-- Writes out one full page of text.

begin -- write_page
  --** Reset the page
   for i in 1..page_length loop
      for j in 1..col_num loop
          line:= ret_line(page(current_col));
          next_line:= ret_line(page(current_col));
        for k in 1..col_width loop
           put(line.buffer(k));  -- line 208 is here, what shall I put instead
of 'line'?
        end loop;
      end loop;
    end loop;

   new_line;
   page_num := page_num + 1;
   for count in 1..(col_width * col_num /2) loop
      put(space);
   end loop;
   put("page "); put(page_num,2);
   new_line; new_line; 
end write_page;

I have error in:

typeset.adb:208:16: invalid prefix in selected component "line"
typeset.adb:236:10: missing argument for parameter "line" in call to
"write_page"

You can ignore line 236