Examples of ETuple3

Examples of erjang.ETuple3

587
588
589
590
591
592
593
594
595
596
597
    }

  }

  static MatchFunction parse_MatchFunction(EObject fspec) {
    ETuple3 tup = ETuple3.cast(fspec);
    if (tup == null)
      throw ERT.badarg(fspec);

    ParseContext ctx = new ParseContext();
View Full Code Here

Examples of erjang.ETuple3

176
177
178
179
180
181
182
183
184
185
186
    long now = erjang.m.erlang.ErlBif.now_raw_micros();
    int micros = (int)(now % 1000000); now /= 1000000;
    int secs   = (int)(now % 1000000); now /= 1000000;
    int megas  = (int)now;

    ETuple3 res = new ETuple3();

    res.elem1 = ERT.box(megas);
    res.elem2 = ERT.box(secs);
    res.elem3 = ERT.box(micros);
View Full Code Here

Examples of erjang.ETuple3

382
383
384
385
386
387
388
389
390
391
392
    }
  }

  public void setopt(EObject head) {
   
    ETuple3 tup = ETuple3.cast(head);
    if (tup != null) {

      EInternalPID pid;
      if (tup.elem1 == Native.am_heir
          && (pid=tup.elem2.testInternalPID()) != null)
View Full Code Here

Examples of erjang.ETuple3

1177
1178
1179
1180
1181
1182
1183
1184
1185
1186
1187
    long now = now_unique_micros();
    int micros = (int)(now % 1000000); now /= 1000000;
    int secs   = (int)(now % 1000000); now /= 1000000;
    int megas  = (int)now;

    ETuple3 res = new ETuple3();

    res.elem1 = ERT.box(megas);
    res.elem2 = ERT.box(secs);
    res.elem3 = ERT.box(micros);
View Full Code Here

Examples of erjang.ETuple3

1911
1912
1913
1914
1915
1916
1917
1918
1919
1920
1921
1922
1923
1924
1925
1926
1927
  @BIF
  public static ETuple2 localtime()
  {
    Calendar c = GregorianCalendar.getInstance();
   
    ETuple3 date = new ETuple3();
    date.set(1, ERT.box(c.get(Calendar.YEAR)));
    date.set(2, ERT.box(c.get(Calendar.MONTH)-Calendar.JANUARY+1));
    date.set(3, ERT.box(c.get(Calendar.DAY_OF_MONTH)));
   
    ETuple3 time = new ETuple3();
    time.set(1, ERT.box(c.get(Calendar.HOUR_OF_DAY)));
    time.set(2, ERT.box(c.get(Calendar.MINUTE)));
    time.set(3, ERT.box(c.get(Calendar.SECOND)));
   
    return new ETuple2(date, time);
  }
View Full Code Here

Examples of erjang.ETuple3

1930
1931
1932
1933
1934
1935
1936
1937
1938
1939
1940
1941
1942
1943
1944
1945
1946
  @BIF
  public static ETuple2 universaltime()
  {
    Calendar c = GregorianCalendar.getInstance(UTC_TIME_ZONE);
   
    ETuple3 date = new ETuple3();
    date.set(1, ERT.box(c.get(Calendar.YEAR)));
    date.set(2, ERT.box(c.get(Calendar.MONTH)-Calendar.JANUARY+1));
    date.set(3, ERT.box(c.get(Calendar.DAY_OF_MONTH)));
   
    ETuple3 time = new ETuple3();
    time.set(1, ERT.box(c.get(Calendar.HOUR_OF_DAY)));
    time.set(2, ERT.box(c.get(Calendar.MINUTE)));
    time.set(3, ERT.box(c.get(Calendar.SECOND)));
   
    return new ETuple2(date, time);
  }
View Full Code Here

Examples of erjang.ETuple3

1954
1955
1956
1957
1958
1959
1960
1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971
1972
1973
1974
1975
1976
1977
1978
1979
1980
1981
1982
1983
1984
1985
1986
1987
1988
1989
1990
1991
1992
1993
1994
1995
1996
1997
1998
1999
2000
2001
2002
2003
2004
  @BIF
  static public EObject localtime_to_universaltime(EObject a1, EObject a2)
  {
    ETuple2 dt;
    if ((dt=ETuple2.cast(a1)) != null) {
      ETuple3 date;
      ETuple3 time;
      ESmall year;
      ESmall month;
      ESmall day;
      ESmall hour;
      ESmall minute;
      ESmall sec;
      if (   (date=ETuple3.cast( dt.elem1 )) != null
        && (year = date.elem1.testSmall()) != null
        && (month = date.elem2.testSmall()) != null
        && (day = date.elem3.testSmall()) != null
       
        && (time=ETuple3.cast( dt.elem2 )) != null
        && (hour = time.elem1.testSmall()) != null
        && (minute = time.elem2.testSmall()) != null
        && (sec = time.elem3.testSmall()) != null
       
      ) {

        Calendar in_date = GregorianCalendar.getInstance();
        in_date.set(Calendar.YEAR, year.value);
        in_date.set(Calendar.MONTH, month.value-1+Calendar.JANUARY);
        in_date.set(Calendar.DAY_OF_MONTH, day.value);
       
        in_date.set(Calendar.HOUR_OF_DAY, hour.value);
        in_date.set(Calendar.MINUTE, minute.value);
        in_date.set(Calendar.SECOND, sec.value);
       
        Calendar out_date = GregorianCalendar.getInstance(UTC_TIME_ZONE);
        out_date.setTimeInMillis(in_date.getTimeInMillis());
       
        ETuple3 date2 = new ETuple3();
        date2.set(1, ERT.box(out_date.get(Calendar.YEAR)));
        date2.set(2, ERT.box(out_date.get(Calendar.MONTH)-Calendar.JANUARY+1));
        date2.set(3, ERT.box(out_date.get(Calendar.DAY_OF_MONTH)));
       
        ETuple3 time2 = new ETuple3();
        time2.set(1, ERT.box(out_date.get(Calendar.HOUR_OF_DAY)));
        time2.set(2, ERT.box(out_date.get(Calendar.MINUTE)));
        time2.set(3, ERT.box(out_date.get(Calendar.SECOND)));
       
        return new ETuple2(date2, time2);   
      }
    }
View Full Code Here

Examples of erjang.ETuple3

2008
2009
2010
2011
2012
2013
2014
2015
2016
2017
2018
2019
2020
2021
2022
2023
2024
2025
2026
2027
2028
2029
2030
2031
2032
2033
2034
2035
2036
2037
2038
2039
2040
2041
2042
2043
2044
2045
2046
2047
2048
2049
2050
2051
2052
2053
2054
2055
2056
2057
2058
  @BIF
  static public EObject universaltime_to_localtime(EObject a1)
  {
    ETuple2 dt;
    if ((dt=ETuple2.cast(a1)) != null) {
      ETuple3 date;
      ETuple3 time;
      ESmall year;
      ESmall month;
      ESmall day;
      ESmall hour;
      ESmall minute;
      ESmall sec;
      if (   (date=ETuple3.cast( dt.elem1 )) != null
        && (year = date.elem1.testSmall()) != null
        && (month = date.elem2.testSmall()) != null
        && (day = date.elem3.testSmall()) != null
       
        && (time=ETuple3.cast( dt.elem2 )) != null
        && (hour = time.elem1.testSmall()) != null
        && (minute = time.elem2.testSmall()) != null
        && (sec = time.elem3.testSmall()) != null
       
      ) {

        Calendar in_date = GregorianCalendar.getInstance(UTC_TIME_ZONE);
        in_date.set(Calendar.YEAR, year.value);
        in_date.set(Calendar.MONTH, month.value-1+Calendar.JANUARY);
        in_date.set(Calendar.DAY_OF_MONTH, day.value);
       
        in_date.set(Calendar.HOUR_OF_DAY, hour.value);
        in_date.set(Calendar.MINUTE, minute.value);
        in_date.set(Calendar.SECOND, sec.value);
       
        Calendar out_date = GregorianCalendar.getInstance();
        out_date.setTimeInMillis(in_date.getTimeInMillis());
       
        ETuple3 date2 = new ETuple3();
        date2.set(1, ERT.box(out_date.get(Calendar.YEAR)));
        date2.set(2, ERT.box(out_date.get(Calendar.MONTH)-Calendar.JANUARY+1));
        date2.set(3, ERT.box(out_date.get(Calendar.DAY_OF_MONTH)));
       
        ETuple3 time2 = new ETuple3();
        time2.set(1, ERT.box(out_date.get(Calendar.HOUR_OF_DAY)));
        time2.set(2, ERT.box(out_date.get(Calendar.MINUTE)));
        time2.set(3, ERT.box(out_date.get(Calendar.SECOND)));
       
        return new ETuple2(date2, time2);   
      }
    }
View Full Code Here

Examples of erjang.ETuple3

2066
2067
2068
2069
2070
2071
2072
2073
2074
2075
2076
2077
2078
2079
2080
2081
2082
    if (num == null) throw ERT.badarg(a1);
   
    Calendar out_date = GregorianCalendar.getInstance(UTC_TIME_ZONE);
    out_date.setTimeInMillis(num.longValue() * 1000L);
   
    ETuple3 date2 = new ETuple3();
    date2.set(1, ERT.box(out_date.get(Calendar.YEAR)));
    date2.set(2, ERT.box(out_date.get(Calendar.MONTH)-Calendar.JANUARY+1));
    date2.set(3, ERT.box(out_date.get(Calendar.DAY_OF_MONTH)));
   
    ETuple3 time2 = new ETuple3();
    time2.set(1, ERT.box(out_date.get(Calendar.HOUR_OF_DAY)));
    time2.set(2, ERT.box(out_date.get(Calendar.MINUTE)));
    time2.set(3, ERT.box(out_date.get(Calendar.SECOND)));
   
    return new ETuple2(date2, time2);   
  }
View Full Code Here

Examples of erjang.ETuple3

2084
2085
2086
2087
2088
2089
2090
2091
2092
2093
2094
2095
  @BIF
  static public EObject universaltime_to_posixtime(EObject a1)
  {
    ETuple2 dt;
    if ((dt=ETuple2.cast(a1)) != null) {
      ETuple3 date;
      ETuple3 time;
      ESmall year;
      ESmall month;
      ESmall day;
      ESmall hour;
      ESmall minute;
View Full Code Here
TOP
Copyright © 2018 www.massapi.com. All rights reserved.
All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.