知者不言
(37) 88
(38) VISTA
(39)

(40)
(41)
(42)
  
(43)
(44)
(45)
(46)
(47)
(48)

(49) 
(50)
(51)
(52)
(53)
(54)
  
(37) 88
    最近,Fortran 77 のプログラムを Fortran 90 形式に転換したコードを読
  む機会がある.読みながら,Fortran 88 があったのではと思えてならない.
    Fortran 90 でそれ以前に見られなかった組込関数が加わった.文字列を右
  詰め,左詰めする adjust_r, adjust_l である.Fortran 88 がもし出ていれ
  ばこれらは次のようになっていたかもしれない.

      function adjust(opt, str) result(... ! opt == 0: justify left

    文字列を左または右に n 文字(カラム)シフトするルーチンがあったとす
  ると, shift_l(n, str), shift_r(n, str) でなく旧態依然の形式のルーチン
  をよく見かける.

      shift(opt, n, str) ! opt == 0: justify left, ...
      shift(n, str) ! n < 0: justify left, 0 < n: justify right

    自分自身への戒めとして,特に最後のようなルーチンは最悪である.
 
(38) VISTA
    1965 年 Economic Opportunity Act of 1964 に基づき,平和部隊の国内版と
  して,アメリカの青年が国内の貧困者への援助活動を行う "ビスタ (VISTA,
  Volunteers in Service to America)" というボランティア活動プログラムが創
  設されたそうだ.
    なんかおかしくないか,ゲイツさん.
 
     
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
(C) Copyright 2003, 2006, N.T., All Right Reserved.