Package com.ericsson.otp.erlang

Examples of com.ericsson.otp.erlang.OtpErlangList.arity()

117
118
119
120
121
122
123
124
125
126
127
      response = ErlangRunner.getRunner().call(otpArgs,"Could not run typer for the second time");     
    }
    progress.next();// 6

    OtpErlangList analysisResults = (OtpErlangList) response.elementAt(1);
    Assert.assertEquals(1, analysisResults.arity());
    OtpErlangTuple fileDetails = (OtpErlangTuple) analysisResults.elementAt(0);
    OtpErlangList typeInformation = (OtpErlangList) fileDetails.elementAt(3);
    for (int i = 0; i < typeInformation.arity(); ++i) {
      //System.out.print("\n" + typeInformation.elementAt(i).toString());
      OtpErlangTuple functionDescr = (OtpErlangTuple) typeInformation.elementAt(i);
View Full Code Here
120
121
122
123
124
125
126
127
128
129
130
    OtpErlangList analysisResults = (OtpErlangList) response.elementAt(1);
    Assert.assertEquals(1, analysisResults.arity());
    OtpErlangTuple fileDetails = (OtpErlangTuple) analysisResults.elementAt(0);
    OtpErlangList typeInformation = (OtpErlangList) fileDetails.elementAt(3);
    for (int i = 0; i < typeInformation.arity(); ++i) {
      //System.out.print("\n" + typeInformation.elementAt(i).toString());
      OtpErlangTuple functionDescr = (OtpErlangTuple) typeInformation.elementAt(i);
      if (functionDescr.arity() > 3)
      {
        FuncSignature s = new FuncSignature(config,typeInformation.elementAt(i), null);
View Full Code Here
262
263
264
265
266
267
268
269
270
271
272
      if (name instanceof OtpErlangAtom && ((OtpErlangAtom) name).atomValue().equals("behaviour")) {// found the OTP behaviour attribute
        OtpErlangObject value = tuple.elementAt(1);
        if (value instanceof OtpErlangList) // list of behaviours
        {
          OtpErlangList behList = (OtpErlangList)value;
          for(int i=0;i<behList.arity();++i)
            if (behList.elementAt(i) instanceof OtpErlangAtom)
            {
              String bstring = ((OtpErlangAtom) (behList.elementAt(i))).atomValue();
              if (bstring.startsWith("gen_server")) {
                behaviour = new OTPGenServerBehaviour(mod);
View Full Code Here
266
267
268
269
270
271
272
273
274
275
276
      if (name instanceof OtpErlangAtom && ((OtpErlangAtom) name).atomValue().equals("behaviour")) {// found the OTP behaviour attribute
        OtpErlangObject value = tuple.elementAt(1);
        if (value instanceof OtpErlangList) // list of behaviours
        {
          OtpErlangList behList = (OtpErlangList)value;
          for(int i=0;i<behList.arity();++i)
            if (behList.elementAt(i) instanceof OtpErlangAtom)
            {
              String bstring = ((OtpErlangAtom) (behList.elementAt(i))).atomValue();
              if (bstring.startsWith("gen_server")) {
                behaviour = new OTPGenServerBehaviour(mod);
View Full Code Here
117
118
119
120
121
122
123
124
125
126
127
      response = ErlangRunner.getRunner().call(otpArgs,"Could not run typer for the second time");     
    }
    progress.next();// 6

    OtpErlangList analysisResults = (OtpErlangList) response.elementAt(1);
    Assert.assertEquals(1, analysisResults.arity());
    OtpErlangTuple fileDetails = (OtpErlangTuple) analysisResults.elementAt(0);
    OtpErlangList typeInformation = (OtpErlangList) fileDetails.elementAt(3);
    for (int i = 0; i < typeInformation.arity(); ++i) {
      //System.out.print("\n" + typeInformation.elementAt(i).toString());
      OtpErlangTuple functionDescr = (OtpErlangTuple) typeInformation.elementAt(i);
View Full Code Here
120
121
122
123
124
125
126
127
128
129
130
    OtpErlangList analysisResults = (OtpErlangList) response.elementAt(1);
    Assert.assertEquals(1, analysisResults.arity());
    OtpErlangTuple fileDetails = (OtpErlangTuple) analysisResults.elementAt(0);
    OtpErlangList typeInformation = (OtpErlangList) fileDetails.elementAt(3);
    for (int i = 0; i < typeInformation.arity(); ++i) {
      //System.out.print("\n" + typeInformation.elementAt(i).toString());
      OtpErlangTuple functionDescr = (OtpErlangTuple) typeInformation.elementAt(i);
      if (functionDescr.arity() > 3)
      {
        FuncSignature s = new FuncSignature(config,typeInformation.elementAt(i), null);
View Full Code Here
480
481
482
483
484
485
486
487
488
489
490
     */
    public static void setStateNamesToBeIgnored(LayoutOptions options, OtpErlangObject stateNamesAsObject)
    {
     
      OtpErlangList statesToBeIgnored = (OtpErlangList)stateNamesAsObject;
      if (statesToBeIgnored.arity() > 0 && options != null)
      {
        if (options.ignoredStates == null)
          options.ignoredStates = new TreeSet<String>();
        for(OtpErlangObject obj:statesToBeIgnored)
          options.ignoredStates.add( ((OtpErlangAtom)obj).atomValue() );
View Full Code Here
131
132
133
134
135
136
137
138
139
140
141
    OtpErlangTuple knownScores = scoresMap.get(name);Assert.assertNotNull("unknown entry "+name,knownScores);
    Assert.assertEquals(knownScores.arity(),value.arity());
    for(int i=0;i<knownScores.arity();++i)
    {
      OtpErlangList listA=(OtpErlangList)knownScores.elementAt(i), listB= (OtpErlangList)value.elementAt(i);
      Assert.assertEquals(listA.arity(),listB.arity());
      for(int elem=0;elem<listA.arity();++elem)
        Assert.assertEquals(((OtpErlangDouble)listA.elementAt(elem)).doubleValue(),((OtpErlangDouble)listB.elementAt(elem)).doubleValue(),Configuration.fpAccuracy);
    }
  }
 
View Full Code Here
132
133
134
135
136
137
138
139
140
141
142
    Assert.assertEquals(knownScores.arity(),value.arity());
    for(int i=0;i<knownScores.arity();++i)
    {
      OtpErlangList listA=(OtpErlangList)knownScores.elementAt(i), listB= (OtpErlangList)value.elementAt(i);
      Assert.assertEquals(listA.arity(),listB.arity());
      for(int elem=0;elem<listA.arity();++elem)
        Assert.assertEquals(((OtpErlangDouble)listA.elementAt(elem)).doubleValue(),((OtpErlangDouble)listB.elementAt(elem)).doubleValue(),Configuration.fpAccuracy);
    }
  }
 
  /** Records the supplied scores in the map.
View Full Code Here
533
534
535
536
537
538
539
540
541
542
543
      outcomeEnum = TRACEOUTCOME.TRACE_FAIL;
    } else {
      throw new IllegalArgumentException("unknown Erlang response " + outcome);
    }
    OtpErlangList trace = (OtpErlangList) result.elementAt(2);
    ErlangLabel[] answerDetails = new ErlangLabel[trace.arity()];
    for (int i = 0; i < trace.arity(); ++i) {
      OtpErlangTuple elemAti = (OtpErlangTuple) trace.elementAt(i);
      if (elemAti.arity() < 2 || elemAti.arity() > 3)
        throw new IllegalArgumentException("received tuple " + elemAti
            + " of invalid arity");
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.