Discord Gazelle: Users [1021656]

< > BotCompany Repo | #1021656 // Discord Gazelle: Users

JavaX source code (Dynamic Module) [tags: use-pretranspiled] - run with: Stefan's OS

!7

concept User {
  long userID;
  S name;
  bool canEval;
  
  toString { ret userID + "/" + name + stringIfTrue(canEval, " (can eval)"); }
}

cmodule GUsers > DynCRUD<User> {
  start {
    dbIndexing(User, 'userID);
    updateFromLinesCRUD();
  }
  
  // API
  
  void updateFromLinesCRUD {
    L l = cast dm_call(dm_gazelle_linesCRUD(), 'conceptsOfType, 'User);
    for (O o : l)
      cset(uniq_sync User(userID := get userID(o)),
        name := get name(o));
  }
  
  bool canEval(long userID) {
    User u = conceptWhere User(+userID);
    ret u != null && u.canEval;
  }
  
  User userForID(long userID) {
    ret conceptWhere User(+userID);
  }
}

Travelled to 7 computer(s): bhatertpkbcr, cfunsshuasjs, mqqgnosmbjvj, pyentgdyhuwx, pzhvpgtvlbxg, tvejysmllsmz, vouqrxazstgt

Snippet ID:

#1021656

Snippet name:

Discord Gazelle: Users

Eternal ID of this version:

#1021656/6

Text MD5:

43feed2fbf932ea88cf9b266c3da6602

Transpilation MD5:

2e40f511d718c19594493aedd98e52e7

Author:

stefan

Category:

javax

Type:

JavaX source code (Dynamic Module)

Public (visible to everyone):

Yes

Archived (hidden from active list):

Created/modified:

2019-07-14 11:40:57

Source code size:

689 bytes / 34 lines

Pitched / IR pitched:

No / No

Views / Downloads:

228 / 9891

Version history:

5 change(s)

Referenced in:

[show references]

1	!7
2
3	concept User {
4	long userID;
5	S name;
6	bool canEval;
7
8	toString { ret userID + "/" + name + stringIfTrue(canEval, " (can eval)"); }
9	}
10
11	cmodule GUsers > DynCRUD<User> {
12	start {
13	dbIndexing(User, 'userID);
14	updateFromLinesCRUD();
15	}
16
17	// API
18
19	void updateFromLinesCRUD {
20	L l = cast dm_call(dm_gazelle_linesCRUD(), 'conceptsOfType, 'User);
21	for (O o : l)
22	cset(uniq_sync User(userID := get userID(o)),
23	name := get name(o));
24	}
25
26	bool canEval(long userID) {
27	User u = conceptWhere User(+userID);
28	ret u != null && u.canEval;
29	}
30
31	User userForID(long userID) {
32	ret conceptWhere User(+userID);
33	}
34	}