6.7.3 `struct_type'
-------------------

struct_type(NAME|OBJECT)
     :: $B9=B$BN$N<1JLHV9f$r<hF@$9$k(B.

RETURN
     $B@0?t(B

NAME
     $BJ8;zNs(B

OBJECT
     $B9=B$BN(B

   * $BL>A0$,(B NAME $B$G$"$k9=B$BN(B, $B$^$?$O(B OBJECT
     $B$N;X$99=B$BN$N<1JLHV9f$r<hF@$9$k(B. $B%(%i!<$N$H$-$O(B -1 $B$rJV$9(B.

     [10] struct list {h,t};
     0
     [11] A=newstruct(list);
     {0,0}
     [12] struct_type(A);
     3
     [13] struct_type("list");
     3

$B;2>H(B
     *Note `newstruct': newstruct, *Note `$B9=B$BNDj5A(B': $B9=B$BNDj5A(B.

