Lines Matching refs:Snode

777       Snode : Node_Id;  variable
780       Snode := New_Node (K, Loc);
781       Set_Right_Opnd (Snode, Relocate_Node (Right));
782       Set_Chars      (Snode, Chars (E));
783       Set_Etype      (Snode, Base_Type (Entyp));
784       Set_Entity     (Snode, E);
789          Set_Shift_Count_OK (Snode, True);
797          Set_Left_Opnd (Snode, Relocate_Node (Left));
798          Rewrite (N, Snode);
815          Set_Left_Opnd (Snode,
817          Rewrite (N, Unchecked_Convert_To (Typ, Snode));