Changeset 745


Ignore:
Timestamp:
May 21, 2003, 4:47:02 PM (18 years ago)
Author:
orlov
Message:
  • Updated samples reflecting changes in the compiler.
Location:
to-imperative/trunk/samples
Files:
5 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/samples/Box/Makefile

    r714 r745  
    1313        $(RFPC) $<
    1414
    15 %.cc: %.rf
    16         $(RFPC) -cc -no $<
    17 
    1815-include $(DEPS)
  • to-imperative/trunk/samples/Makefile

    r714 r745  
    2020include $(TOPDIR)/samples/samples.mk
    2121
     22%.cc: %.rf
     23        $(RFPC) -cc -no $<
     24
    2225-include $(DEPS)
  • to-imperative/trunk/samples/Syntax/Makefile

    r716 r745  
    99include $(TOPDIR)/samples/samples.mk
    1010
    11 %.cc: %.rf
    12         $(RFPC) -cc -no $<
    13 
    1411-include $(DEPS)
  • to-imperative/trunk/samples/Syntax/assign2.cc

    r715 r745  
    1212
    1313RF_FUNC (F, (RF_ARG _v_arg1), (RF_RES _v_res1))
    14   uintptr_t _v_len__arg1 = (0 - 0);
    15   if (((_v_len__arg1 % 1)))
     14  if ((_v_arg1.get_len () != 0))
    1615  {
    1716    retfail;
  • to-imperative/trunk/samples/Syntax/const4.cc

    r716 r745  
    147147  {
    148148    {
    149       if (((1 + 1) != (1 + 1)))
    150       {
    151         goto block1__branch1;
    152       }
    153       if (!Expr::eq (A63, 0, (1 + 1), A64, 0, (1 + 1)))
     149      if (!Expr::eq (A63, 0, 2, A64, 0, 2))
    154150      {
    155151        goto block1__branch1;
     
    159155    }
    160156  block1__branch1: {}
    161     if (((1 + 1 + 1 + 1) != (1 + 1 + 1 + 1)))
    162     {
    163       error ("Unexpected fail");
    164     }
    165     if (!Expr::eq (_c_0, 0, (1 + 1 + 1 + 1), _c_1, 0, (1 + 1 + 1 + 1)))
     157    if (!Expr::eq (_c_0, 0, 4, _c_1, 0, 4))
    166158    {
    167159      error ("Unexpected fail");
Note: See TracChangeset for help on using the changeset viewer.