File: server.adb

package info (click to toggle)
polyorb 2.6.0~20090423-10
  • links: PTS
  • area: main
  • in suites: squeeze
  • size: 25,004 kB
  • ctags: 240
  • sloc: ada: 236,464; makefile: 2,281; sh: 1,373; cpp: 957; java: 500; ansic: 198; python: 191; perl: 23; exp: 6
file content (8 lines) | stat: -rw-r--r-- 143 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
 
package body Server is
    
   function Echo_String (S : String) return String is
   begin
      return S;
   end Echo_String;
   
end Server;